| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Обработка нажатия [Tab] [D5, WinXP]

Yurko ©   (2004-07-15 12:08:00) 

Нужно в OnKeyDown поймать нажатие на [Tab]. Проблема в том, что обработчик вызывается только при нажатии [Ctrl+Tab]. Скажите, пожалуйста, как ловить нажатие самого [Tab]?

---

Yurko   (2004-07-15 12:45:00) [1]

С П А С И Б О !!!!!!!!!!!!!

---

ssk   (2004-07-15 12:13:00) [2]


type
   TForm1 = class(TForm)
   private
       procedure CMDialogKey( Var msg: TCMDialogKey );
       message CM_DIALOGKEY;
end;

var
   Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.CMDialogKey(var msg: TCMDialogKey);
begin
   if msg.Charcode  VK_TAB then
       inherited;
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
   if Key = VK_TAB then
   Form1.Caption := 'Tab Key Down!';
end;

---

Наверх