Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.24;
Скачать: 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 вся ветка

Текущий архив: 2003.03.24;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
8-76525
Sniffer
2002-12-09 16:45
2003.03.24
Прога тормозит


14-76610
TGrigory
2003-03-06 13:08
2003.03.24
А реально программисту дожить до пенсии?


1-76429
Viacheslav
2003-03-08 21:57
2003.03.24
драг енд дроп


1-76380
SONY
2003-03-13 09:30
2003.03.24
Пример ZoomWindow или просто Zoom


8-76514
roman_tutov
2002-12-07 18:28
2003.03.24
Video for Delphi:)