Показать сообщение отдельно
  #6  
Старый 10.05.2014, 18:12
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Вот кто вас всех учит задавать совершенно левый вопрос?
Ведь цель: нажать на что-то в WebBrowser.
А вопрос: как создать еще один независимый курсор.
Ответили бы вам каким-нибудь извращенским километровым кодом по организации самодельного курсора целиком с нуля, а потом бы оказалось, что это не работает нифига и вообще было не нужно.
Если цель - нажать в WebBrowser, то и вопрос должен быть - "Как нажать в WebBrowser?"
В связи с этим первое, что приходит в голову - открыть www.googe.com и ввести там "Twebbrowser нажать на кнопку". И получить массу готовых ответов.
Далее. Касаемо PostMessage.
1) В данном случае SendMessage гораздо лучше, т.к. он ожидает завершения.
2) Есть ScreenToClient и ClientToScreen. Зачем эти извращенские преобразования (которые, к тому же, не верны)?
3) Простейший клик состоит из двух SendMessage, первый с нажатием, второй с отпусканием.
4) Вы просили правый клик, а в коде - левый, и еще и неверный (третий параметр в клике, насколько я знаю, должен быть не ноль).
Все это тоже легко находится в гугле по запросу "программный клик delphi".
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием