Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
Delphi 10 Seattle Enterprise
|
AW: In Hook auslösender Prozess ermitteln
16. Dez 2013, 17:00
Aber wie komme ich an die PID, welche den Hook (oder von mir aus die DLL) aufruft?
Delphi-Quellcode:
var
Wnd: HWND;
ProcessId,
ThreadId: DWord;
begin
Wnd := GetForegroundWindow;
ThreadId := GetWindowThreadProcessId(Wnd, ProcessId);
{ .. }
Zwar um 3 Ecken rum, aber es sollte funktionieren. Zumindest solange dein Hook Prozess unter der selben SessionId und auf dem selben Desktop läuft, wie das aktuelle Vordergrundfenster.
Das wird schwierig, denn das soll ja in einem Dienst laufen ...
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
|