Hola!
Estoy jugando con la API de windows, para una aplicación en creación.
Necesito mover el cursor (no finjir el click y ya), no. Moverlo hasta llegar a unas pocisiones TPoint.X y TPoint.Y
Esto es algo que cree, pero no funcióna es más, me paraliza la aplicación.
Ya que no estoy muy claro del algoritmo correcto para está acción.
Código Delphi
[-]
procedure MoveMouse(X,Y:integer);
var FMousePos:TPoint;
begin
GetCursorPos(FMousePos);
repeat
SetCursorPos( FMousePos.X + 1 , FMousePos.Y + 1);
until (FMousePos.X = X) and (FMousePos.Y = Y);
end;
Como podría yo mover el mouse, hasta que llege ... ?.