Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Вниз

Нажата ли клавиша-стрелка 


Ник   (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]

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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.015 c
7-57908           harisma               2001-10-31 16:02  2002.04.18  
ИК порт и работа с ним


1-57733           Сержжж                2002-04-05 08:15  2002.04.18  
Динамические массивы


14-57891          ATLANTIDO             2002-03-01 23:25  2002.04.18  
Как очистить самораскрывающийся список url в IExplorere ?


1-57665           VID                   2002-04-03 23:02  2002.04.18  
Чтение значения переменной, созданной другой программой


6-57827           OGR                   2002-02-06 12:01  2002.04.18  
Как определить, что страница полностью загрузилась в TWebBrowse или EmbeddedWB?