Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.009 c