Твой софтовый форум > Тематические форумы > Программирование

Виртуальные клавиши мышки

,

не получается виртуально нажать мышку )

Дата публикации: 24.06.2011 - 12:52
ego30
Здравствуйте ! давно зареган на этом форуме, по нужде захожу помогает )
В приложение контакта лицемере за каждую оценку тебе дают энергию )
вот я устал жать оду и ту же клавишу и хочу виртуально ее нажимать )) с клавиатурой все получается вирт клавиши работают вот часть кода :
Code
procedure rrr(key:byte);
begin
    keybd_event(key, 0, 0, 0); //Нажатие клавиши key
    keybd_event(key, 0, KEYEVENTF_KEYUP, 0); //Отпускание клавиши key
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
rrr(VK_LBUTTON); // собственно сам вызов функции
end;
middleman
Ну если keybd_event для управления клавой нормально работает, что тоже не всегда бывает, то логично попытаться использовать mouse_event для управления мышью.

Причем на сколько я понял это автокликер. Тоже когда-то таким страдал. В таком случае чтобы он не мешал работать на компе я на шарпе загружал его в самой своей проге и потом вызовом функции через DOM надавливал нужные кнопки. А потом еще проще сделал. Проснифил обмен с помощью Charles и потом через GET POST организовал обмен между прогой и сервером даже без загрузки страницы.


Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке: Виртуальные клавиши мышки
SoftoRooM © 2004-2024