Loadstring(hdll, 6, MyChar, 254);
BtnHelp.Caption := MyChar;
Loadstring(hdll, 7, MyChar, 254);
SHelp := MyChar;
Freelibrary(hdll);
Application.Title := Self.Caption;
//------------------------
BtnOpen.Visible := True;
BtnSave.Visible := True;
BtnBig5.Visible := True;
BtnGb32.Visible := True;
BtnHelp.Visible := True;
//------------------------
end;
procedure TForm1.BtnHelpClick(Sender: TObject);
begin
Application.MessageBox(Pchar(SHelp), ’Http://lovejingtao.126.com’, MB_ICONINFORMATION);
end;
end.
可能你會說,這種方法還不如我自己在程序中直接定義三種具體的值來的方便.甚至我自己自定義一個結構好了,用不著用DLL那么麻煩的。但是如果你的程序要用的字符很多呢?比如說Windows操作系統,本身就有簡體中文,繁體中文,英文等等版本,用Dll的話只要直接替換DLL即可,而不用每發行一個版本就打開代碼來修改一次。這樣一來可以大大減少工作量和出錯的機會.說到這里,再多說一句:Windows系統本身很多Dll帶有了圖片等資源,我們可以在程序中直接調用,這樣一來我們的EXE也可以減少不少!當然最小的方法是實時生成技術.老外曾經寫了一個67KB的程序就是利用了這個方法.感興趣的朋友可以到http://go4.163.com/lovejingtao/ha1.exe下載.
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/