Problem mit Stringlists (.free)

[florpp]

Ich bin zurzeit bei einem Programm dabei ein wenig mit Stringlists zu hantieren.

Delphi-Quellcode:

...

var
  Form1: TForm1;
  sc   : TStringlist;
  tx   : TStringlist;
  ms   : TStringlist;

...

procedure TForm1.FormShow(Sender: TObject);
begin
  sc := TStringlist.Create;
  tx := TStringlist.Create;
  ms := TStringlist.Create;
end;

...

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  sc.free;
  tx.Free;
  ms.Free;
end;

Dabei ist jedoch beim schließen ein Fehler aufgetaucht:

[Klaus01]

Deine Aufrufe von *.free sollte nicht in die FormCloseQuery
sondern nach onClose.

In FormClosQuery sollte nur die CanClose Variable entsprechend gesetzt werden.

Grüße
Klaus

[florpp]

:gruebel: In OnClose passiert genau das selbe...

[Kroko1999]

Erstellen im FormCreate-Ereignis und zerstören im FormDestroy-Ereignis ist imho die beste Lösung!

[DeddyH]

Bei mir tritt der Fehler nicht auf. Gibst Du die Stringlisten noch an anderer Stelle frei? Falls ja, dann ersetz mal ggf. StringList.Free durch FreeAndNil(StringList)

[edit]

Zitat:

Zitat von Kroko1999

Erstellen im FormCreate-Ereignis und zerstören im FormDestroy-Ereignis ist imho die beste Lösung!

Wenn er schon globale Variablen benutzt, könnte er auch initialization und finalization verwenden, das wäre IMO noch besser. [/edit]

[Kroko1999]

dann sollte er die globalen in lokale Klassen-Variablen umwandeln!

[DeddyH]

Sehe ich genauso.

[taaktaak]

Moin, Moin.

Ich gebe die Instanzen zwar auch immer am Programmende frei; trotzdem die folgende (vielleicht naive) Frage: Welche Auswirkungen hat es denn, wenn man das nicht tut? Bleibt der Speicher dann für Windows reserviert und ist bis zum nächsten Systemstart nicht mehr nutzbar?

Gruß Ralph

[Die Muhkuh]

Nein, Windows räumt da schon selbst auf.

[sirius]

Und vor allem räumt zuerst Delphi bzw. der Speichermanager auf.