摘自:http://blog.sina.com.cn/s/blog_725dd1010100ug2z.html
一、動態鏈接庫的概念
動態鏈接庫(Dynamic Link Library,縮寫為DLL)是一個可以被其它應用程序共享的程序模塊,其中封裝了一些可以被共享的例程和資源。動態鏈接庫文件的擴展名一般是dll,也有可能是drv、sys和fon,它和可執行文件(exe)非常類似,區別在於DLL中雖然包含了可執行代碼卻不能單獨執行,而應由Windows應用程序直接或間接調用。
動態鏈接是相對於靜態鏈接而言的。所謂靜態鏈接是指把要調用的函數或者過程鏈接到可執行文件中,成為可執行文件的一部分。換句話說,函數和過程的代碼就在程序的exe文件中,該文件包含了運行時所需的全部代碼。當多個程序都調用相同函數時,內存中就會存在這個函數的多個拷貝,這樣就浪費了寶貴的內存資源。而動態鏈接所調用的函數代碼並沒有被拷貝到應用程序的可執行文件中去,而是僅僅在其中加入了所調用函數的描述信息(往往是一些重定位信息)。僅當應用程序被裝入內存開始運行時,在Windows的管理下,才在應用程序與相應的DLL之間建立鏈接關系。當要執行所調用DLL中的函數時,根據鏈接產生的重定位信息,Windows才轉去執行DLL中相應的函數代碼。
一般情況下,如果一個應用程序使用了動態鏈接庫,Win32系統保證內存中只有DLL的一份復制品,這是通過內存映射文件實現的。DLL首先被調入Win32系統的全局堆棧,然后映射到調用這個 DLL的進程地址空間。在Win32系統中,每個進程擁有自己的32位線性地址空間,如果一個DLL被多個進程調用,每個進程都會收到該DLL的一份映像。與16位Windows不同,在Win32中DLL可以看作是每個進程自己的代碼。
二、動態鏈接庫的優點
1. 共享代碼、資源和數據
使用DLL的主要目的就是為了共享代碼,DLL的代碼可以被所有的Windows應用程序共享。
2. 隱藏實現的細節
DLL中的例程可以被應用程序訪問,而應用程序並不知道這些例程的細節。
3. 拓展開發工具如Delphi的功能
由於DLL是與語言無關的,因此可以創建一個DLL,被C++、VB或任何支持動態鏈接庫的語言調用。這樣如果一種語言存在不足,就可以通過訪問另一種語言創建的DLL來彌補。
三、動態鏈接庫的實現方法
1. Load-time Dynamic Linking
這種用法的前提是在編譯之前已經明確知道要調用DLL中的哪幾個函數,編譯時在目標文件中只保留必要的鏈接信息,而不含DLL函數的代碼;當程序執行時,利用鏈接信息加載DLL函數代碼並在內存中將其鏈接入調用程序的執行空間中,其主要目的是便於代碼共享。
2. Run-time Dynamic Linking
這種方式是指在編譯之前並不知道將會調用哪些DLL函數,完全是在運行過程中根據需要決定應調用哪個函數,並用LoadLibrary和GetProcAddress動態獲得DLL函數的入口地址。
1.載入時動態鏈接(load-time dynamic linking),模塊非常明確調用某個導出函數,使得他們就像本地函數一樣。這需要鏈接時鏈接那些函數所在DLL的導入庫,導入庫向系統提供了載入DLL時所需的信息及DLL函數定位。
2.運行時動態鏈接(run-time dynamic linking),運行時可以通過LoadLibrary或LoadLibraryEx函數載入DLL。DLL載入后,模塊可以通過調用 GetProcAddress獲取DLL函數的出口地址,然后就可以通過返回的函數指針調用DLL函數了。如此即可避免導入庫文件了。
所謂的靜態調用DLL是指程序加載的時候直接就把需要的DLL全部加載了,一直到程序運行結束才釋放這些加載的DLL這個就是所謂的靜態加載,動態加載就是需要一個DLL中某個函數的時候加載這個DLL運行完成了這個函數就釋放DLL,這個就是動態加載!
你要靜態加載DLL就用Delphi自己寫一個DLL,並且寫一個引出庫(*.pas的),然后在你的應用程序中包含這個*.pas就根本不用聲明DLL 中那些亂七八糟的引出函數,直接用就可以了,如果該DLL不存在,那么整個應用程序將無法使用,但是動態調用DLL就不同了,就算DLL不在,應用程序仍然可以使用
訪問DLL庫有兩種方式,一種是靜態引用,另一種是動態引用。
用靜態引用這種方法裝入DLL要做兩件事情:為DLL 庫創建一個輸入單元,以及用USES把輸入單元連接到要使用DLL 函數的程序模塊中。為DLL庫創建的輸入單元與普通的單元的區別僅在於:在它的接口處聲明的過程、函數,並不在它的實現部分給出真正的實現代碼,而是用 external關鍵字把過程、函數的實現細節委托給外部DLL模塊。
external命令的使用語法如下:
procedure /function 過程/函數名;external DLL模塊名;
下面給出為上面創建的minmax.DLL庫寫的輸入單元源文件testdll .pas,從中可看出輸入單元 與一般單元的一些差別,代碼如下所示:
unit testdll;
interface
uses
function Min (X, Y: Integer): Integer;
function Max (X, Y: Integer): Integer;
implementation
function Min; external ‘minmax.DLL’;
function Max; external ‘minmax.DLL’;
end.
一個應用程序若想調用minmax.DLL中的函數,只須在其uses語句中加入testdll 單元即可。
動態裝入DLL,要用到Windows的三個API函數。Loadlibrary、Freelibrary和GetprocAddress 。loadlibrary函數用來裝入DLL庫,其調用格式如下:
function loadlobrary (DLLfileName:Pchar): THandle:
當不再需要一個DLL庫時,應調用FreeLibrary函數將其釋放,以空出寶貴的內存資源,其調用格式如下:
procedure FreeLibrary (Libmodule:THandle)
Libmodule 為由LoadLibrary調用得到的DLL庫句柄。在用loadlobrary 函數裝入某個DLL庫和調用FreeLibrary釋放該DLL庫之間的程序段中, 可以使用該DLL庫中的過程和函數,
具體使用方法是:用GetprocAddress函數把DLL庫中函數的地址傳遞給程序中某個函數變量,再用該變量實現DLL函數的調用。GetprocAddress函數聲名如下,
function GetprocAddress (Libmodule:THandle:procname:pchar):TFarProc:
如下例所示:
type
TTimeRec = record
Second: Integer;
Minute: Integer;
Hour: Integer;
end;
TGetTime = procedure(var Time: TTimeRec);
THandle = Integer;
var
Time: TTimeRec;
Handle: THandle;
GetTime: TGetTime;
...
begin
Handle := LoadLibrary('DATETIME.DLL');
if Handle <> 0 then
begin
@GetTime := GetProcAddress(Handle, 'GetTime');
if @GetTime <> nil then
begin
GetTime(Time);
with Time do
WriteLn('The time is ', Hour, ':', Minute, ':', Second);
end;
FreeLibrary(Handle);
end;
end;
在調用動態鏈接庫時應注意, 所需動態鏈接庫須與應用程序在同一目錄或Windows System 目錄下。
靜態調用
Function fun(para:Longint):Longint; stdcall; external 'xxx.dll';
動態調用
loadlibrary,getprocaddress,freelibrary三個函數
記住這幾點兒便可:
EXPORTS 導出
EXTERNAL 導入
STDCALL 傳變量順序
其它的可查幫助.