Einzelnen Beitrag anzeigen

Benutzerbild von Airblader
Airblader

Registriert seit: 29. Okt 2004
Ort: Geislingen an der Steige
742 Beiträge
 
#27

Re: Problem bei TStringlist Freigabe

  Alt 23. Dez 2005, 17:54
Ich hab meinen Fehler gefunden!

Schau mal, ob du was ähnliches im Code hast.

Ich hatte es so:

Delphi-Quellcode:
SetLength(array, ZAHL);

for i:=0 to ZAHL do
  array[i] := ...;
Nu so und es geht:

Delphi-Quellcode:
for i:=0 to Zahl do
begin
  SetLength(array, length(array)+1);
end;
Also es war vllt. nur ein Index zu wenig erzeugt... (wenn ich auch nich verstehe, warum keine AV kam)

Und wenn ich es nun so wie bei Methode 1 richtig machen will:

SetLength(array, ZAHL + 1); air
Ingo Bürk
Es nimmt der Augenblick, was Jahre geben.

Johann Wolfgang von Goethe
  Mit Zitat antworten Zitat