用VFP编制多媒体歌曲的点播器_常用软件_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

用VFP编制多媒体歌曲的点播器

作者：闵涛文章来源：闵涛的学习笔记点击数：786 更新时间：2009/4/24 21:43:28

1．首先建立一个包含歌曲信息的数据库Mid．dbf，该数据库中有两个字段，一个是Midname字段，长度为20个字符，存放的是Mid音乐文件的中文歌曲名（如“水中花”）；另一个是Filename字段，长度为8个字符，存放的是Mid文件的文件名（不含扩展名）。建立好数据库后，把Mid文件音乐文件的信息输入数据库中。注意：所有的歌曲文件要与程序和数据库存放在一个目录中。
　　 2．建立一个表单Form1，在数据环境中添加Mid．dbf，设定Form1的caption的属性为“多媒体歌曲点播器”，编写Form1的load过程：
　　 setlibrarytofoxtools．fll
　　 publicPlaySound
　　 PlaySound=REGFN（″MCIExecute″，″C″，″I″，″MSYSTEM″）
　　 3．建立一个组合框Combo1，把Style的属性设定为2（下拉列表框），把Displayvalue的属性设定为Mid．dbf信息库中的第一首歌的歌曲名，把Rowsource的属性设定为Midname，把Rowsourcetype的属性设定为6（字段）。
　　 4．在下拉列表框上方建立一个标签Label1，把caption的属性设定为“请点播歌曲：”。
　　 5．建立第一个按钮（Command1），设定caption的属性为“播放”，编写Click的过程：
　　 midt=″Open″
　　 midw=″TypeSEQUENCER″
　　 Locateformidname=thisform．combol．value
　　 midd=midt＋space（1）＋rtrim（filename）＋″．mid″＋space（1）＋midw
　　 =CALLFN（PlaySound，midd）
　　 =CALLFN（PlaySound，″play″＋rtrim（filename）＋″．mid″）
　　 thisform．combol．enabled=．F．
　　 6．建立第二个按钮（Command2），设定caption的属性为“停止”，编写Click的过程：
　　 =CALLFN（PlaySound，″close″＋rtrim（filename）＋″．mid″）
　　 thisform．combol．enabled=．T．
　　 7．建立第三个按钮（Command3），设定caption的属性为“退出”，编写Click的过程：
　　 relethisform
　　 clearevents
　　 setlibraryto
　　 closeall
　　这样就建立了一个完整的歌曲点播器，运行表单后，只需在下拉列表框中选择一首歌曲后，单击“播放”按钮，即进行播放。

[办公软件]在sybase中插入图片、PDF、文本文件  [办公软件]安装Sybase ASE
[办公软件]linux指令大全(完整篇)  [办公软件]Linux新手入门常用命令大全
[办公软件]在RedHat Linux 9里安装gaim0.80  [办公软件]浅谈Linux 下Java 1.5 汉字方块问题解决方法
[办公软件]Linux程序员必读：中文化与GB18030标准  [办公软件]linux指令大全
[办公软件]制作Linux启动盘的四种方法  [办公软件]Linux文件系统的反删除方法

教程录入：mintao 责任编辑：mintao

上一篇教程： VFP的数据库加密算法

下一篇教程： VFP表跟踪日志的实现方法

【字体：小大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网]

　网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

同类栏目

· 办公软件 · 系统软件
· 常用软件 · 聊天工具

热门推荐

没有教程

赞助链接

闵涛博文

500 - 内部服务器错误。

您查找的资源存在问题，因而无法显示。

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18

闵涛站盟:医药大全-武穴网。A打造B、C、D……