[Delphi]Exemple d'utilisation de l'objet TList

Bonjour,

Je vous propose un nouvel élément à utiliser : [Delphi]Exemple d'utilisation de l'objet TList

Exemple d'utilisation de l'objet TList.



Ce source présente un exemple d'utilisation d'un objet TList associé à un Record. Cet objet permet de gérer facilement des listes d'objets, son utilisation est beaucoup plus simple qu'il n'y parait. L'exemple donné dans le source présente les fonctions de base de gestion d'un TList avec la gestion de reservation/libération de la mémoire en fonction de la création/destruction des éléments de la liste.



Qu'en pensez-vous ?

Cette source de Nono40 n'est pas très jeune !

Mettre Liste en variable Globale, n'a aucun intérêt dans l'exemple !

Après il faut préciser un truc vicieux

Code:

---

Dispose(Liste...)

---

c'est comme libérer une VarPointer de type Pointer

Code:

---

Dispose(VarPointer)

---

Dans notre exemple, cela ne doit pas être génant, car le sizeof de TElementListe doit être de 29 et la libération doit être correct même si pas habitude, j'écrirais

Code:

---

Dispose(TElementListe(Liste...))

---

car si l'on passe de "String[20];" à "String" ce que nombreux développeurs aimeraient faire, ils ne vont pas tous penser que TElementListe fera 12 octets et qu'il faut expliciter typer le pointer en TElementListe pour qu'il sache qu'il doit libérer un sous pointeur de type string (voir la fonction Finalize pour les record)

Voir
[TList] : libération des éléments
[DELPHI 5] Libérer une structure quand on a son pointeur