Du müsstest mal begin-end-Blöcke setzen. Beispiel:
Zitat:
Delphi-Quellcode:
for I := 0 to 3 do
KPolygon := Tstringlist.Create;
Du erzeigst hier 4 Stringlisten, wobei die entsprechende Variable mit jeder neuen Instanz überschrieben wird, d.h. die vorherigen 3 kannst Du gar nicht freigeben -> Speicherleck. Außerdem ist die korrekte Syntax eines Speicherschutzblocks
Delphi-Quellcode:
Obj := TKlasse.Create;
try
Obj.TuWas;
finally
Obj.Free;
end;
Also das try hinter die Instanzierung.
[edit] Wo wird denn SL wieder freigegeben? Und der ID-Parameter wird zumindest beim Speichern nicht benutzt, wozu ist der gut? [/edit]