Не эмулируется нажатие кнопки. Что делаю неправильно? [D6, XP]
loeg © (2007-08-14 01:55:00)
Здравствуйте, Мастера!
Вопрос. Открыт Блокнот с файлом "1". Нужно, чтобы в нем
появился символ с кодом 100 ("d").
Пишу событие:
...
sw:=FindWindow (nil,'1 -
Áëîêíîò');
BringWindowToTop (sw);
sendmessage (sw,wm_keydown,100,0);
sendmessage (sw,wm_keyup,100,0);
...
Окно блокнота вылетает поверх всех окон, курсор ожидает
ввода, а буква не появляется! Что не правильно делаю?
Leonid Troyanovsky (2007-08-14 09:18:00) [1]
> oeg © (14.08.07 01:55)
> Вопрос. Открыт Блокнот с файлом "1". Нужно, чтобы в нем
> появился символ с кодом 100 ("d").
h := FindWindow('Notepad', ..);
h := FindWindowEx(h, 0, 'EDIT', nil);
SendMessage(h, WM_CHAR, 100, 0);
--
Regards, LVT.
Наверх 
ЧАТ |
Орешник |
|
