Delphi中多媒體組件使用解析(1)

字號(hào):

Delphi是美國Borland公司推出的一個(gè)十分優(yōu)秀的軟件開發(fā)平臺(tái)。它以其強(qiáng)大的開發(fā)功能在眾多的開發(fā)環(huán)境中獨(dú)占鰲頭,尤其是它在多媒體軟件的開發(fā)上更是技高一籌。在Delphi的組件板system頁上有一個(gè)稱為MediaPlayer的組件,它是多媒體軟件制作的核心,以下將就MediaPlayer組件的使用作以詳解。
    MediaPlayer組件主要是用于控制MCI(MediaControlInterface)設(shè)備,該組件提供了一系列按鈕用于控制諸如CD-ROM、MIDI、VCR等多媒體設(shè)備,這些多媒體設(shè)備可以是硬件也可以是軟件。這些按鈕在缺省情況下從左到右依次為:Play(播放)、Pause(暫停)、Stop(停止)、Next(下一個(gè)曲目)、Prev(前一個(gè)曲目)、Step(步進(jìn))、Back(后退)、Record(錄音)、Eject(彈出媒體)等9個(gè)功能按鈕。在用戶自己開發(fā)的程序中,多媒體設(shè)備可以有兩種方法實(shí)現(xiàn)以上9個(gè)功能,一種方法是將MediaPlayer組件放在窗體上,在程序運(yùn)行時(shí)單擊相應(yīng)按鈕;另一種方法是用與按鈕相應(yīng)的“方法”(Method)來實(shí)現(xiàn)這些功能。
    以上9個(gè)按鈕在視圖和功能上均允許進(jìn)行選擇,使用者可以通過改變objectinspector(對(duì)象監(jiān)視器)的屬性頁中的+VisibleButtons和+EnabledButtons屬性來實(shí)現(xiàn),使用者只需要雙擊此屬性使其上的“+”變成“-”,然后在下面新出現(xiàn)子屬性表中將相應(yīng)的子屬性的值賦給true/false即可。
    MediaPlayer組件有許多的屬性(property)和方法(method)。屬性是程序設(shè)計(jì)時(shí)在objectinspector(對(duì)象監(jiān)視器)中進(jìn)行設(shè)置的,它無需開發(fā)程序的人自行編碼(當(dāng)然也可以在代碼中進(jìn)行屬性設(shè)置);而方法是程序開發(fā)者在程序代碼中必須用到的過程和函數(shù)等。在正常情況下,Delphi會(huì)將常用的屬性設(shè)置為缺省值,這些值對(duì)于一般的開發(fā)來說已經(jīng)足夠了,但是有一些關(guān)鍵的屬性值卻是必須由使用者自己給定的。其中最重要的幾個(gè)屬性及其使用說明見下表:
    MediaPlayer組件方法除了前面提到的對(duì)應(yīng)9個(gè)按鈕的方法外,Delphi還提供了MediaPlayer組件的一些很重要的方法,如open、save、rewind、resume、pauseOnly及close等,它們的使用詳情如下:
    1.open方法:
    open方法用于打開一個(gè)多媒體設(shè)備。在調(diào)用該方法之前,必須確保在MediaPlayer組件的DeviceType(設(shè)備類型)屬性中設(shè)定正確的多媒體設(shè)備類型。
    【示例】以下代碼用于在程序開始運(yùn)行時(shí)就播放CD音樂。
    procedureTForm1.FormCreat(Sender:Tobject);
    begin
    with MediaPlayer1 do
    begin
    DeviceType:=dtCDAudio;
    Visible:=False;
    open;
    play;
    end;
    end;