Вниз
Скачать: CL | DM;

WM_KEYDOWN, WM_KEYUP   Найти похожие ветки 

← →
Spawn ©   (2003-01-29 20:22) [0]

Ну ни как не могу затсавить работать(( Всякие WM_LBUTTONDOWN(UP), WM_CHAR работают нормально, но нажатие кнопок ни в какую.
Вот, например, пробую нажать кнопку в Edit:

SendMessage(Edit1.Handle,WM_KEYDOWN,Ord("f"),0);
SendMessage(Edit1.Handle,WM_KEYUP,Ord("f"),0);

и ноль результата.
Подскажите, пожалуйста, в чем моя ошибка?


← →
Spawn ©   (2003-01-29 20:56) [1]

Я нашел такой вариант(он работает):
ScanCode := MapVirtualKey($56, 0);
lParam := ScanCode shl 16 or 1;
PostMessage(Edit1.Handle, WM_KEYDOWN, $56, lParam);

Пожалста поясните LParam:=ScanCode shl 16 or 1;(а именно shl)
Для чего нужен оператор shl?


← →
Cobalt ©   (2003-01-29 21:33) [2]

этот оператор сдвигает ScanCode на 16 битов влево:
(например: 0000.0000.1100.1100 <-на 6 битов: 0011.0011.0000.0000)

в область битов № 16-23 "Specifies the scan code. The value depends on the original equipment manufacturer (OEM)."


← →
Spawn ©   (2003-01-29 21:41) [3]

Спасибо



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
14-76630
Picup
2003-03-05 21:16
2003.03.24
Кому какой delphi кому больше нравится


1-76426
valery
2003-03-11 14:37
2003.03.24
Автоматизация MsWord. Плавающая ошибка Interface not supported


14-76635
kaif
2003-03-01 13:16
2003.03.24
---|Ветка была без названия|---


3-76314
Merlot
2003-03-05 11:13
2003.03.24
Доступ к FoxPro базам через ADO...


3-76272
digester
2003-03-07 02:36
2003.03.24
Сортировка записей в таблице




   Наверх