String in Listview Data ?

[SirThornberry]

Also Beispiel nehmen wir mal einen Integer

Delphi-Quellcode:

var
  meinInt: Integer;
  item: TListItem; 
begin
  meinInt := 5;
  item := Listview.Items.Add; 
  item.Caption := 'Irgendwas';
  item.Data := @meinInt;
end;

würdest du hier erwarten das nach zurückkehren der Funktion Data noch auf einen gültigen Wert zeigt obwohl meinInt eine lokale Variable ist die ihre Gültigkeit mit Verlassen der Funktion verliert?

Bei einem String ist es nicht anders. Wenn man will das Speicher bei Verlassen der Funktion nicht frei gegeben wird muss man dafür sorgen das er nicht im Gültigkeitsbereich der Funktion liegt. Man kann also entweder eine globale Variable nehmen oder dynamisch Speicher anfordern.

Delphi-Quellcode:

var
  meinInt: ^Integer;
  item: TListItem; 
begin
  new(meinInt);
  meinInt^ := 5;
  item := Listview.Items.Add; 
  item.Caption := 'Irgendwas';
  item.Data := meinInt;
end;

Vergessen sollte man auf keinen Fall, dass Speicher den man selbst anfordert auch selbst wieder frei geben sollte. Bevor du also dein Item löschst solltest du auch den Speicher worauf item.Data zeigt wieder freigeben.

Delphi-Quellcode:

var
  meinInt: ^Integer;
  item: TListItem;
begin
  [...]
  meinInt := item.Data;
  dispose(meinInt);

[Edit]doppeltes Wort entfernt und Komma anders gesetzt[/Edit]