发新话题
打印

三行代码的播放器

三行代码的播放器

VC6:
1.新建一个基本对话框的工程,要支持ActiveX。
2.添加Windows Media Player控件(不是WMP9的那个控件),用建立类向导添加该类为m_WMP
3.添加Common Dialog Control控件,用建立类向导添加该类为m_CD
4.放置一个按钮在窗体上,在OnButton中写入代码:
        m_CD.SetFilter("MediaFile|*.mp3;*.avi;*.mpg";
        m_CD.ShowOpen();
        m_WMP.SetFileName(m_CD.GetFileName());
VB6:
1.新建标准EXE
2.添加Windows Media Player控件.
3.添加Common Dialog Control控件.
4.添加一个按钮,在其Click事件中写入
        CommonDialog1.Filter = "MediaFile|*.mp3;*.avi;*.mpg"
        CommonDialog1.ShowOpen
        MediaPlayer1.FileName = CommonDialog1.FileName

用以上方法写出来的播放器是相同的,但足可看到VB与VC的语法差异.
VB是很方便的语言,做这种小程序非常有效率
[img:25511af44d]http://exp.myrice.com/images/me.gif[/img:25511af44d]

TOP

发新话题