Форум: "Основная";
Текущий архив: 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.009 c