ERf Je travaille egalement dessus en ce moment
donc a la souris ça donnerait :
Private sub Mousedown( ... ...)
SHape1.Left = X
'on crée la premiere position coordonnées du point supérieur
'gauche
Shape1.top = Y
end sub
private sub MouseMove(... ...)
IF shape1.top < Y then
else
'c la qu'il faut chercher...
end if
c pas propre mais c un début
j'ai des petits problemes de décalage sur ma form , je dois faire ça sur une image.
JTe filerai un code plus précis une fois que j'aurais terminé si tu trouves fait moi signe merci !
;;D@rkY0;;
