D2007, TActionManager, TActionToolBar

_Moor_

Турист
Регистрация
23 Янв 2005
Сообщения
3
Реакции
2
Credits
4
Уважаемые гуру!
Помогите пожалуйста со следующей проблемой.
Имеем: TActionManager, TActionToolBar;
Одна из кнопок тулбара в зависимости от ситуации должна иметь или не иметь выпадающее меню (назовем его так, хотя конечно это тоже всего-лишь TActionClientItem'ы), и для разных случаев разное.
Чтобы не создавать эти меню руками, собрал их все в еще одном TActionManager ( TActionBarItem'ы -> TActionClients). Теперь в зависимости от ситуации пытаюсь присвоить:
ActionManager.ActionBars[№].Items[№].Items.Assign(какой-то из дополнительных TActionClients). Всё проходит без ошибок, у ActionManager.ActionBars[X].Items[X] (т.е. конечной кнопки) изменяется и Items.Count, и Items.VisibleCount, но кнопка не перерисовывается, т.е. у нее не появляется DropDown-стрелка. Аналогично не оказывает никакого влияния на внешний вид и вызов Items.Clear для созданных в design-time Items'ов. Попытки рефрешить тулбар ни к чему не приводят. Я в чем-то не прав или это глюк? Похожий фокус (только на основе простых TToolButton и PopupMenu) работает у меня уже очень много лет в многих приложениях. Может зря трогал, лучшее враг хорошего?