VPF::OnKeyDown/ Ctrl-Tab при наличии PageControl - Форум программистов

Alexeyt

Дата 14.11.2011, 17:30 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 332
Регистрация: 15.9.2006
Где: около Москвы

Репутация: нет
Всего: 2

Есть PageControl. Хочу обработать в OnKeyDown (Keypreview=true) клавиши Ctrl+Tab.
Не могу - их перехватывает PageControl и переключает вкладки.
Как перехватить, не убирая PageControl?

Snowy

Дата 15.11.2011, 11:14 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Вариант 1:
Использовать событие OnChanging и там смотреть состояние клавиш.

Вариант №2:

Код

RegisterHotKey(Handle, 9, MOD_CONTROL, VK_TAB);

Alexeyt

Дата 15.11.2011, 12:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 332
Регистрация: 15.9.2006
Где: около Москвы

Репутация: нет
Всего: 2

Я сделал по другому.

в форме делаем

Код


  protected
    procedure CMDialogKey(var Message: TCMDialogKey); message CM_DIALOGKEY;

procedure TForm1.CMDialogKey(var Message: TCMDialogKey);
begin
  Message.Result:= 0;
end;

Это сообщение отредактировал(а) Alexeyt - 15.11.2011, 12:21

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »