Einzelnen Beitrag anzeigen

HPB

Registriert seit: 2. Jun 2008
365 Beiträge
 
Delphi XE7 Professional
 
#1

Formular mit ESC schliessen

  Alt 9. Sep 2017, 17:04
Guten Tag Delphianer,
ich erzeuge im OnCreate-Ereignis eines Formulars verschiedene Objekte.
Delphi-Quellcode:
  Adresse := TOAdressen.Create;
  KrankenBesuch := TOKrankenBesuche.create;
  DoppelMitglied := TOLODoppelMitglied.create;
  BrAnekdoten := TOAnekdoten.Create;
  SchluesselVerw := TOLogeSchluesselVerwaltung.create;
  BrSonstVerein := TOBrSonstigeVereine.Create;
Diese gebe ich im OnDestroy-Ereignis des Formulars wieder frei.
Delphi-Quellcode:
  Adresse.Free;
  BrAnekdoten.Free;
  KrankenBesuch.Free;
  DoppelMitglied.Free;
  SchluesselVerw.Free;
  BrSonstVerein.Free;
Ich möchte nun mit der Taste-ESC das Formular schliessen:
Wenn ich im FormKeyDown-Ereignis den Code
Delphi-Quellcode:
 if Key = VK_ESCAPE then
 Close;
hinzufüge wird das Formular auch geschlossen und die Anwendung kehrt zum
Hauptfenster zurück.
Werden damit aber auch die Objekte freigegeben?
Welches ist die beste Vorgehensweise für so etwas?
Vielen Dank für Eure Hilfe im Voraus.
  Mit Zitat antworten Zitat