初始化可以
library dll2;
beginHookOn(WH_MOUSE);end.退出在哪里写呢? 只能在这dll里面写了
VC 的dll都有退出事件啊 case DLL_PROCESS_DETACH:MessageBox(NULL,"进程被停止","title",MB_OK);
library dll2;
beginHookOn(WH_MOUSE);end.退出在哪里写呢? 只能在这dll里面写了
VC 的dll都有退出事件啊 case DLL_PROCESS_DETACH:MessageBox(NULL,"进程被停止","title",MB_OK);
你写释放的方法,公布出来!
调用下这个方法就可以了!
procedure DLLEntryPoint(dwReason: DWord);
begin
case dwReason of
DLL_PROCESS_ATTACH: ShowMessage( 'Attaching to process ');
DLL_PROCESS_DETACH: ShowMessage( 'Detaching from process ');
DLL_THREAD_ATTACH: MessageBeep(0);
DLL_THREAD_DETACH: MessageBeep(0);
end;
end; begin
DllProc := @DLLEntryPoint;
DLLEntryPoint(DLL_PROCESS_ATTACH);
end.