Dephi中資源文件的應用

領測軟件測試網

　Var　Hicon:THANDLE; 
begin 
　Hinst:=Loadlibrary(’Icon.dll’); 
　If　Hinst=0　Then　Exit； 
　Hicon:=Loadicon(Hinst,Pchar(Edit1.Text)); 
If　Hicon<>0　Then　Image1.Picture.Icon.Handle:=Hicon; 
　FreeLibrary(Hinst); 
end; 
 如果你的程序想在國際上供使用不同語言的人使用的話,用Dll來存放字符資源將是一個好方法.因為Dll不象ini文件那樣可以被人隨便修改,特別是有時侯如果想保存一些版權信息的話用Dll就再好不過了。比如說你準備開發一個"漢字簡繁體翻譯器"軟件,準備提供Gb32,Big5碼和英文三種語言菜單給用戶,那么你可以試試用Dll來保存字符資源. 
 我們需要建立三個Dll.第一步當然是寫Rc文件,舉Gb32碼為例,內容如下: 
/*MySc.rc*/ 
#define IDS_MainForm_Caption 1 
#define IDS_BtnOpen_Caption 2 
#define IDS_BtnSave_Caption 3 
#define IDS_BtnBig5_Caption 4 
#define IDS_BtnGb32_Caption 5 
#define IDS_BtnHelp_Caption 6 
#define IDS_Help_Shelp 7 
Stringtable 
{ 
IDS_MainForm_Caption,"漢字簡繁體翻譯器" 
IDS_BtnOpen_Caption,"打開文件" 
IDS_BtnSave_Caption,"保存文件" 
IDS_BtnBig5_Caption,"轉換成Big5" 
IDS_BtnGb32_Caption,"轉換成Gb32" 

文章來源于領測軟件測試網 http://www.kjueaiud.com/