Question

怎样用Authorware制作MP3播放器?

Answer 1

一、打开Authorware 6.0，新建一个文件并保存名为“我的播放器”；按Ctrl+Shift+F打开Functions函数库，选择Category下的“我的播放器.a6p”，然后单击Load…出现对话框，选择tMsControls.U32后单击出现一个对话框，按住Ctrl键可以连续选中所需要的七个函数：

1）tMsMP3CreatePlayer； 2）tMsMP3IsPlaying；

图1
3）tMsMP3LoadFile； 4）tMsMP3Pause； 5）tMsMP3Play； 6）tMsMP3Stop； 7）tMsOpenImageFile。

单击Load即可完成对外挂函数的加载；利用同样的方法加载Winapi.u32中的 SetWindowText函数。

二、在流程线上放置一个显示计算图标，名为：系统设置，在里面输入以下语句：

ResizeWindow(275, 116) SetWindowText(WindowHandle, "我的播放器")-设置标题栏名称 tMsMP3CreatePlayer(WindowHandle, "mp3Status") -设置播放器播放状态 mp3StatusValue[1] := "Opened" -- 打开文件时的状态值为1。 mp3StatusValue[2] := "Ready" mp3StatusValue[3] := "Stopped" mp3StatusValue[4] := "Playing" mp3StatusValue[5] := "Paused"

3、拖一个交互图标到流程线上，名为“Display”，然后导入一幅图片（如图1），在“显示歌曲名”箭头所指位置使用文本工具输入如下文字：{SubStr(mp3FileName,RFind("\\\\",mp3FileName)+1, CharCount(mp3FileName))}-显示打开歌曲的文件名，注意区分小括号和大括号。

在“显示播放状态”箭头所指位置输入如下文字：{mp3DisplayStatus := mp3StatusValue[mp3Status+1]}-显示播放器当前状态，如：playing（播放）、pause（暂停）。

4、在交互图标旁边放置计算图标，出现Response Type对话框，选择Hot spot（热区）单击确定即可，在交互图标旁边共放置四个计算图标（如图2），分别命名为：Open、Play、Pause、Stop；双击打开交互图标，然后移动各个热区，使它们的位置与图1中的对应按钮图形的位置重合；音量滑块是用来调节音量的。

5、双击打开Open计算图标，在里面输入如下语句：

mp3FileName := "" mp3FileName := tMsOpenImageFile(WindowHandle, "我的播放器", FileLocation, "", "*.mp3", "|*.mp3;*.mpa;*.mp2;*.mp3")--设置播发器打开歌曲文件的类型，以mp3为主。 if mp3FileName 〈〉 "" then tMsMP3LoadFile(mp3FileName) tMsMP3Play(0, 0)打开歌曲就播放。

图2
在Play计算图标中输入：tMsMP3Play(0, 0)-播放音乐 ; 在Pause计算图标中输入：tMsMP3Pause( ) -暂停音乐; 在Stop中计算图标中输入：tMsMP3Stop( )-停止音乐。

6、按Ctrl+R运行程序，可以看到我们的播放器已经制作完成了，赶快选择一个歌曲听一听吧，怎么样？DIY的感觉不错吧！在这里，还可以将静态的按钮图片改成动态的按钮（使用按钮交互），还可以将播放和暂停按钮重叠起来；使用Winapi.u32中的ShowWindowAsync函数实现最大化最小化……
具体请看:http://tech.tom.com/Archive/2002/5/20-3430.html

Answer 2

新闻 网页 贴吧 知道 MP3 图片 更多>>
帮助

百度知道 > 教育/科学 > 作业帮助
用户登录
用户名:
密 码:
验证码:
(请输入图中数字)
注册

--------------------------------------------------------------------------------

如果您是百度贴吧用户，
请直接登录

同类热点问题
• 高分跪求检讨书啊!!!
• 一道数学题
• 如何计算分数根号整数(如4/5根号下3)
• 竞选外联部的演讲稿怎么写?
• 用“老虎" “儿子” “黄瓜” “细菌”造句
更多>>

