Gar nicht schlecht... Ich komme zumindest mal voran. Aber wie hast du rausgekriegt, dass der ClassName Mozilla
UIWindowClass heisst? Bei dem vorgeschlagenen Tool kommt da nur MozillaWindowClass heraus.
Aber ich habe jetzt noch ein Problem. Denn mit meinem Quelltext kriege ich es nicht hin, dass auf Druck des 2. Buttons das Fenster wieder maximiert wird:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
VAR h: THandle;
begin
h := findwindow('MozillaUIWindowClass',nil);
IF NOT (h=NULL) THEN
begin
ShowWindow(h,SW_MINIMIZE);
end;
end;
PROCEDURE TForm1.Button2Click(Sender: TObject);
VAR h: THandle;
begin
h := findwindow('MozillaUIWindowClass',nil);
IF NOT (h=NULL) THEN
begin
ShowWindow(h,SW_MAXIMIZE);
end;
end;
end.
Zu Testzwecken habe ich ihn erstmal nicht sonderlich formatiert und auch die Buttons nicht umbenannt.
Gruß
Stefan