Code : Tout sélectionner
Macro setPoint(x_, y_)
\X = x_
\Y = y_
EndMacro
p.Point
With p
setPoint(10, 5)
EndWith

EDIT : la remarque a déjà été faite sur le forum anglais ( http://www.purebasic.fr/english/viewtopic.php?t=29089 ) et apparemment c'est un changement dans PB. On ne peut plus faire cet artifice !!!