Delphi 4 et TListView : gestion mémoire

Bonjour,

En Delphi 4 j'utilise un objet TListView pour stocker des éléments dans une liste
A chaque élément TListItem de ma liste j'associe une structure complémentaire que je créé dynamiquement lors de la création de chaque TListItem grâce à la propriété Data

Voici un résumé du mon code pour être un peu + clair :

...
type
PInfo = ^TInfo;
TInfo = record
client_id : string;
util_id : string;
end;

...


procedure TForm1.Button1Click(Sender: TObject);
var
ListItem: TListItem;
InfoPtr: PInfo;

begin


ListView1.Items.Clear;
New(InfoPtr);
InfoPtr^.client_id := '0001';
InfoPtr^.util_id := '0002';

ListItem := ListView1.Items.Add;
ListItem.Caption := 'Test';
ListItem.ImageIndex := 0;
ListItem.Data=InfoPtr;
...
end;

Question : suis-je obliger de supprimer manuellement chaque structure pointée par la propriété Data de chaque item avec free ou bien le ListView le fait-il automatiquement à ma place ?
Si oui comment ?

Est-ce pareil avec les TTreeView ?

Merci

Philippe


Question