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]