Discussion :

[Nuclear88]

Bonjour,

j'utilise Borland C++ Builder 6 avec la VCL.

J'aimerais, en fonction de la position du curseur à l'intérieur d'un contrôle, positionner ce curseur à un endroit précis.

Le code sera peut-être plus parlant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
void __fastcall TQuadrillage::GrilleUserMouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
 
if (X>30&&40&&Y>50&&Y<60)
        {
        SetCursorPos(35,55);
        }

Cependant, il s'avère que les paramètres du SetCursorPos() correspondent à des coordonnées écran et non des coordonnées à l'intérieur du contrôle.

Je suis presque sûr qu'il faut utiliser les fonctions ScreenToClient ou ClientToScreen mais ni l'aide de Builder ni les forums en ligne ne me permettent de comprendre leur utilisation.

Quelqu'un peut-il me donner un exemple en utilisant si possible ce contexte ?
Par avance, merci.

[Nuclear88]

Etant parvenu à résoudre ce problème, je poste la solution que j'ai trouvée.

Il s'agissait avant tout de créer la structure TPoint, dans laquelle on stockait la conversion des coordonnées écran en coordonnées client.
Puis de passer en paramètre de SetCursorPos les deux données de la structure.

Le code sera plus prolixe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
void __fastcall TQuadrillage::GrilleUserMouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
 
TPoint MonPoint;
 
if (X>25&&X<35&&Y>25&&Y<35)
        {
        MonPoint=GrilleUser->ClientToScreen(Point(30,30));
        SetCursorPos(MonPoint.x,MonPoint.y);
        }

Et hop, résolu