多媒體編程初步

多媒體編程初步VisualBasic程序設計教程2本章介紹：播放動畫為應用程序定義動畫精靈多媒體MCI控件RealAudioActive控件MicrosoftActiveMovie控件VisualBasic程序設計教程3

和前面各章一樣，我們先來看一個MP3播放器的例子。界面效果如圖所示。在程序中，使用了通用文件對話框CommonDialog和控制播放進度的控件滑動條Slider以及VB的多媒體控件MMControl。使用定時器控制滑動條的進度。其中多媒體控件、滑動條控件分別在“部件”中的名稱為15.2一個MP3播放器的示例程序MicrosoftMultiMediaControl6和MicrosoftWindowsCommonControl6.0。

VisualBasic程序設計教程4

文字處理功能是多媒體技術(shù)中的一個重要內(nèi)容。在VB中，一般的文字效果如立體字、色彩或者字體變大變小等，都是編程實現(xiàn)的，相對也比較簡單。對一些較為復雜的如美術(shù)字、字體旋轉(zhuǎn)、顏色漸變、豎排等，都需要使用API技術(shù)。API技術(shù)不在本書范圍，因此我們這里簡單介紹文字的程序處理。15.3文字效果VisualBasic程序設計教程51．立體文字 在窗體（或?qū)ο螅┥狭Ⅲw文字的顯示，是將同一個顯示的字符采用不同的顏色在窗體上定位輸出兩次，在第二次輸出時適當偏移輸出的位置。

【例15-1】在窗體上顯示立體文字。顯示效果如圖所示。VisualBasic程序設計教程62．滾動文字 滾動文字包括在窗體上由右往左、自下而上的顯示效果，類似于電影電視中的片頭字幕效果。實現(xiàn)滾動文字的方法之一是通過定時的方式使字所在的控件（比如標簽）不斷地移動位置，因而在視覺上產(chǎn)生了文字滾動的效果。VisualBasic程序設計教程73．伸縮文字如果窗口的文字由大變小，再由小變大，這個效果看上去就是文字的伸縮。伸縮文字也是比較簡單的一個設計，就是在一定的事件間隔中改變文字的位置和大小。VisualBasic程序設計教程8 VB中使用控件Animation創(chuàng)建一個對象，允許被用來播放即時動畫，一般支持.AVI格式。AVI格式允許視頻和音頻交錯在一起同步播放。而Animation只能播放沒有聲音的AVI文件。

【例15-4】編寫一個復制文件的動畫界面程序。程序界面如圖所示VisualBasic程序設計教程91．Animation所在的位置使用Animation，需要從“部件”對話框中打開“MicrosoftWindowsCommonControls-2.60，添加到VB的工具箱中。2．Animation的屬性

Animation的許多屬性和VB控件的同名屬性相同。這里簡單介紹其幾個主要的專用屬性，見表所示。VisualBasic程序設計教程10屬性項描述AutoPlay加載AVI文件后，是否自動播放。邏輯值，默認為FalseBackStyle選擇控件在透明的背景上播放動畫（值為0），值1為動畫原背景Center在Animation控件中的AVI文件是否居中。默認FalseEnabled設置一個值，決定一個對象是否響應用戶生成事件，默認為TrueToolTipText如果使用Tip提示，設置提示的文本Visible設置一個值，決定對象是否可見。VisualBasic程序設計教程113．Animation方法動畫控件Animation有多種方法，其使用與一般控件方法的使用相同。主要的方法 （1）Open。打開播放的AVI文件。（2）Close。使控件Animation關(guān)閉當前打開的AVI文件。（3）Stop。在Animation中停止播放AVI文件。（4）Play。開始播放動畫。VisualBasic程序設計教程12

動畫精靈這是Microsoft為改善傳統(tǒng)的人機交互界面而設計的一個非常有意思的技術(shù)。我們在許多Windows程序中見到過“小助手”之類的動畫精靈，這就是Agent控件的作用。最初Agent預定了三個動畫人物的形象。Agent預定義的三個動畫精靈，從左到右為：Genie、Merlin、Robby15.5為應用程序定義動畫精靈VisualBasic程序設計教程13VB中有部件MicrosoftAgentControl2.0，但還是需要檢查一下你的機器上支持不支持Genie等動畫精靈。精靈動畫人物是以文件的形式提供的，描述文件的后綴為.acs，一個文件代表一個動畫精靈人物。它們在機器上默認存放的位置為C:\Windows\MSAgent\Chars，另外安裝MSOffice的機器在Office10文件夾下面也有幾個動畫精靈人物，如Rover和F1等。

