Elemente aus TStringList in Laufzeit entfernen

[KetchUp]

Zitat von Delphi.Narium:

Wo erstellst Du die Liste ubd wo lädst Du die Liste?

Im FormCreate?
Dann gehört das Vocabulary.Free ins FormDestroy.

Hab ich jetzt auch so gemacht.

Delphi-Quellcode:

 If Vocabulary.Count > 0 Then

//mach was

  Else
    Begin
      FormDestroy(Vocabulary);
    End;

Sobald die Bedingung nicht mehr erfüllt ist stürzt er aber ab. Er kommt garnicht dazu die Prozedur FormDestroy aufzurufen.