[NumLock]

Код:

procedure CursorClick();
begin
    while go do
    begin
       mouse_event(MOUSEEVENTF_LEFTDOWN,xo,yo,0,0);
       mouse_event(MOUSEEVENTF_LEFTUP,xo,yo,0,0);
       sleep(200);
       Application.ProcessMessages;
    end;
end;