在BCB中輕松使用ActiveX控件

2019-11-17 05:24:43

字體：大中小

來源：轉載

供稿：網友

　　在微軟的大力扶持下，越來越多的軟件公司開始支持ActiveX了，這對于喜歡編程的朋友來說可是件值得興奮的事！因為我們可以在程序中很方便地調用外部的OCX文件來實現復雜的功能，而在BCB中只帶有很少幾個ActiveX控件，大部分我們需要我們自己安裝，下面通過對RealPlayer與Flash控件的安裝與應用，讓我們共同來學習ActiveX的組件在BCB中的使用方法：）

一、安裝、導入ActiveX控件
　　C＋＋ Builder在對ActiveX的支持方面可說是做得非常出色，我們可以很方便地導入系統中的ActiveX控件：點擊菜單“Component→Import ActiveX Control...”打開“Import ActiveX”對話框，在“Import ActiveX”列表框中，我們可以看到Windows中所有注冊的AxctiveX控件。在上面的控件列表中選擇你所需要的控件，再點下面的“Install”按鈕就行了！假如控件列表中沒有它，那么說明你要找的控件還沒有在系統中注冊，不要緊，我們可以點擊“Add”按鈕在你的計算機中找到這個OCX文件后再Install，C＋＋ Builder會自動為它注冊。

二、了解ActiveX控件的所有方法
　　一般的ActiveX控件都是沒有幫助文件的，在C＋＋ Builder的IDE環境中我們只能看到它的設計期屬性和事件，那么怎么才能知道它的運行期屬性和方法呢？C＋＋ Builder在導入一個ActiveX控件后會在“E:/PRogram Files/Borland/CBuilder6/Imports”目錄中生成相應的頭文件(＊.h)（當然你的目錄可能不是這樣的），只要把它打開看一下就一目了然了！當然要是在BCB6下，你可以在編程的過種中雙擊代碼編輯器（Code Editor）左半邊的代碼瀏覽器（Code EXPlorer）中的ActiveX控件的名字，在右側代碼區就會查看到她的頭文件，慢慢體會吧：）
　　另外我們還必須了解各種屬性、方法及其參數的含義，那就要編程序來試了，為每個想了解的屬性和方法建立一個菜單項，點擊時用InputBox輸入參數來試驗效果，還可以建立一個狀態欄來顯示與其相關變量的值。
　    三、應用舉例

現在流行的ActiveX控件很多，這里我們拿RealPlayer與flash控件做為例子。

1．RealPlayer控件的使用

如今RealPlayer的流式媒體文件以其強大的視頻壓縮比正逐步悄然興起。RealPlayer Plus播放器也理所當然地成為大家播放RealPlayer格式文件的首選軟件。人家在好的也是別人的，其實我們可以利用C++ Builder打造一個完全符合自己要求的RealPlayer播放器。下面我將向大家介紹如何利用BCB來完成你的RealPlayer。前提你的機器中必須裝有RealPlayer Plus播放器，因為我們要用到其自帶ActiveX控件。
       首先，我們要在C++ Builder中導入所需的ActiveX控件。點擊菜單“Component→Import ActiveX Control...”打開“Import ActiveX”對話框，在“Import ActiveX”列表框中，我們可以看到Windows中所有注冊的AxctiveX控件。選擇其中的“RealPlayer ActiveX Control Library(Version 1.0)”控件。然后單擊“Install”按鈕。
        回到C++ Builder主界面，你會發現在VCL面板中的ActiveX標簽中增加了一個名為RealAudio的組件。我們先把它放入窗體中。不過在默認情況中RealAudio組件沒有視頻播放窗口，也就是只能播放聲音。我我們只要在RealAudio組件的Controls屬性中添加如下代碼：
        IMAGEWINDOW,CONTROLPANEL,STATUSBAR

（其中：IMAGEWINDOW、CONTROLPANEL、STATUSBAR分別表示顯示視頻播放窗口、控制條狀態條）
       添加代碼后，我們可以發現控件外觀已經改變成了視頻播放窗口外形。然后設置Align屬性為alClient，使播放窗口可以隨窗體的變化而變化，方便大家在觀看影視動畫時可以隨意拉動播放窗口大小。
        然后，在窗體中加入TImage組件、TopenDialog（odgRealplay）、TrealPlayer（radMyPlayer）組件各一個，加入兩個Tbutton(BTnOpenClick,btnExitClick)。在Image中導入你喜歡的圖片，以免窗口過于單一，兩個TButton一個設為開始，一個設為結束。括號里的名字是在我的應用程序中給該控件命的名字。
        雙擊btnOpen添加如下代碼：
void __fastcall TForm1::btnOpenClick(TObject *Sender)
{
  if(odgRealplay->Execute())
              {

radMyPlayer->Source=odgRealplay->FileName
radMyPlayer->DoPlay();打開并啟動播放器

}
}
       雙擊btnExit添加如下代碼：
//---------------------------------------------------------------------------
void __fastcall TForm1::btnExitClick(TObject *Sender)
{
Close();　//終止程序運行
}
　

為了在打開一個文件時，便于用戶選擇文件，要將odgRePlayer的Filter屬性設置如下：所有媒體文件(*.rm,*.ram,*.ra,*.swf,*.mp3)*.rm;*.ram;*.ra;*.swf;*.mp3*.**.*。
        按一下F9，找一首歌曲聽一下：）

其它的屬性、方法呢？她的屬性真的很少，而且多數是BOOL型的，除了上面用到的，基本沒有什么讓你不用的了，方法到是很多，但是用到的并不多，到她的頭文件中，你自己看吧：P
        2.Flash控件的使用

