Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TMainMenu и клавиша F10 [D7, Win2k]

NewDelpher © (2004-09-06 13:49:00)
У меня на форме лежит компонент TMainMenu, при нажатии клавиш ALT или F10 он активизируется. Как сделать чтобы этого не происходило при нажатии F10?

Семен Сорокин (2004-09-06 15:25:00) [1]
NewDelpher (06.09.04 14:47) [5]
перекрой во всех MDIChild'ах, или сделай наследника, у меня [1] отлично работает для SDI-интерфейса

NewDelpher (2004-09-06 14:47:00) [2]

> Юрий Зотов © (06.09.04 14:21) [4]
> Попробуйте обрабатывать WM_SYSKEYDOWN:
>
> procedure TForm1.WMSysKeyDown(var Message: TWMSysKeyDown);
> begin
> if Message.CharCode = VK_F10 then
> Message.Result := 0
> else
> inherited
> end;

к сожалению, эффект тот же :(

Юрий Зотов (2004-09-06 14:21:00) [3]
Попробуйте обрабатывать WM_SYSKEYDOWN:

procedure TForm1.WMSysKeyDown(var Message: TWMSysKeyDown);
begin
if Message.CharCode = VK_F10 then
Message.Result := 0
else
inherited
end;

NewDelpher (2004-09-06 14:04:00) [4]
Правда у меня FormStyle = fsMDIForm, может поэтому не работает предложенный способ?

NewDelpher (2004-09-06 13:55:00) [5]
Семен Сорокин ©
Всё равно активизирует

Семен Сорокин (2004-09-06 13:52:00) [6]
Form.KeyPreview = true
Form.OnKeyDown
if Key = VK_F10 then
Key := 0;

:))

Наверх

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