![]() |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]()
|
|
| Spawn |
|
|||
|
Опытный ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 278 Регистрация: 3.6.2002 Репутация: нет Всего: нет |
Я хочу послать сообщение нажатия кнопки клавиаратуры в какое-либо окно:
SendMessage(HWND,WM_KEYDOWN,VK_RETURN,0); но ни чего не происходит. Подскажите, плз, в чем может быть дело(когда то я уже сталкивался с етой проблемой, но там я использовал keybd_event и mouse_event. Сейчас же мне нада посылать сообщения в неактивные окна). |
|||
|
||||
| Alex |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 4147 Регистрация: 25.3.2002 Где: Москва Репутация: 80 Всего: 162 |
const
Win = 'Название окна'; But = 'Название кнопки'; ... procedure TForm1.Button1Click(Sender: TObject); var TrayWnd, BtnWnd: hWnd; begin if FindWindow(nil, Win) <> 0 then begin TrayWnd:=FindWindow(nil, Win); BtnWnd:=FindWindowEx(TrayWnd,0,nil, But); SendMessage(BtnWnd, WM_LBUTTONDOWN, 0, 0); SendMessage(BtnWnd, WM_LBUTTONUP, 0, 0); end; end; Не забудь, что если кнопка принадлежит не форме, а, к примеру, панели то нужно найти сначала handle формы, на которой лежит панель, потом handle панели и только по том искать handle кнопки и посылать ей SendMessage -------------------- Написать можно все - главное четко представлять, что ты хочешь получить в конце. |
|||
|
||||
| Song |
|
|||
![]() Sysman.ru ![]() ![]() ![]() Профиль Группа: Участник Сообщений: 1095 Регистрация: 2.6.2002 Репутация: 2 Всего: 4 |
Не на тот дискриптор посылаете определённо. -------------------- Прежде чем сказать "Невозможно", подумай, прав ли ты |
|||
|
||||
| Vit |
|
|||
![]() Vitaly Nevzorov ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: 48 Всего: 207 |
-------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
![]()
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |