请问C的GetModelHandle在delphi中如何实现
引用链接: http://bbs.pediy.com/showthread.php?threadid=37353
HANDLE WINAPI MyGetCurrentProcess(VOID)//替换掉原来的GetCurrentProcess
{
HMODLE hMod=GetModelHandle( "npggNT.des ");
if(hMod!=NULL){
FreeLibrary(hMod); //直接Free掉它
}
UnhookGetCurrentProcess(); //是我们要保护的线程调用就恢复函数头
HANDLE hProcess=GetCurrentProcess();//让它调用
RehookGetCurrentProcess();//重新挂钩
return hProcess; //返回调用结果
}
delphi好象没有GetModelHandle？请问上面代码中的GetModelHandle()在delphi中如何实现？

[解决办法]
hInstance
[解决办法]
GetModuleHandle在DELPH中的Windows.pas中已经声明过了。