Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#6

AW: Klick simulieren ?

  Alt 24. Mär 2011, 23:49
Danke Michael für das Stickwort
Nun funktioniert aber fehlt nur eine Sache :
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Hide;
  ShowWindow(Application.Handle, SW_HIDE);
end;
Was fehlt nun, es soll ein Fenster in Desktop aktviert werden
Das Programm wird mit dem Code zwar richtig in Taskbar unten wie Gewünscht minimiert, aber kein Fenster in Desktop, dass den Fokus bekommt !

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Hide;
  ShowWindow(Application.Handle, SW_HIDE);
end;
Aber wenn ich das Programm durch das "-" minimiere dann bekommt das letzte aktivierte Fenster automatisch den Fokus
What to do ?

//SW_HIDE : Hides the window and activates another window. Allerdings, ich habe als Test wieder ein neues Projekt erstellt, dann ging
Also was konnte das Problem sein, dass es bei meinem Programm nicht gut funktioniert ?

Editiert :
Lösung gefunden Leute :
Das Problem lag an neben Forms, die sichtbar sind.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
// zuerst alle sichtbare Forms unvisible machen
  Form1.Hide;
Form2.Hide;
Form3.Hide;
// FormX.Hide;
  ShowWindow(Application.Handle, SW_HIDE);
end;

Geändert von thomas2009 (25. Mär 2011 um 00:59 Uhr)
  Mit Zitat antworten Zitat