|
Имитация клика мыши - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе |
06.01.2012, 14:49
|
#1
|
|
|
|
Разведчик
|
Регистрация: 08.12.2010
Сообщений: 0
Популярность: -9
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
|
Имитация клика мыши
Всю голову сломал.
Подскажите пожалуйста как имитировать нажатие мышки в компоненте WebBrowser при этом чтобы курсор мышки был свободным. Например нужно в браузере нажать определенную кнопку(не мою, а сайта).
=========================================
mouse_event точно не подходит мне в данном случае
Делаю таким образом, но почему то не работает:
|
Цитата: |
|
|
|
|
|
|
|
|
procedure TForm2.Button1Click(Sender: TObject);
var
test: HWnd;
begin
test:=form2.webbrowser1.Handle;
postmessage(test,WM_LBUTTONDOWN,0,(100 shl 16)+100);
postmessage(test,WM_LBUTTONUP,0,(100 shl 16)+100);
end; |
|
|
|
|
|
P.S.Пока писал попробовал проделать тоже самое только с кнопкой, прописал координаты 1, 1 и оля ля получилось, но с браузером сколько бы я не колдовал безрезультатно((
Вот как с кнопкой проделал:
|
Цитата: |
|
|
|
|
|
|
|
|
procedure TForm2.Button1Click(Sender: TObject);
var
test: HWnd;
begin
test:=form2.button1.Handle;
postmessage(test,WM_LBUTTONDOWN,0,(1 shl 16)+1);
postmessage(test,WM_LBUTTONUP,0,(1 shl 16)+1);
end; |
|
|
|
|
|
Да и объясните пожалуйста мне вот этот кусок 0,(100 shl 16)+100 от чего именно он отчитывает, может быть я не туда тыкаю))
Последний раз редактировалось 19955991; 06.01.2012 в 15:17.
Причина: дополнение вопроса
|
|
|
08.01.2012, 15:59
|
#2
|
|
|
|
Разведчик
|
Регистрация: 08.12.2010
Сообщений: 0
Популярность: -9
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
|
Re: Имитация клика мыши
Знающих людей по этой теме нету совсем чтоли?
Ну хотя бы маленькую подскахочку киньте
|
|
|
08.01.2012, 16:45
|
#3
|
|
|
|
Фельдмаршал
|
Регистрация: 13.08.2009
Сообщений: 1,004
Популярность: 25098
Золото Zhyk.Ru: 350
Сказал(а) спасибо: 110
Поблагодарили 830 раз(а) в 395 сообщениях
|
Re: Имитация клика мыши
разберитесь с сообщением WM_LBUTTONDOWN и остальными сообщениями мыши. После этого, я считаю, все вопросы отпадут сами собою.
________________
Ни одно доброе дело не остается безнаказанным.
Программы:
PW: Флудобот, Девизхак, OutFocusBot, OutFocusBot ver 3 (freepvp), PWMultiHack ver 3, AutoRespawn.
JD: JDMultiHack, JDFlooder, JDBot.
Статьи: Отключаем UAC, Ищем базовый адрес Perfect World, "Патчер памяти" или "Пишем флайхак", "Патчер памяти 2" или "Пишем Джампхак", "Поиск инжектов" или "Наш код в чужом процессе"
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 01:05.
|
|