用vb设计vcd播放器的方法与技巧

　　笔者在初步研究了windows的system.ini后发现，通过vb的多媒体控件mci.vbx可以打开mpeg压缩文件(如vcd2.0版的.dat文件)。
　　首先你的windows系统中system.ini文件关于[mci]中需有mpegvideo项(一般windows95和windows98中都已有此项,通过安装xingplay或ccdvp95等软件也可增加此项)。
　　其次在vb中建立一个新窗口,将mci.vbx加入toolbox中,将mci控件拖放至窗体form上,调整其大小,将九个按钮(从左至右为:prev、next、play、pause、back、step、stop、record和eject)中record按钮visible属性设为false,其余按钮的visible属性和enabled属性设置为true,以上按钮的设置可通过mmcontrol的属性栏内“自定义”项来设置。
　　假设光驱为e:,vcd碟片文件为e:\mpegav\music01.dat。
　　源代码如下：
　　 private sub form_ load()
　　 mmcontrol.devicetype=″mpegvideo″
　　 mmcontrol.filename=″e:\mpegav\music01.dat″
　　 mmcontrol.command=″open″
　　 mmcontrol.command=″play″
　　 end sub
　　 sub form_unload(cancel as integer)
　　 mmcontrol.command=″close″
　　 end sub
　　笔者通过实践发现step和back按钮功能不明显,所以对以上两个按钮进行了一些改进。
　　 sub mmcontrol_ stepclick(cancel as integer)
　　 j=mmcontrol.position＋100　′数值100为前进量,可适当调整
　　 if j＞mmcontrol.length then
　　 mmcontrol.from=mmcontrol.length
　　 else
　　 mmcontrol.from=j
　　 end if
　　 mmcontrol.command=″play″
　　 end sub
　　 sub mmcontrol_ backclick(cancel as integer)
　　 i=mmcontrol.position－100　′数值100为后退量,可适当调整
　　 if i＜0 then
　　 mmcontrol.from=0
　　 else
　　 mmcontrol.from=i
　　 end if
　　 mmcontrol.command=″play″
　　 end sub
　　 mci控件还有很多属性,如画面播放位置hwnddisplay属性等,读者可参阅相关资料自行摸索,这里不再介绍。读者还可以通过建立通用对话框来打开文件,以解决vcd文件名不统一或多文件的问题。
　　调整好窗体form的标题、图标、颜色等,然后编译成 exe文件,你就可以在windows下拥有自己的vcd播放器了。
　　另外,因电脑性能差异及vcd解码质量的不同,播放画面质量和音质将有所差异。

ICP备案编号:粤ICP备06052964号

www.sosof.com

选择显示字体大小

用vb设计vcd播放器的方法与技巧

关键字本文所属关键字

相关与本文相关文章

分类所有文章关键字导航

源码编程相关

SQL数据库相关

手机无线相关

网页设计制作相关

网站建设推广相关

操作系统/服务器相关

图形图像多媒体相关

标准网站致力的规范

www.sosof.com

选择显示字体大小

用vb设计vcd播放器的方法与技巧

shouchang();

关键字 本文所属关键字

相关 与本文相关文章

分类 所有文章关键字导航

源码编程相关

SQL数据库相关

手机无线相关

网页设计制作相关

网站建设推广相关

操作系统/服务器相关

图形图像多媒体相关

标准 网站致力的规范

关键字本文所属关键字

相关与本文相关文章

分类所有文章关键字导航

标准网站致力的规范