pour liberer un objet, utilise la methode Free et non destroy.
pour liberer tout autre ressources, condition IF sur valeur NIL ou en utilisant ASSIGNED(...)
ne pas hesiter a utiliser des valeur boolean pour etablir les conditions creation/leberation.