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

ActionManager & ActionMainMenuBar   Найти похожие ветки 

← →
Василий Жогарев ©   (2010-08-19 15:36) [0]

Здравствуйте.

Имеется следующий вопрос.

Есть некая рекурсивная функция, которая должна создавать пункты меню.

Так вот, эта функция, если можно так сказать, работает не до конца.

Она прорисовывает корневые пункты, а вот прорисовывает ли она подпункты не могу знать, так как при создании корневых пунктов они являются не активными.

В чем дело не пойму. Уже три часа бьюсь не могу решить проблему.

Вот часть кода которая собственно создает пункты.

   if not Assigned(Parent) then
     Node := TActionClientItem.Create(am.ActionBars[0].Items)  //Вот это работает.
   else
     Node := TActionClientItem(Parent.Items.Insert(Parent.Items.Count)); //а вот это, не совсем понятно

Заранее спасибо.

---

← →
Василий Жогарев ©   (2010-08-19 15:45) [1]

У Node типа TActionClientItem, как я понял нет свойства Enabled вообще, но это свойство есть у TAction который я в дальнейшем присваиваю Node.
Node.Action := MyAction;

В общем свойства Enabled и Visible у MyAction оба в True;

---

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

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



Память: 0.45 MB
Время: 0.005 c