您想在自己的网站上展示
百度“知道”上的问答吗？
来获取免费代码吧！
--------------------------------------------------------------------------------
如对“知道”有疑问或建议，请点此与我们联系

订阅该问题

待解决
怎样用Authorware制作MP3播放器?
悬赏分：20 - 离问题结束还有 14 天 23 小时

提问者：badzl - 试用期 一级

答复 共 1 条

一、打开Authorware 6.0，新建一个文件并保存名为“我的播放器”；按Ctrl+Shift+F打开Functions函数库，选择Category下的“我的播放器.a6p”，然后单击Load…出现对话框，选择tMsControls.U32后单击出现一个对话框，按住Ctrl键可以连续选中所需要的七个函数：

1）tMsMP3CreatePlayer； 2）tMsMP3IsPlaying；

图1
3）tMsMP3LoadFile； 4）tMsMP3Pause； 5）tMsMP3Play； 6）tMsMP3Stop； 7）tMsOpenImageFile。

单击Load即可完成对外挂函数的加载；利用同样的方法加载Winapi.u32中的 SetWindowText函数。

二、在流程线上放置一个显示计算图标，名为：系统设置，在里面输入以下语句：

ResizeWindow(275, 116) SetWindowText(WindowHandle, "我的播放器")-设置标题栏名称 tMsMP3CreatePlayer(WindowHandle, "mp3Status") -设置播放器播放状态 mp3StatusValue[1] := "Opened" -- 打开文件时的状态值为1。 mp3StatusValue[2] := "Ready" mp3StatusValue[3] := "Stopped" mp3StatusValue[4] := "Playing" mp3StatusValue[5] := "Paused"

3、拖一个交互图标到流程线上，名为“Display”，然后导入一幅图片（如图1），在“显示歌曲名”箭头所指位置使用文本工具输入如下文字：{SubStr(mp3FileName,RFind("\\\\",mp3FileName)+1, CharCount(mp3FileName))}-显示打开歌曲的文件名，注意区分小括号和大括号。

在“显示播放状态”箭头所指位置输入如下文字：{mp3DisplayStatus := mp3StatusValue[mp3Status+1]}-显示播放器当前状态，如：playing（播放）、pause（暂停）。

4、在交互图标旁边放置计算图标，出现Response Type对话框，选择Hot spot（热区）单击确定即可，在交互图标旁边共放置四个计算图标（如图2），分别命名为：Open、Play、Pause、Stop；双击打开交互图标，然后移动各个热区，使它们的位置与图1中的对应按钮图形的位置重合；音量滑块是用来调节音量的。

5、双击打开Open计算图标，在里面输入如下语句：

mp3FileName := "" mp3FileName := tMsOpenImageFile(WindowHandle, "我的播放器", FileLocation, "", "*.mp3", "|*.mp3;*.mpa;*.mp2;*.mp3")--设置播发器打开歌曲文件的类型，以mp3为主。 if mp3FileName 〈〉 "" then tMsMP3LoadFile(mp3FileName) tMsMP3Play(0, 0)打开歌曲就播放。

图2
在Play计算图标中输入：tMsMP3Play(0, 0)-播放音乐 ; 在Pause计算图标中输入：tMsMP3Pause( ) -暂停音乐; 在Stop中计算图标中输入：tMsMP3Stop( )-停止音乐。

6、按Ctrl+R运行程序，可以看到我们的播放器已经制作完成了，赶快选择一个歌曲听一听吧，怎么样？DIY的感觉不错吧！在这里，还可以将静态的按钮图片改成动态的按钮（使用按钮交互），还可以将播放和暂停按钮重叠起来；使用Winapi.u32中的ShowWindowAsync函数实现最大化最小化……
具体请看:http://tech.tom.com/Archive/2002/5/20-3430.html

参考资料：http://tech.tom.com/Archive/2002/5/20-3430.html
回答者：zengld - 助理 二级 11-6 10:30

--------------------------------------------------------------------------------

我也来回答：
回答即可得2分，回答被采纳则获得悬赏分以及奖励20分。 积分规则
回答字数在10000字以内

参考资料：
如果您的回答是从其他地方引用，请表明出处。

©2005 Baidu