BC++ Builder中各種資源的利用    資料來源:http://go5.163.com/yarrows/tips/cbc_08.htm     在編寫程序的過程中，經常要用到各種資源。比如說，想給自己的程序換個 自己的圖標，使用一些活潑的光標來增加趣味性，播放一些聲音和動畫文件，或者使用別人寫好的程序來實現某個功能。我們往往希望將這些資源 直接放到EXE文件中以形成一個單獨的可執行文件，這就存在一個如何在運行時訪問和使用這些資源的問題。在編譯期間，這就要用到一種文件，以.rc結尾的資源定義文件。    一：RC文件     rc文件是個文本文件，它的格式很簡單，按如下格式定義：     資源標識符資源類型資源的路徑以下的rc文件定義了一個聲音資源，兩個光標資源，三個圖標資源和一個exe 文件資源。    src1.rc: S1 WAV wav1.Wav C1 CURSOR cursor1.cur C2 CURSOR cursor2.cur I1 ICON icone1.ico I2 ICON icone2.ico I3 ICON icone3.ico unzip EXEFILE pkunzip.exe     你可以將寫好的rc文件加到你的project(項目）中。你也可以手工將 其編譯為供程序直接使用的二進制資源文件（.res文件）。在BCB3.0中，可以使用命令行：brcc32src1.rcsrc1.res。    二：資源的使用     下面，按照使用的簡繁程度，依次說明各類資源的使用方法。需要說 明的是，下面講述的使用方法，在別的編譯環境下（BC,VC等）也是一樣的。 1：建立一個新的項目 啟動BCB3.0,選FILE->new->Application建立一個新的項目。在project->AddtoProject中，加入寫好的src1.rc文件。當然，那些聲音、光標、圖標文件都應該存在。這時，我們有了一個空的窗體(Form)。 2：能夠利用windowsAPI函數直接訪問的資源有：    圖標LoadIcon（） 光標LoadCursor（） 加速表LoadAccelerators（） 位圖LoadBitmap（） 菜單LoadMenu（） 字符串LoadString（）     前五個API函數使用方法都一樣，帶兩個參數。第一個參數指明資源的存放地，第二個參數為rc文件中資源的標識。字符串LoadString除這兩個參數外，還有兩個參數，指明字符串緩衝區的地址和大小。下面的一小段程序示範了圖標和光標的使用。在Form上放置一個按紐，在其OnClick事件中加入以下代碼：

void __fastcall TForm1::Button1Click(TObject *Sender) {
// 將光標形狀改為自己定義的：
Screen- >Cursors[crDefault] = LoadCursor( HInstance, "C1");
// 將圖標改為自己定義的：
Icon = new TIcon() ;
Icon- >Handle = LoadIcon(HInstance,"I1");
Application- >Icon = Icon ;
}

其中的HInstance指示資源所在地為執行文件。編譯執行後，點擊該按紐， 光標和圖標都會換成新的。 3：能夠通過windowsAPI使用的資源 對於聲音、動畫等文件，可以使用windowsAPI函數播放。但是不象上面幾 種資源，需要遵循一定的步驟。如下所示，依次調用FindResource,LoadResource,LockResource函數，來播放一個Wav聲音文件。(當然，獨立的聲音文件可以在運行時直接播放。我們這裡討論的是將wav文件編譯進EXE文件的情況） 在Form上放置第二個按紐，在其OnClick事件中加入以下代碼：

void __fastcall TForm1::Button2Click(TObject *Sender)
//定義資源塊
char *wav_handle ;
//裝入 Wav文件
HRSRC h = FindResource(HInstance,"S1","WAV");
HGLOBAL h1 = LoadResource(HInstance, h);
wav_handle = (char *)LockResource(h1);
//播放 Wav文件。由於Wav文件裝載在內存中，
sndPlaySound函數要用 SND_MEMORY參數
sndPlaySound(wav_handle, SND_MEMORY | SND_SYNC);
}

編譯執行後，點擊該按紐，會播放一次聲音。對於動畫等文件，使用方式類似Wav文件。（BCB提供了一個TAnimate控件，可以播放無聲的Avi文件） 4：不能直接通過windowsAPI使用的資源 此種資源不能夠由windowsAPI直接訪問和執行。但是，我們可以用一種 變通的方法來使用它。下面示範如何使用pkunzip.exe，思路如下：程序運行時，將pkunzip.exe從EXE文件中分離出來，放在臨時目錄下，用ShellExecute()執行它。 在FORM上放置第三個按紐，在放置兩個Edit,用來輸入pkunzip.exe 的參數。

void __fastcall TForm1::Button3Click(TObject *Sender)
{
char exefile[100], tmppath[100] ;
unsigned long ret ;
//檢查 pkunzip.exe是否已經存在
GetTempPath( 100, tmppath ) ;
strcpy( exefile ,(AnsiString(tmppath) 
AnsiString("\\pkunzip.exe") ).c_str() ) ;
ret = GetFileAttributes( exefile ) ;
if( ret == 0xffffffff ) { //不存在，則分離出 pkunzip.exe
TResourceStream &rs = *new TResourceStream(
(int)HInstance, AnsiString("unzip"),"EXEFILE" ) ;
rs.SaveToFile( AnsiString(exefile) ) ;
delete &rs ;
}

//執行 pkunzip.exe // Edit1- >Text和 Edit2- >Text分別為運行時 輸入的zip文件名和目標文件目錄。

ShellExecute(HInstance, "open", exefile, \
(AnsiString("-d ")   Edit1- >Text  
" "   Edit2- >Text).c_str(), \
tmppath, SW_HIDE ) ;
Application- >MessageBox("解壓縮完成", "OK", IDOK ) ;
}

此種方法實際上是用時間和空間來換取便利性，有一定的參考價值。例如，DynaDoc的免費分發版本，就是將真正的執行程序壓縮後放在一個有解壓縮功能的“殼”中。運行時，首先是“殼”運行起來,將真正的執行程序解壓縮到臨時目錄，然後去運行它。如果你的程序含有大量的BMP,WAV文件，不妨一試，能讓你的程序減肥不少。 時間就是金錢---[ 發問前請先找找舊文章] 發表人 - axsoft 於 2002/07/25 12:15:00