Exception bei Formular schliessen

[xthing]

Hi Leute,

ich erstelle ein ModalFormular in der Klasse TForm1 zur Laufzeit und lass es mir anzeigen:

Delphi-Quellcode:

procedure TForm1.NewFirmBtnClick(Sender: TObject);
begin
FirmForm := TForm2.Create(self);
FirmForm.Show;
end;

Nach der Arbeit mit FirmForm, will ich es abbauen:

Delphi-Quellcode:

procedure TForm2.CloseBtnClick(Sender: TObject);
begin
form2.destroy; //form2.close?
end;

Dabei kommt es zu einer Exception.

Kann mir jemand helfen?

Danke im voraus.

Grüsse
xthing

[Angel4585]

Also wenn du ein Modales Formular willst, musst du es mit

Delphi-Quellcode:

Formular.ShowModal

Öffnen, und mit

Delphi-Quellcode:

Formular.Modalresult:=mrok//oder andere Modalresults

Schliessen ;)

[RavenIV]

wie schon oft hier erwähnt, soll man zum Schliessen eines Fensters nicht Destroy benutzen, sondern Form.Close.

Bei Form.Destroy werden einige Dinge nicht erledigt, die bei Form.Close gemacht werden.
Bei Fragen, in der Delphi-Hilfe nachschauen.

Achso, ShowModal:

Zitat:

Um ein modales Formular zu schließen, setzen Sie seine Eigenschaft ModalResult auf einen Wert ungleich 0.

[xthing]

Danke aht geklappt.
Gruss
xthing