如何在dephi中使用dephi还未包含的windows api(dephi未封闭过的)，举例说明

Question

就像Windows单元那样，重新声明一下。
www.delphi-jedi.org有很多声明的单元，比如TAPI等。

Answer 1

利用内嵌汇编.
首先用GetProcAddress函数取得相应函数的地址,然后写一段内嵌汇编代码调用该地址指针所指向的函数.
详见岳庆生所著清华出版的"Delphi高级编程技巧".

Answer 2

可以声明：
例如未包含MessageBox可以声明为：
function MessageBox; external user32 name 'MessageBoxA';
function MessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer; stdcall;