Discussion :

[cincap]

@ tous, serait t'il possible lors du déplacement du curseur à partir d'un point (centre de la fiche ou coin à gauche de la fiche) que celui-çi revienne à son point de départ après un temps donné.

J'ai essayé avec un TTimer mais sans résultat, peut être avec Sleep() mais ?.
Merci de votre aide.

@+,

Cincap

[Dr.Who]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
var
  PT : TPoint;
 
 
// sauver la position du curseur :
 
GetCursorPos(PT);
 
 
// restaurer la position du curseur :
 
SetCursorPos(PT);

[cincap]

@ Dr.Who, Bonsoir, J'ai une erreur Types incompatibles integer et Tpoint, j'avais testé ceçi :

Code :

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

1
2
3
4
5
6
7
8
9
 
 Var
aRect : TRect ;
 PT : TPoint;
begin
timer1.Enabled := true ;
aRect := Rect(0, 0, 450, 450);
 
setcursorpos(x,y);

En fait, à la création de ma fiche, mon curseur se trouve au milieu de ma fiche, je le déplace et une animation suit mon curseur et après un certain temps il faudrait que le curseur revienne sur le centre.

Maintenant on peut imaginer que le curseur soit dans le coin gauche, on le déplace sur la fiche et il revient automatiquement dans le coin gauche une fois le mouvement à l'arrêt.

@+,

Cincap

[BuzzLeclaire]

Dans l'idée du toubib

Plutôt

Code :

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

  SetCursorPos(PT.X,PT.Y);

[cincap]

Merci les gars, je vais faire avec car apparemment, j'ai un conflit avec le code pour maintenit le curseur au centre de la fenêtre.

Je peux fermer le topic.

@+,

Cincap