Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.02.2009, 16:04   #1
Bayazet
Форумчанин
 
Регистрация: 08.12.2008
Сообщений: 156
По умолчанию Событие нажатия на клавишу клавиатуры

на форме лежит TPaintBox, необходимо, чтобы по нажатию на Esc я мог его перерисовать хитрым способом (каким - к вопросу не имеет отношения)

Код:
procedure TMF.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key=VK_ESCAPE) then
  begin
    ...
  end;
end;
^ не дает результата. т.е. вообще, при нажатии на любую клавишу клавиатуры компилятор не заходит в процедуру.

подскажите, в чем проблема или как обрабатывать, все что ввелось с клавиатуры?

Последний раз редактировалось Bayazet; 03.02.2009 в 16:05. Причина: подправил немножко
Bayazet вне форума Ответить с цитированием
Старый 03.02.2009, 16:12   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Поставь TMF.KeyPreview:=true
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.02.2009, 16:17   #3
Bayazet
Форумчанин
 
Регистрация: 08.12.2008
Сообщений: 156
По умолчанию

спасибо, помогло!
Bayazet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нажатие на клавишу 3.14oner Паскаль, Turbo Pascal, PascalABC.NET 1 14.07.2008 17:14
Пытаюсь написать прогу которая перехватывает нажатия клавиш клавиатуры и записует в текстовый файл, но evg_reg35 Общие вопросы Delphi 42 05.04.2008 13:44
Проверить событие нажатия кнопики! фЁдОр Помощь студентам 13 31.03.2008 13:27
У знаём нажатую клавишу... Altera Общие вопросы Delphi 2 10.02.2008 11:30