Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.24;
Скачать: CL | DM;

Вниз

Убрать HotKeys в меню   Найти похожие ветки 

 
Катерина ©   (2003-11-14 13:40) [0]

Я в run-time добавляю в меню разделы:

If Menu_file.Count = 8
then Menu_file.Add(TMenuItem.Create(Owner))
else Menu_file.Insert(8,TMenuItem.Create(Owner));

Menu_file.Items[8].Caption := ExpandFileName(Filename);
...

при этом в Menu_file.Items[8].Caption добавляется значек "&" в самых различных местах. Как мне избавиться от этих горячих клавиш в меню? Заранее спасибо.


 
Skier ©   (2003-11-14 14:20) [1]

TMenuItem.AutoHotkeys ?


 
Катерина ©   (2003-11-14 14:55) [2]

Да в том-то и дело, что я все перепробовала (и maAutomatic, и maManual, и maParent), но все равно в имена разделов меню попадают эти аксереторы. Причем я проследила: Capture присваивется "чистая" строка, без акселераторов, но после того, как меню активизиралось, они там появляются.


 
Skier ©   (2003-11-14 14:58) [3]

>Катерина © (14.11.03 14:55) [2]
Нужно выставлять AutoHotkeys до того как присваивается Caption.

т.е.


Menu_file.Items[8].AutoHotkeys := maManual;
Menu_file.Items[8].Caption := ExpandFileName(Filename);


Не поможет ?


 
Катерина ©   (2003-11-14 15:09) [4]

Само собой, так и делала, не помогло.


 
Skier ©   (2003-11-14 15:18) [5]

А если так ?


Menu_file.AutoHotkeys := maManual;
//..............
Menu_file.Items[8].AutoHotkeys := maManual;
Menu_file.Items[8].Caption := ExpandFileName(Filename);


 
Катерина ©   (2003-11-14 15:21) [6]

А так работает. Спасибо!


 
Skier ©   (2003-11-14 15:24) [7]

>Катерина © (14.11.03 15:21) [6]
Понятно. Горячие клавиши проставляются в зависимости от св-ва
ParentMenu.AutoHotkeys, если у "детей" этого Parent-а стоит AutoHotkeys := maManual; Вроде бы так...



Страницы: 1 вся ветка

Текущий архив: 2003.11.24;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
1-78952
Alexus
2003-11-11 19:20
2003.11.24
Вызов функции ...


1-78936
Yuri Btr
2003-11-11 17:10
2003.11.24
Поменять указатель на первый символ строки.


6-79079
Xeon
2003-09-27 18:10
2003.11.24
Серверы (FTP, HTTP, IRC)


1-79016
lucky4me
2003-11-14 10:11
2003.11.24
как прокрутить ролик Flash в приложении Delphi


3-78752
lext
2003-11-03 15:31
2003.11.24
Здравствуйте уважаемые! У меня есть ряд вопросов. Очень просю.