Einzelnen Beitrag anzeigen

Benutzerbild von mleyen
mleyen

Registriert seit: 10. Aug 2007
609 Beiträge
 
FreePascal / Lazarus
 
#18

AW: SetWindowsHookEx ... geht systemweit auch ohne DLL ... ?

  Alt 8. Okt 2010, 08:43
hook.pas D3+ bzw. hier

Welche Hooks gehen so denn nicht?
Ich dachte bisher immer der Trick liegt an der ASM-Prozedur:
Delphi-Quellcode:
function StdHookProc(Code, WParam: WPARAM; LParam: LPARAM): LResult; stdcall; assembler;
asm
  XOR EAX,EAX
  PUSH EAX
  PUSH LParam
  PUSH WParam
  PUSH Code
  MOV EDX,ESP
  MOV EAX,[ECX].Longint[4]
  CALL [ECX].Pointer
  ADD ESP,12
  POP EAX
end;
  Mit Zitat antworten Zitat