Hallo Metal_Snake2,
Du musst im hook irgendwo an das
Handle Deines Programms kommen, damit SendMessage überhaupt eine Wirkung hat (oder steckt das schon in
ApplicationHandle ?). Um Dir
IPC zu ersparen, kannst Du das
Handle des
Spys ja irgendwo in der Registry ablegen. Ist vielleicht nicht all zu schön, aber der Zweck heiligt ja bekanntermaßen die Mittel
. Außerdem musst Du aufpassen, dass der Hook in Deinem
Spy keine Nachrichten versendet, sonst wirst Du endlos mit Nachrichten bombardiert...
Was Du mit
HandleMessage machst, verstehe ich nicht? Ich hätte das wie folgt gelöst:
Delphi-Quellcode:
[...]
private
procedure WndProc(var Message:TMessage); override;
[...]
procedure TForm1.WndProc(var Message:TMessage);
begin
if Message.Msg = WM_COPYDATA then
begin
Memo1.Lines.Add('WM_COPYDATA');
[...]
end;
inherited;
end;
Grüße peanut.