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

Вниз

Нажата ли клавиша-стрелка   Найти похожие ветки 

 
Ник   (2002-04-04 22:28) [0]

Доброе время суток. Как обработать нажатие клавиш-стрелок?
Пишу на событии OnKeyPress. Другие клавиши срабатывают, стрелки - нет.


 
Nikolay ©   (2002-04-04 22:32) [1]

код в студию :)


 
Ник   (2002-04-04 22:39) [2]

KeyPreview у формы стоит в true.

procedure TfmMain.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=37 then ShowMessage("gg");
end;


Не срабатывает. Если поставить код Enter, Esc и т.д. то работает.


 
al creator ©   (2002-04-04 22:45) [3]

я так не пробовал...
Example:
Memo1.Perform(WM_Char,ORD(#..),0)
или у формы можно установить свойство KeyPreview в True и обрабатывать событие OnKeyPress


 
Nikolay ©   (2002-04-04 23:35) [4]

обрабатывай vk_left.... и т.д.


 
Pat ©   (2002-04-04 23:50) [5]

>Ник
Проверил твой пример, все работает



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
1-57821
Rammst
2002-04-07 06:25
2002.04.18
Работа с ini


1-57776
Smok_er
2002-04-02 21:59
2002.04.18
Save file dialog


1-57778
Zool
2002-04-05 16:34
2002.04.18
_FileTime


1-57672
lipskiy
2002-04-07 00:15
2002.04.18
TStringList не хочет грузится из TStringStream


4-57926
Ura!
2001-12-21 17:48
2002.04.18
ReadEventLog