Tu peux aussi transformer ton record en une classe héritant de TComponent (je sais plus lourd), ou encapsuler ton record dans une classe juste pour faire Read\Write avec des propriétés publiées, c'est les tableaux qui poseront des problèmes, il faudrait le recoder en TCollection, c'est qui est bien lourd ...
en dernier, c'est de mettre :
Pointpoly[0.255]:array of tpoint;
cela va agrandir ton fichier, mais c'est se simplifier la vie !
Sinon sjrd, jolies fonctions génériques, moi je veux bien voir ce code récursrif juste pour le bonheur des yeux , ça mériterait une FAQ : "Comment écrire n'importe quel tableau dans un Stream", cela va en intéressé plus d'un ...
Perso, quand j'ai des tableaux dynamiques, j'écrivais une fonction spécifique pour chaque types de tableaux ... c'est pour cela que j'écrivais toujours un TxxxReader et TxxxWriter pour remplir mes record ...
Partager