Einzelnen Beitrag anzeigen

MikeS

Registriert seit: 3. Mai 2003
Ort: München
157 Beiträge
 
Delphi 7 Professional
 
#4

Re: Modales Fenster schliessen

  Alt 27. Jan 2004, 16:08
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!

Mike Schröder
Fleiß kann man vortäuschen, faul muss man schon selber sein!
  Mit Zitat antworten Zitat