Schaue dir mal die Komponente
TJvShellHook aus der JVCL an.
Das Event OnShellMessage kannst du dann verarbeiten:
Delphi-Quellcode:
procedure TForm1.ShellHookDispatcher(Sender:TObject; var Message:TMessage);
begin
case Message.WParam of
HSHELL_WINDOWCREATED:
// Fenster erstellt
HSHELL_WINDOWACTIVATED,
HSHELL_RUDEAPPACTIVATED:
// Der nächste Sprung hierher nach
// HSHELL_WINDOWCREATED bedeutet,
// dass das Fenster bereit ist...
end;
end;
In Message.LParam ist stets das Window-
Handle enthalten.
Achso, die obige Prozedur muss nur aktiviert werden, bevor du das externe Programm startest.