Делфи. Как да направя меню на лентата на DevExpress?
Докато правех меню за една от моите програми, експериментирах с вградените ленти от стандартната библиотека на Delphi. Но, честно казано, се отказах от тази идея. На места имаше бъгове. Настроих всичко, но забива. Пожелайте на разработчиците на стандартни Delphi Ribbons - да си спомнят.
Спрях се на панделки от DevExpress. Честно казано, наистина ми хареса тази библиотека, но трябва да „карате“ в нея известно време. За да спестя това време на тези, които искат да си направят красиво меню за програмата VCL, предлагам тази публикация.
Ето какво можете да получите, след като прочетете тази статия. Това е пример за една от моите програми, които правя в момента.
И така, какво трябва да се направи? Нека го направим стъпка по стъпка.
Дизайн на панделка
ДобаветеdxBarManager към формуляра
Нека веднага добавим изображения и LargeImages към него. Това е необходимо, за да прикачите изображения към бутоните. За мен това изглеждаше така
ДобаветеTdxRibbon
Кликнете 2 пъти върху tdxBarManager и след това щракнете върху Нов и добавете нова лента с инструменти, дайте й приятелско име.
В резултат на това трябва да се появи такава бяла лента, ние също веднага ще променим надписа и името, тъй като в нормален проект ще има много ленти с инструменти. 1 лента с инструменти ще съответства на 1 група в раздела на лентата. Групите в разделите ще бъдат 5-6 в голям проект и ще има 5-6 раздела. Съответно е необходимо да се дадат разбираеми имена за 25-36 ленти с инструменти.
Освен това ще се появи бяла лента. Това е заготовката на нашата лента с инструменти, която все още не е прикрепена към групата.
Щракнете с десния бутон върху лентата.
От малкия прозорец dxRibbon.Tabs изберете раздела, от който се нуждаем, и щракнете върху групите.
Сега избираме лента с инструменти, имаме такава. Инапишете тук произволно име. Това ще бъде името на групата в раздела на лентата.
След това щракнете с десния бутон върху групата и изберете елемента, който трябва да добавим
Добавяне на бутон и LargeButton
Сега променяме имената и надписите на бутоните и прикачваме изображения към тях в свойствата на изображенията и LargeImages.
Е, накрая ще заменим надписа на раздела. Щракнете с десния бутон върху лентата > TabsEditor, изберете желания раздел и променете името и надписа му
Манипулатори
Правя манипулатори централно, чрез TActionManager. Нека го добавим към формата. 2 щракнете и добавете ново действие и го преименувайте, кажете aSmallButton
Сега да отидем по-нататък. Нека се справим с OnExecute на този манипулатор. Можете просто да щракнете два пъти в прозореца на ActionManager или можете в Събитията на самото действие.
Прикрепете манипулатора така
След това картината и надписът ще излетят, те ще бъдат взети от действието, което прикачихме, трябва да ги преконфигурираме отново. Или го направете в самото действие, но няма свойство LargeImageIndex и това няма да работи за големи снимки
По принцип това е всичко, сега ще ви покажа как изглежда в моя проект ...