ouch ! quel est l'intérêt de faire ça ?

quelque chose comme ça ...


type
TNoeud = class;

TListDeNoeuds = class(TList)
private