Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.08.2016, 15:50   #1
AndreySFN
Новичок
Джуниор
 
Аватар для AndreySFN
 
Регистрация: 05.08.2016
Сообщений: 2
По умолчанию Имитация клика мыши внутри чужого окна

Доброго времени суток форумчане.
Необходимо имитировать клик ЛКМ в Firefox, пробоапл через SendMessage и PostMessage
h:= FindWindow(nil,PAnsiChar(edt1.text) );
if h = 0 then

Код:
 ShowMessage('No handle');
 SendMessage(h, WM_LBUTTONDOWN, StrToInt(edt2.text),StrToInt(edt3.Text));
 Sleep(1000); // Application.ProcessMessages;
 SendMessage(h, WM_LBUTTONUP, StrToInt(edt2.text),StrToInt(edt3.Text));
Ну так вот, результат и с PostMessage и с SendMessage нулевой.
Код который перемещает курсор в нужную часть экрана и там кликает работает.
Код:
// нажимаем левую кнопку мыши по заданным координатам
SetCursorPos(P);
Mouse_Event(MOUSEEVENTF_LEFTDOWN, P.X, P.Y, 0, 0);
// отпускаем
Mouse_Event(MOUSEEVENTF_LEFTUP, P.X, P.Y, 0, 0);
Но и тут трабл. Окно Firefox у присвоено моей форме, а форма скрыта.
Можно как либо переместить курсор в скрытое окно? Или быть может есть какой-то другой способ проще.
Help me please!
AndreySFN вне форума Ответить с цитированием
Старый 10.08.2016, 18:38   #2
AndreySFN
Новичок
Джуниор
 
Аватар для AndreySFN
 
Регистрация: 05.08.2016
Сообщений: 2
По умолчанию

Разобрался сам.
Дело было в том что хэндл firefox меняется после присвоения его форме
Код:
Windows.setparent(h,form1.handle);
А PostMessage отправлялся старому хэндлу.
Потому и не работало)))
AndreySFN вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
имитация клика мыши Ale}{ander Общие вопросы Delphi 12 02.02.2014 23:37
Имитация клика мыши Anfall Общие вопросы Delphi 20 05.10.2010 09:15
курсор мыши у чужого окна STRELOK-2007 Общие вопросы Delphi 1 06.08.2009 23:17
Имитация клика мыши, не работает по Vista Аферук Общие вопросы Delphi 9 21.04.2009 15:45
Имитация клика мыши tipzozborova JavaScript, Ajax 1 04.03.2009 07:27