ermitteln ob Fenster geöffnet wurde?

[Neutral General]

Ich hab mir die Situation mal nachgebaut :

-3 Formulare.
-2 Buttons.

Wenn ich in den 1.Button das schreibe :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender : TObject)
begin
  if Form2.Visible = true then
   Form3.Show;
end;

und in den 2.Button das :

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender : TObject)
begin
Form2.Show;
end;

dann passiert beim Klick auf Button1 erstmal nichts. Wenn ich dann auf den 2.Button Klicke erscheint Form2 und wenn ich dann wieder auf Button1 klicke dann erscheint Form3, und zwar ohen irgendwelche Fehler

[edit]Rechtschreibfehler korrigiert[/edit]