Danke für die Ideen. Ich hatte aber bereits geschrieben, dass es definitiv an diesen Zeilen liegt!
Hallo,
ich würde mal die StringList wieder freigeben.
Heiko
Delphi-Quellcode:
// Alles initialisieren
Constructor TSettings.Create;
Begin
...
FPopBlock:=TStringList.Create;
FPopBlock.Clear;
..
End;
Procedure TSettings.Load; // <- steht bereits oben
// Alles freigeben
Destructor TSettings.Destroy;
Begin
FPopBlock.Free;
End;
Mehr geht leider nicht! Ich hatte ja geschrieben, dass
Zitat von
Schwedenbitter:
Wenn ich nun die beiden Zeilen mit den Zuweisungen an FPopBlock.Text (=TStringList) auskommentiere, bekomme ich nur noch die letzte Meldung.
Da in meinem Hauptprogramm im OnDestroy ein TSettings.Free steht, wird die TStringList also freigegeben. FastMM meckert diese auch
nicht an!
FastMM meckert den
AnsiString an.
Gruß, Alex