Discussion :

[Arrnno]

Peut-on réaliser une petite application qui fasse qu'un clic de souris prenne en compte tout un périmètre et non seulement un pixel, et ceci sur, par exemple, un ensemble de boutons d'une autre application ??

Merci pour vos réponses
Arnaud

[Droïde Système7]

Bonjour,

As-tu été yeuter les sources dispo ?
http://delphi.developpez.com/sources...no40source0025

J'espère que ça va t'aider un peu à affiner tes souhaits.

[Arrnno]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
procedure TForm1.Timer2Timer(Sender: TObject);
var p:tpoint;
begin
 
   p.x := 351;
    p.y := 403;
 
  SetCursorPos(p.x,p.y);//met le curseur à une certaine position
  fnthwnd := WindowFRomPoint(P); // on récup le handle de la fenêtre
  SetForegroundWindow(fnthwnd); // on met la fenêtre en 1er plan
//
sleep(100);
// on clique le bouton gauche de la souris (abaissement)
mouse_event(MOUSEEVENTF_LEFTDOWN,p.x,p.y,0,0);
sleep(10);
// après une brève attente on remonte le bouton
mouse_event(MOUSEEVENTF_LEFTUP,p.x,p.y,0,0);
// les 2 évements suivants avec les 2 précédents
// simulent un double-clic
//sleep(10);
//mouse_event(MOUSEEVENTF_LEFTDOWN,p.x,p.y,0,0);
//sleep(10);
//mouse_event(MOUSEEVENTF_LEFTUP,p.x,p.y,0,0);
 
end;

Merci d'utiliser les balises Code.
Laurent Dardenne