Einzelnen Beitrag anzeigen

meggles
(Gast)

n/a Beiträge
 
#4

Re: [n] Formulare erzeugen - das geht ja noch, aber schliess

  Alt 2. Feb 2004, 13:18
Hallo,
sorry, wenn ich das jetzt zu schwammig formuliert habe:

Aaaalso, im Hauptfenster erzeuge ich z.b. ein Fenster füür "neue Email":
Delphi-Quellcode:
procedure TfHaupt.AcNeueEmailExecute(Sender: TObject);
var vfNeueEmail : TfEmail;
begin
  vfNeueEmail := TfEmail.Create(Application);
  vfNeueEmail.Show;
end;
Das kann ich natürlich auch mehrmals hintereinander machen.
Jedes erzeugte Email-Fenster hat eine Aktion "Speichern und schließen":

Delphi-Quellcode:
procedure TfEmail.ActspeichernExecute(Sender: TObject);
begin
  //email-insert (bei noch nicht gespeicherter Email)
  //email-update (wenn schon mal gespeichert wurde)
  // und jetzt natürlich das Fenster schließen:
  self.Free;
end;
self.free direkt bringt keine Zugriffsverletzung - die kommt in dem Moment, wo ich diese Prozedur verlasse. Das kommt, befürchte ich von der onCloseQuery, mit der ich ja auch beim manuellen Schließen der Form fragen muss, ob gespeichert werden soll.
Wie also kann ich das Formular vonhand schließen, ohne dass beim Schließen noch ein Ereignis ausgelöst wird...?
Danke!
Simon
  Mit Zitat antworten Zitat