Modales Fenster schliessen

[MikeS]

moin zusammen!

es gibt die möglichkeit von dem formular aus das du anzeigst dieses wieder zu
schließen indem du dem modalresult eine wert ungleich null zuweist! steht
übrigens auch in der OH!

Delphi-Quellcode:

procedure TForm2.FormCreate(Sender: TObject);
begin
      timer1.Enabled := true;
end;

procedure TForm2.Timer1Timer(Sender: TObject);
begin
      form2.ModalResult := 1; // ungleich 0
end;

form2 ist das formular das modal angezeigt wird!
ich habe einen timer darauf gepackt der bei erzeugen aktiviert wird und nach ablauf der zeit
Modalresult auf 1 setzt! damit schließt sich das fenster wieder!

wenn ich dein problem nicht falsch verstanden haben sollte dann sollte dir das helfen!