[professor1979]

Всем привет. помогите написать програмку, которая бы двигала через определенное время курсор мышки на один или несколько пикселей. Это связано с тем, что в офисе постоянно блокируется экран и приходится вводить пароль, это надоедает. На изменение параметров экрана отсутствуют права. Спасибо

[Ildar-tsr]

Помогаю:
http://www.programmersclub.ru/labtimer/
http://programmersforum.ru/showthread.php?p=402345
Когда появятся конкретные вопросы, обращайся.

[DelphiM0ZG]

Как вариант, можно написать такую программу. Она будет висеть в фоновом режиме, как процесс и через 10 секунд немного передвигать курсор. При желании можно будет сделать автозапуск с помощью реестра.

Код:

program MouseMoveProject;

uses
  Windows;

Var
  CurPos: TPoint;
  dx, dy: ShortInt;

begin

  Randomize;

  Repeat
    Repeat
      dx:=Random(3)-Random(3);
      dy:=Random(3)-Random(3);
    Until ((dx<>0) Or (dy<>0));

    GetCursorPos(CurPos);
    SetCurSorPos(CurPos.X+dx, CurPos.Y+dy);

    Sleep(10000);
  Until (False);

end.

Я у себя эту прогу протестил, заставка всё-равно появляется. Надо что-то другое придумать, а не перемещение курсора. Похоже, что система именно на прерывания реагирует.

[PhoeniX]

Работать на работе надо, а не курсор двигать программами... А если уж не работаешь и отошёл - то, будь добр, введи пароль. ИБ как бы.

[AlexSku]

И вообще работать надо с бумажками, а то от монитора зрение портится.

[NumLock]

Сообщение от professor1979

блокируется экран

придавить чем-нибудь клавишу Esc

[Страдалецъ]

Предлагаю это дело углУбить. Просто курсор двигать не интересно. А вот запустить минсвипера пару раз щелкнуть мышой по клеткам, потом солитера пару раз, калькулятор и т.д. Пусть имитирует бурную деятельность секретарши.

[Rat]

А как это дело работать будет, ежели например в ворде будешь что то выделять? Не устанете материться, что он куда то прыгает?

[Ildar-tsr]

Сообщение от Rat

А как это дело работать будет, ежели например в ворде будешь что то выделять? Не устанете материться, что он куда то прыгает?

Я например, написал такую задачу, которая смещает курсор по оси Х на один пиксель, это настолько мало, что вряд ли такого рода проблемы могут возникнуть. А так-то идея есть, чтоб таймер сначала брал координаты и запоминал их, и двигал курсор только если сохраненные координаты и текущие равны (то есть курсор мыши не двигали).

[Pyro]

можно ещё какой-нибудь скролл-лок нажимать, но солитер конечно лучше

[x128]

API фукция SystemParametersInfo параметр SPI_SETSCREENSAVEACTIVE