Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
Delphi 7 Enterprise
|
Re: verliere Zeiger bei setlength(array,length(array)+1)
7. Dez 2004, 16:55
Zitat von maximov:
Genau
Zitat:
Code:
Tstringlist(form1.listview1.Items[form1.ListView1.Items.Count-1].Data)
ist viel besser, wobei die referenzen dann nix mehr mit dem array zu tun haben...was auch ganz gut ist
//edit:
PS:
Schreib es so:
Delphi-Quellcode:
with form1.ListView1 do
TStringList(Items[pred(Items.Count)].Data)
Das klappt ja wie gesagt nicht, da bekomme ich eine exception, wenn ich das schreibe:
Delphi-Quellcode:
with form1.ListView1 do
showmessage(TStringList(Items[pred(Items.Count)].Data).strings[0]);
Jan
Jan Wenn die Sonne der Kultur tief steht, werfen auch kleine Gestalten lange Schatten.
|