C++ Builder / Liste view avec données associées (data)

1 - Un petit morceau de code

// - Cette méthode permet la destruction des objets associés
void __fastcall TfwPrincipale::DeleteListeData( TListView * lstSource )
{
TListItem * ptListItem;

for ( int iO = 0; iO < lstSource->Items->Count; iO++)

{
ptListItem = lstSource->Items->Item[iO];

if ( ptListItem != NULL )

{
if ( ptListItem->Data != NULL )

{
delete ptListItem->Data;
ptListItem->Data = NULL;
}

}

}// - Fin du for

2 - Le résultat de l'exécution du programme