Delphi中增強程式的不同Windows版本的相容性技巧

標籤：

在開發過程中，一個程式(DLL/EXE)經常需要同時相容不同版本的Windows(XP、WIN7 ...)，但是由於新版本的Windows某些API在舊版本不存在，如果程式使用external引入API，則會導致在舊版本Windows中運行時提示“找不到某某程式檔案路徑...”、"無法載入DLL..."，因為在舊版本Windows中運行EXE或DLL，系統會先檢測external引入的API，如果找不到某個API，系統會直接報錯，無法運行，這時候Delphi提供了關鍵字 delayed來修飾external

如下面的API

function RegDeleteKeyEx; external advapi32 name ‘RegDeleteKeyExW‘ delayed;
function RegDeleteKeyExA; external advapi32 name ‘RegDeleteKeyExA‘ delayed;
function RegDeleteKeyExW; external advapi32 name ‘RegDeleteKeyExW‘ delayed;

增加delayed意味著只有在真正第一次調用該API時，才去載入該DLL和API，當然這隻是字面上的意思，

實際上(大概原理)Delphi是採用了HOOK的方法在系統載入EXE或DLL時攔截了LoadLibrary和GetProcAddress等(詳情可查看SysInit單元)，屏蔽了原來系統將會彈出的異常並結束進程的動作。

Delphi中增強程式的不同Windows版本的相容性技巧