【例15.5】顯示動畫精靈任務的示例

VisualBasic程序設計教程14

VB中的MicrosoftMultiMdiaControl6.0作為支持MCI的控件，在“部件”中選擇后被添加到工具箱，就可以在窗體上放置一個MCI的組合按鈕，如圖15.8所示。這些按鈕都是待激活的。必須說明的是，在對象瀏覽器中，MCI是一個大的范圍，我們這里只介紹其中的一個類MMControl。15.6多媒體MCI控件VisualBasic程序設計教程15MMControl控件的主要屬性

屬性項描述Command在對象瀏覽器中的MMControl中。指明執(zhí)行的命令名稱DeviceType設備類型。BuottonEnabled確定控件上的按鈕被激活，F(xiàn)alse為無效按鈕。ButoonVisble確定控件上的按鈕可見，F(xiàn)asle為不可見。Length給出被MCI控件打開的播放文件的長度Mode執(zhí)行MCI設備的模式，如打開、暫停、播放、錄音、Seek等Position指出一個打開了的MCI設備的位置VisualBasic程序設計教程1615.6.1

MCI的設備

MCI支持的設備包括簡單設備和復合設備。例如在Windows中的CD播放器就是一個簡單的MCI設備。復合設備需要提供包括路徑在內(nèi)的數(shù)據(jù)文件，例如WimdowsMediaPlayer（MMP）就需要打開被操作的源文件。MCI使用DeviceType指定其設備類型，語句格式為：

MMControl.DeviceType[=device$]VisualBasic程序設計教程17

參數(shù)device$是要打開的MCI設備的類型，如：AVIVideo（AVI格式視頻）、CDAudio、DAT（數(shù)字錄音帶）、DigitalVideo（數(shù)字視頻）、MMMovie（多媒體電影）、Overlay（微軟的覆蓋設備）、掃描儀、Sequencer（序列發(fā)生器）、VCR（視頻磁帶設備）、視盤或WaveAudio等，也就是說上述這些都是MCI所支持的設備。VisualBasic程序設計教程18

15.6.2

MCI的Command

在設置了MCI的設備之后，就需要使用Command屬性把操作命令發(fā)給設備。在程序中，Command的使用格式為：

MMControl.Command[=cmdstring$]

參數(shù)cmdstring$給出了將要執(zhí)行的MCI命令的名稱：Open,Close,Play,Pause,Stop,Back,Step,Prev,Next,Seek,Record,Eject,Sound或Save。這些命令被立即執(zhí)行，并將錯誤代碼存放在Error屬性中VisualBasic程序設計教程1915.6.3

MCI的事件和方法當我們對在MCI上任何一個按鈕進行點擊操作，就會產(chǎn)生一個ButtonClick事件(這里的Button均指具體的按鈕)。當按鈕釋放，會產(chǎn)生ButtonComplete事件。對Button事件，系統(tǒng)將返回一個參數(shù)供程序進行操作。例如單擊“Play”按鈕時，產(chǎn)生的事件過程為：

PrivateSubMMControl1_PlayClick(CancelAsInteger) …………‘編程者可以在此對播放按鈕進行程序代碼的設計

EndSubVisualBasic程序設計教程20使用RealAudioActive控件，選擇“部件”中的“RealPlayerActiveXControlLibrary”，在工具箱欄中就顯示Real公司的著名圖標標記，在窗體上放置RealPlay控件，顯示如圖所示。15.7RealAudioActive控件VisualBasic程序設計教程21RealAudioPlayer的主要屬性

屬性項描述Autostart指定是否自動播放指定的源文件，True或FalseConsole字符串，可以將各種不同的RealPlayer控制聚集在網(wǎng)頁上，這樣它們可以交互使用或是保持獨立，而且互相不影響Controls指定哪些控制是可見的。ImageStatus指定是否在圖像窗口中顯示狀態(tài)信息，默認值是TtrueMaintainaspect默認RealPlayer拉伸所有的片斷來充滿整個圖像窗口，True或FalseSource指定播放的文件或是源文件的地址：任何合法的相對或是完整的URLVisualB