PDA

View Full Version : How to make the mouse move.



BazzBarrett
11-28-2008, 06:12 PM
there have been threads about this ive looked tryed and evey1 of them has failed i dont get it do i need to include somthing special? this is wat ive got..
program mouse;

uses
SysUtils;

procedure ClickMouse(X, Y: Integer; left: Boolean);
begin
if left then
begin
mouse_event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0)
mouse_event(MOUSEEVENTF_LEFTUP, x, y, 0, 0)
end else
begin
mouse_event(MOUSEEVENTF_RIGHTDOWN, x, y, 0, 0);
mouse_event(MOUSEEVENTF_RIGHTUP, x, y, 0, 0);
end;
end;

begin
Clickmouse(100, 100, true);
end.

doesent matter i wasent including the right files

Daniel
12-03-2008, 10:01 AM
SetCursorPos