Einzelnen Beitrag anzeigen

Benutzerbild von Jan
Jan

Registriert seit: 24. Sep 2002
Ort: Magdeburg
491 Beiträge
 
Delphi 7 Enterprise
 
#11

Re: verliere Zeiger bei setlength(array,length(array)+1)

  Alt 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.
  Mit Zitat antworten Zitat