Управление мышкой

Советы » Мышка и Курсор » Управление мышкой

procedure TForm1.Timer1Timer(Sender: TObject);
begin

  mouse_event(MOUSEEVENTF_MOVE, Random(21) - 10,
    Random(21) - 10, 0, 0);
end
;

Другое по теме: