Hallo,
ich habe hier im Forum und auch anderswo bereits gesehen, dass man mittels FindWindow() und entsprechenden weiteren Befehlen z.B. Tastendrücke an Programmfenster senden kann. Auch ich möchte gern den FireFox fernsteuern. Ich habe dort Datenbankprogramme mit php laufen. Hin und wieder benötige ich Funktionen, welche ich dann mit externen Programmen machen muss.
Mein Ziel ist es jetzt, unmittelbar vor dem Beenden eines solchen Programm-Moduls das geöffnete Fenster des FireFox zu aktualisieren. Ich mache Änderungen im Dateisystem, die in entsprechende Listen geladen werden müssen. Mein Problem ist aber, dass der Fenstertitel variabel ist. Es wird dort die Vorgangsnummer angezeigt. Z.B. "Datenbank - 6000/08 - Mozilla Firefox" oder "Datenbank - 5500/08 - Mozilla Firefox". Wenn ich das entferne, werde ich von den Mitarbeitern gehauen.
So funktioniert es leider nicht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Wnd:HWND;
begin
Wnd:=FindWindow(nil,'* Mozilla Firefox');
if Wnd <> 0 then
begin
SetForeGroundWindow(Wnd);
keybd_event(VK_F5,0,0,0);
keybd_event(VK_F5,0,KEYEVENTF_KEYUP,0);
end;
end;
Gibt es eine (andere) Möglichkeit, mein Ziel zu erreichen?
Gruß, Alex