Thema: Delphi Form erzeugen / löschen

Einzelnen Beitrag anzeigen

Benutzerbild von Jelly
Jelly

Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
 
Delphi 2007 Professional
 
#6

Re: Form erzeugen / löschen

  Alt 12. Sep 2004, 15:51
Hi,
du kannst im OnClose Event deiner frmEing Form folgendes reinschreiben:
Delphi-Quellcode:
procedure TfrmEing.FormClose(Sender: TObject; var Action: TCloseAction);
begin
     Action := caFree ;
end;
Dann gibst du den Speicher bei Schließen deiner Form wieder frei.

Aber du hast noch einen Denkfehler, in der Art, wie du deine Forms erzeugst mit
Delphi-Quellcode:
frmEing := TfrmEing.Create (self);
frmEing.Show;
da du bei jedem Aufruf deiner Variablen frmEing einen neuen Wert gibst, und du somit keinen Zugriff mehr auf bereits existierende Instanzen von TfrmEing hast. Was dir da übrig bleibt, ist entweder alles in einem Array zu speichern, oder erst gar nicht versuchen, den Pointer zu speichern, und dein Form einfach wie folgt anzuzeigen:
Delphi-Quellcode:
with TfrmEing.Create (self) do begin
   Show;
end ;
Gruß,
Tom
  Mit Zitat antworten Zitat