VPF::SendMessage, отправление нажатий клавиш окну

CTPAX

Дата 24.1.2009, 11:08 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 27.12.2008
Где: Слоним

Репутация: нет
Всего: нет

HiVeR, из заголовочного файла Windows.pas

Код


{ VK_0 thru VK_9 are the same as ASCII '0' thru '9' ($30 - $39) }
{ VK_A thru VK_Z are the same as ASCII 'A' thru 'Z' ($41 - $5A) }

а у меня такой вопрос... некая программа постоянно выкидывает окошко с двумя кнопочками OK и CANCEL... мне нужно чтоб моя программа закрывала это окошко, нажатием кнопочки OK... но почему-то мой код

Код


      Windows.SetFocus(wd);
      SendMessage(wd, WM_KEYDOWN, VK_RETURN, 0);
      SendMessage(wd, WM_KEYUP, VK_RETURN, 0);

где wd - хендл этого окошка, а по умолчанию при нажатии клавиши Enter нажимается кнопочка OK... какие будут предложения

Rrader

Дата 24.1.2009, 12:21 (ссылка)

(нет голосов)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 70
Всего: 191

Цитата(CTPAX @ 24.1.2009, 17:08

)

какие будут предложения

Найти дескриптор этой кнопочки и послать ему сообщение BM_CLICK (или WM_LBUTTONDOWN + WM_LBUTTONUP).

--------------------

Let's do this quickly!
Rest in peace, Vit!

CTPAX

Дата 24.1.2009, 13:29 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 27.12.2008
Где: Слоним

Репутация: нет
Всего: нет

Rrader, а если можно поконкретнее, а то у мя с системным программированием не очень

Rrader

Дата 24.1.2009, 15:06 (ссылка)

(нет голосов)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 70
Всего: 191

Цитата(CTPAX @ 24.1.2009, 19:29

)

а то у мя с системным программированием не очень

Интересно получается...Вот этот код:

Код


Windows.SetFocus(wd);
SendMessage(wd, WM_KEYDOWN, VK_RETURN, 0);
SendMessage(wd, WM_KEYUP, VK_RETURN, 0);

Здесь видно, как ты пытаешься решить задачу "в лоб". Ставишь фокус на нужное окно, и посылаешь ему нажатие Enter. Значит, окно как-то нашел. Ну теперь используй FindWindowEx и найди кнопку. Далее отправь ей:

Код


SendMessage(Button, WM_LBUTTONDOWN, 0, 0);
SendMessage(Button, WM_LBUTTONUP, 0, 0);

В твоем коде беда в том, что все три строчки некорректны. Вызов SetFocus будет проигнорирован. Ну а послыка Enter'a окну кнопку вряд ли нажмет. Ты имел в виду keybd_event.

--------------------

Let's do this quickly!
Rest in peace, Vit!

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »