Einzelnen Beitrag anzeigen

bcvs

Registriert seit: 16. Jun 2011
668 Beiträge
 
Delphi 12 Athens
 
#15

AW: (Formular-)Handling größerer Projekte

  Alt 12. Mär 2015, 11:23
Aber, ich hab doch ausgenommen von modalen Fenstern i.d.R. keinen Close-Button. Darum die Frage, wenn ich denn schon Release verwenden soll, wo? Und wo setzt man die Form-Variable auf nil?
Genau für diesen Fall gibt es ja das OnClose-Ereignis, damit du da nochmal eingreifen kannst. Und ob du Release selbst aufrufst oder nicht ist Geschmackssache.
Das hier:
Delphi-Quellcode:
procedure TFrmClient1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree;
  FrmClient1 := nil;
end;
bewirkt genau das selbe wie:
Delphi-Quellcode:
procedure TFrmClient1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caNone;
  FrmClient1 := nil;
  Release;
end;
Ich habe hier übrigens auch wie du Forms, von denen es nur eine Instanz geben kann. Dabei prüfe ich deren Existenz auch über die Form-Variablen. Bei allen anderen Forms (modale Dialoge etc) lösche ich die von Delphi automatisch erzeugte Form-Variable immer als erstes raus.
  Mit Zitat antworten Zitat