Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c