la classe TPoint c'est que 2 vars LongInt
t'as qu'à faire un truc du genre:
...
var
chaine: string;
MonPoint: TPoint ;
...
chaine := inttostr(MonPoint.x) + ' ' + inttostr(MonPoint.y) ;
...
voklà, je sais pas si c'est exactement ce que tu voulais faire..., mais je vois pas d'autre solution :)
cybrix
heuuuu ces fesable ca? :| merci... a cause je suis bloquer sur ce probleme :/// snif