Форум: "Основная";
Текущий архив: 2003.03.27;
Скачать: [xml.tar.bz2];
Вниз
MainMenu & PopupMenu Найти похожие ветки
← →
Igor Kashtanov (2003-03-16 21:20) [0]В форме присутствует MainMenu и PopupMenu.При нажатии на функциональную клавишу (f9) по задумке должно появится
Popup. Сей метод реализую при KeyPreview=true и, соответственно процедуре OnKeyDown. Однако ничего не происходит. Если убираю MainMenu - все нормально. По нажатию F9 поднимается PopUp.
Подскажите, ПЛЗ!
Заранее благодарю всех написавших !!!
← →
Романов Р.В. (2003-03-16 21:35) [1]Код задумки покажи.
← →
sniknik (2003-03-16 22:08) [2]у MainMenu есть ShortCut там функциональные клавиши устанавливаются и перехватываются, или сделай пустое менюитем (невидимое) с ShortCut = F9 и из него вызывай, либо у формы с установленым KeyPreview = true (чтобы она первая ловила).
← →
sniknik (2003-03-16 22:30) [3]чегото тут не то. что с MainMenu что с без, функциональные клавиши на OnKeyDown ловятся. Единственное когда не ловит если ShortCut какого нибудь итема в меню уже установлена эта клавиша.
неважно, делай через ShortCut в самом меню, ловит всегда (даже куйпревью можно не включать).
← →
Igor Kashtanov (2003-03-16 22:45) [4]Код задумки :)
При KeyPreview=true;
procedure TForm.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_f9 then popupmenu1.Popup(400,300);
end;
← →
Igor Kashtanov (2003-03-16 22:50) [5]ВОТ ЭТО Я ТАК ЗАТУПИЛ :((((((((((((( ПО ПОЛНОЙ ПРОГРАММЕ...
ВСЕ РАБОТАЕТ... ПРОСТО ЭТА КЛАВИША УЖЕ БЫЛА ПРИСВОЕНА таки да....млин..
ВСЕ ОГРОМНОЕ СПАСИБО...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.03.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c
