Найдено 4 результата

The_Eternal_Student
11.04.2009 18:39:57
Форум: Lazarus
Тема: Как отловиь системные клавиши в Lazarus'е
Ответы: 10
Просмотры: 7872

Re: Как отловиь системные клавиши в Lazarus'е

Да и с модулем LCLType программа прекрасно работает, а вот использовать константы (или цифры) не имеет смысла, так как забивать такими вещами голову не стоит. Да? :wink:

Reply: Вам виднее :) (так как не программист, я вас не пойму, и тем более в деньги не уперается)
The_Eternal_Student
11.04.2009 14:31:48
Форум: Lazarus
Тема: Как отловиь системные клавиши в Lazarus'е
Ответы: 10
Просмотры: 7872

Re: Как отловиь системные клавиши в Lazarus'е

Чтобы не били :) :
Lazarus писал(а): Error: Identifier not found "VK_UP"
The_Eternal_Student
11.04.2009 11:24:31
Форум: Lazarus
Тема: Как отловиь системные клавиши в Lazarus'е
Ответы: 10
Просмотры: 7872

Как отловиь системные клавиши в Lazarus'е

Для удобства в моей программе хотел использовать клавиши "влево", "вправо" и т.д. Но, к сожалению, событие OnKeyPress не отлавливают данные клавиши. Проверял таким способом:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: char);
begin
ShowMessage(IntToStr(ord(Key)));
end ...