Michael wrote

What do you mean with mouse_event ?

May be if I give the Delphi code, you understand better than with a lot of sentences.

procedure LikeMouseClick(PositionClick_X : integer; PositionClick_Y : integer;
BackToPositionOrigine : Boolean = True);
var
  SavePointOrigine: TPoint;
begin
   GetCursorPos(SavePointOrigine);
   try
      SetCursorPos(PositionClick_X, PositionClick_Y);
      mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
      mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
   finally
      if BackToPositionOrigine then
         SetCursorPos(SavePointOrigine.X, SavePointOrigine.Y);
   end;
end;

If I code

LikeMouseClik(10,10,true);

in my program, the mouse pointer goes back to [10,10], so I don't have to physically click in a window to set focus.

En/na ha escrit:

I never used it, but there's a component (look in the components directory) called mouseandkeyinput that should do just that.

Bye

I never used it, but there's a component (look in the components directory) called mouseandkeyinput that should do just that.

Or you can use:

var Mouse: TMouse;
// init
Mouse:=TMouse.Create;
// set position
Mouse.SetCursorPos:=NewCursorPos;

R.