Как перехватить нажатие 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