在Windows系統中,滿屏播放AVI文件同在窗口中播放AVI文件是不同的,在滿屏播放的時候不需要屏幕上的顏色進行抖動,只需要將調色板設置為AVI文件所獨有的就可以了,這是因為沒有其它的窗口在背景中存在的緣故。
使用Windows應用程序編程接口(API)的mciSendString函數可以實現對AVI文件的播放。
樣例程序
下面的樣例程序將滿屏播放位於C盤根目錄下的test.avi文件。你可以將你的Windows95CDROM中的某些AVI文件改名並拷貝到C盤根目錄下以播放它。
1.在VisualBasic中開始一個新的項目,采用缺省的方法建立Form1。
2.將如下的聲明語句添加到Form1的通用聲明部分中(注意每個聲明語句?需要被書寫在一行內):
PrivateDeclareFunctionmciSendStringLib"winmm.dll"Alias_
"mciSendStringA"(ByVallpstrCommandAsString,ByVal_
lpstrReturnStringAsAny,ByValuReturnLengthAsLong,ByVal_
hwndCallbackAsLong)AsLong
3.在Form1上添加一個命令按鈕控件,采用缺省的方法建立Command1。將它的Caption屬性設置為“播放文件”。
4.將如下的代碼添加到Command1的單擊事件中:
PrivateSubCommand1_Click()
CmdStr$="playc: est.avifullscreen"
ReturnVal&=mciSendString(CmdStr$,0&,0,0&)
EndSub
通過按下F5鍵來執行樣例程序。單擊播放命令按鈕,可以在滿屏方式下播放AVI文件。->