Dephi中資源文件的應用

領測軟件測試網

IDS_BtnHelp_Caption,"幫助" 
IDS_Help_Shelp,"輸入文字或打開文件后按需要點擊按鈕即可轉換!" 
} 
 第二步是Brcc32編譯為Res文件后用上面的方法得到Dll文件,另外兩個Dll用同樣的方法生成.下面來應用一下: 
 新建一個工程,放上五個Button:BtnOpen,BtnSave,BtnBig5,BtnGb32和BtnHelp.還有一個TComboBox:CbSelect用來選擇語言種類的. 
具體代碼如下: 
unit Unit1; 
interface 
...... 
private 
SHelp: string; 
function SearchLanguagePack: TStrings; 
procedure SetActiveLanguage(LanguageName: string); 
{ Private declarations } 
...... 
implementation 
procedure TForm1.CbSelectChange(Sender: TObject); 
begin 
SetActiveLanguage(CbSelect.Text);//調用相應Dll文件讀取相應字符. 
end; 
procedure TForm1.FormCreate(Sender: TObject); 
begin 
CbSelect.Items.AddStrings(SearchLanguagePack);//搜索當前目錄下所有的Dll文件名稱 
end; 
function TForm1.SearchLanguagePack: TStrings; 
var 

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