Форум: "Основная";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];

Вниз

Как из подручных элементов собрать текстовое меню   Найти похожие ветки 

← →
pirat   (2003-05-30 00:29) [0]

Как из TMainMenu, TPOPupMenu, TControlBar, TCoolBar, TToolBar собрать текстовую часть меню как в Делфи 7 ?

---

← →
___Nikolay   (2003-05-30 07:15) [1]

Если тебе нужно меню как в Delphi - вот:


Разместите на форме TControlBar. (закладка Additional) Установите Align = Client.
Разместите TToolBar (закладка Win32) внутри TControlBar.
Установите в True свойства Flat и ShowCaptions этого TToolBar.
Создайте на TToolBar столько TToolButtons сколько Вам нужно. (щелкнув по TToolBar правой кнопкой и выбрав NewButton)
Установите свойство Grouped = True для всех TToolButtons. Это позволит меню выпадать при перемещении курсора между главными пунктами меню (если меню уже показано).
Разместите на фоме TMainMenu и убедитесь, что оно *НЕ присоденено* как меню главной формы. (посмотрите свойство Menu формы).
Создайте все пункты меню (щелкнув по TMainMenu кнопкой и выбрав Menu Designer)
Для каждой TToolButton установите ее MenuItem равным соответсвующему пункту TMainMenu.


---

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

Форум: "Основная";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.017 c