Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.28;
Скачать: CL | DM;

Вниз

Как получить ASKII код нажатой клавиши ?   Найти похожие ветки 

 
fag2000@ok.ru ©   (2002-03-13 14:02) [0]

Привет всем!
Как получить ASKII код нажатой клавиши при обработке сообщения WM_KEYDOWN?
Заранее благодарен.


 
troits ©   (2002-03-13 14:07) [1]

Посмотри help по ф-ции ToAscii


 
troits ©   (2002-03-13 14:57) [2]

У меня получилось вот так.

procedure TForm1.WMKeyDown(var Message: TWMKeyDown);
var
ScanCode: Cardinal;
KeyBoardState: TKeyBoardState;
Buf: array[0..2] of char;
begin
ZeroMemory(@Buf, 3);
GetKeyboardState(KeyBoardState);
ScanCode := MapVirtualKey(Message.CharCode, 0);

if ToAscii(Message.CharCode, ScanCode, KeyBoardState, Buf, 0) > 0 then
Label1.Caption := string(Buf[0]);
end;


 
fag2000@ok.ru ©   (2002-03-13 17:32) [3]

А если это в Hooke далается для чужого приложения?



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
3-90738
aleks2000
2002-02-24 12:48
2002.03.28
<B>Как открыть ДОС базу данных dBase III в Делфи, так чтобы было написано на нормальном русском</B>


3-90791
Sewix
2002-02-28 10:32
2002.03.28
Отчет


3-90810
ruslan_as
2002-03-04 13:13
2002.03.28
Сумма по полю


1-90884
stop8
2002-03-13 19:16
2002.03.28
SOS... по QReport 3.0.....


6-91017
Surf
2002-01-06 09:55
2002.03.28
Ладно, спрошу по-другому.