Le curseur

Résolu
cs_JackNUMBER Messages postés 233 Date d'inscription jeudi 30 septembre 2004 Statut Membre Dernière intervention 26 juin 2011 - 26 déc. 2004 à 13:12
DRJEROME Messages postés 436 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 5 février 2015 - 26 déc. 2004 à 13:43
comen faire pour que le curseur ce mette a tel ou tel endroit (par exemple sur le bouton, le memo)

merci d'avance !

---------------------
Jack NUMBER
---------------------

2 réponses

DRJEROME Messages postés 436 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 5 février 2015
26 déc. 2004 à 13:43
exemple

je clique sur le button1 le curseur va sur le button2
var
TP1,TP2:TPoint;
x,y:integer;
begin
     TP1:=clienttoscreen(button2.BoundsRect.TopLeft);
     TP2:=clienttoscreen(button2.BoundsRect.BottomRight);
     x:=(TP1.x+TP2.x) div 2;
     y:=(TP1.y+TP2.y) div 2;
     SetCursorPos(x,y);
end;


DrJerome
3
DRJEROME Messages postés 436 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 5 février 2015
26 déc. 2004 à 13:38
Salut

SetCursorPos



DrJerome
0
Rejoignez-nous