Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
Разработка программного обеспечения
KANSoftWare

Как перехватить клавишу табуляции Tab в TEdit

Delphi , Компоненты и Классы , TEdit

Как перехватить клавишу табуляции Tab в TEdit

Это можно давольно легко сделать переопределив на форме процедуру CMDialogKey. Чтобы посмотреть как это работает, поместите на форму Edit и введите следующий код:


procedure CMDialogKey(var Msg: TWMKey);
  message CM_DIALOGKEY;

...

procedure TForma.CMDialogKey(var Msg: TWMKEY);
begin
  if (ActiveControl is TEdit) and
    (Msg.Charcode = VK_TAB) then
  begin
    ShowMessage('Нажата клавиша TAB?');
  end;
  inherited;
end;

Статья Как перехватить клавишу табуляции Tab в TEdit раздела Компоненты и Классы TEdit может быть полезна для разработчиков на Delphi и FreePascal.


Комментарии и вопросы


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.



:: Главная :: TEdit ::


реклама

::


©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru Rambler's Top100
18.01.2020 03:15:03/0.018213033676147/2