首先我們還是要先安裝、導入ActiveX控件：選擇“Component－>Import ActiveX Control”，在上面的控件列表中選擇“ShockWave Flash(Version 1.0)”，再點下面的“Install”按鈕就行了！假如控件列表中沒有它，那么說明ShockWave Flash控件還沒有在系統中注冊，不要緊，我們可以點擊“Add”按鈕在你的計算機中找到這個OCX文件后再Install，C＋＋ Builder會自動為它注冊。
　　
　　導入成功后，C＋＋ Builder會在ActiveX頁中增加一個“ShockWaveFlash”控件，建立一個新工程，在合適的位置放置一個ShockWaveFlash控件，適當調整一下它的大小，然后在它的“Movie”屬性中填上一個你的硬盤上已有的Flash動畫文件名，然后按F9運行，怎么樣，不用寫一行代碼我們就做出了一個能顯示Flash動畫的程序:)
　　為了更好的應用她，首先我們了解一下ShockWaveFlash控件的屬性和方法:

【屬性】AlignMode(int型)和SAlign(WideString型) 控制動畫的顯示位置(把這兩個屬性列在一起說明它們是相互關聯的，改變一個另一個也會相應地改變，以下類似)。取值范圍及含義如下:
　　 0 空        當前位置
　　 1 L         當前位置靠左
　　 2 R         當前位置靠右
　　 3 LR       當前位置居中
　　 4 T         當前位置靠上
　　 5 LT       左上
　　 6 TR      右上
　　 7 LTR    上方居中
　　 8 B         當前位置靠下
　　 9 LB       左下
　　 10 RB    右下
　　 11 LRB  下方居中
　　 12 TB      當前位置垂直居中
　　 13 LTB    靠左垂直居中
　　 14 TRB 靠右垂直居中
　　 15 LTRB 中心位置
　　【屬性】BackgroundColor(int型)和BGColor(WideString型) 設置背景顏色，BackgroundColor為整型值，BGColor為它的HEX字符串。
　　【屬性】Loop(bool型) 是否循環顯示
　　【屬性】Menu(bool型) 是否顯示右鍵菜單，建議設為true，因為它可以完成對Flash動畫的大部分控制工作，而不用我們寫代碼。
　　【屬性】Movie(WideString型) Flash動畫的文件名，可以在運行狀態動態設置，要關閉一個動畫只要把它設為空即可。
　　【屬性】Quality(int型)和Quality2(WideString型) 控制動畫的顯示質量,一般將Quality設為1以獲得高質量的顯示效果。
　　【屬性】ScaleMode(int型)和scale(WideString型) 控制動畫的顯示比例，取值范圍及含義如下:
　　 0   ShowAll 顯示全部
　　 1   NoBorder 無邊框模式
　　 2   ExactFit 拉伸到整個畫面
　　 3   空原始大小
　　【方法】PercentLoaded 返回動畫已經加載的百分比，你可以建立一個進程條(ProgressBar)來顯示動畫加載的進程。
　　【方法】LoadMovie 用于加載網絡上的動畫，動畫文件名為一個BSTR型的URL值，在 C＋＋ Builder 中可以用 AnsiToOLESTR 函數將Char型的字符串轉換成BSTR型。
　　假如你要把你的程序給別人使用，為了防止他沒有安裝或是注冊swflash.ocx文件而導致程序無法運行，你必須把OCX文件也一起附帶上，并在程序中為它在系統中注冊，注冊方法有兩種：
　　方法一：調用外部程序 Regsvr32.exe
　　注冊：   ShellExecute(Handle,NULL,“regsvr32.exe”,“swflash.ocx”,NULL,SW_SHOWNORMAL);
　　反注冊： ShellExecute(Handle,NULL,“regsvr32.exe”,“/u swflash.ocx”,NULL,SW_SHOWNORMAL);
　　方法二：調用控件本身所包含的注冊和反注冊函數
　　每一個OCX控件中都提供了兩個輸出函數“DllRegisterServer”和“DllUnRegisterServer”，可以注冊和反注冊控件本身，我們可以用LoadLibrary()和GetProcAddress()來調用它們，這和動態調用DLL庫的方法是一樣的，我在這里就不多說了。
　   你會問我為什么會知道這些屬性的使用方法及該控件的方法的使用的，先看這個組件的頭文件，然后可以在程序中用InputBox輸入參數來試驗效果，還可以建立一個狀態欄來顯示與其相關變量的值。我用的是這種方法，也許你會有更好的方法，好了，利用上面介紹的屬性和方法，相信你已經很好地使用它了！當然有些我也沒有弄明白，比如我想在RePlayer中實現重復播放，代碼如下：

void __fastcall TFrmMyPlayer::btnReOpenClick(TObject *Sender)

{

        if(odgRealplay->Execute())

        {

                int n,i;

                n=StrToInt(InputBox("播放次數","你想播放多少次呢？","2"));

                        if(n<1)

                        {

                        ShowMessage("次數必須為正整數！");

                        return;

                        }

                        radMyPlayer->Source=odgRealplay->FileName;

                        for(i=1;i<=n;i++)

                        {

                        radMyPlayer->DoPlay();

                        ShowMessage(IntToStr(i));//用來測試是否循環有問題，測試后應該把這個語句去掉

                        }

        }

無論如何也不能循環，我想問題可能出現在DoPlay()上了，可能她里面有一個跳出程序的語句（return——我覺得應該是她），直接跳出循環，因為我也不清楚DoPlay()的原碼是什么，或許不是這樣，是我的程序有些問題，還請大家指教，互相學習嗎：）

沒辦法ActiveX控件就得靠我們自己學習，有什么辦法呢？但到是讓我學習到了很多東西，其實從中也能更好的學習BCB的其它組件了，因為還是有一些共性的。

上一篇：在RichEdit中實現超鏈接

下一篇：正確使用 C++Builder組件縮寫代碼