Delphi - база знаний


Как перехватить нажатие TAB?


Как перехватить нажатие TAB?




private
Procedure CMDialogKey(Var Msg: TWMKey); message CM_DIALOGKEY;  
.....
procedure TForm1.CMDialogKey(var Msg: TWMKey);
begin
//здесь Ваш код  
Msg.Result := 0  
end;

Автор ответа: Vit
Взято с Vingrad.ru





Начало  Назад  Вперед