用GetprocAddress得到地址后该如何调用这个函数

http://topic.csdn.net/t/20040831/18/3327148.html //定义函数指针 VC++

 

GetProcAddress返回的是一个函数地址的指针。声明：FARPROC WINAPI GetProcAddress(__in HMODULE hModule, __in LPCSTR LpProcName);你应该知道你要的函数的类型是什么，可以用typedef的方法定义函数类型，然后定义一个这种类型的变量，你得到地址后，
将地址的类型转换并存到那个变量中就行了。

Delphi 呢？ 为什么要用Var声明一个函数啊？

补充：

procedure ShowTip; stdcall;
type
    TMessageBoxA = function (hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer; stdcall;
var
    hMod: HMODULE;
    pFuncAddr: Pointer;
begin
    hMod := GetModuleHandle(PChar('user32.dll'));
    pFuncAddr := GetProcAddress(hMod, PChar('MessageBoxA'));
    if pFuncAddr <> nil then
    begin
        TMessageBoxA(pFuncAddr)(0, PChar('显示一个消息而已'), PChar('当然成功啦'), 64); //还可以这样调用；
    end;
end;

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/god00/archive/2011/04/05/6302433.aspx