Динамично меню за персонализиране

За да създадете меню, както и промяна в процеса на разработване на приложения Delphi проектиран дизайнер Menu (Меню дизайнер). менюто Стартиране конструктивни тор може да бъде направено по команда Menu Designer (Меню Designer) контекстното меню MainMenu или PopupMenu компонент, както и на власт двойно кликване върху едни и същи компоненти. Предварително един от тези компоненти трябва да се добавят към формата. Спомнете си, че COM-nents MainMenu и PopupMenu пуснати на Standard (Стандартен) компоненти палитра на страницата.

При проектирането на меню, можете да преместите показалеца на мишката менюта и подменюта с плъзгане и пускане технология. Използва се съвместно съвместно с Object инспектор дизайнер меню ви позволява да контролирате свойствата на отделните позиции от менюто. По-специално, на името на елемента от менюто се определя чрез задаване на желаната стойност на надписа собственост.

Използването на дизайнер, за да създадете и конфигурирате менютата посока за създаване на заявлението. Освен това, в менюто, можете да създадете или да се променя динамично пряко във време на изпълнение. Например, възможно е да:

  • създаване на нов меню от всякакъв вид или да го изтриете;
  • заключване и отключване на отделните точки;
  • направи елемент от менюто е видима или невидима;
  • добавяне или премахване на елемент от менюто;
  • промяна на името на елемента;
  • инсталирате или махнете отметката;
  • за да превключите от една форма в друга главното меню.

Тези функции са осигурени чрез задаване свойства на предмети настройки Tre-Буеми и наричат ​​подходящи методи.

За да добавите елементи от менюто с помощта на метода за добавяне и на въведения, за уд-MENT елементи от менюто използвайте метода Delete.

Добави Процедура (т: TMenuitem) добавя определен параметър елемент елемент в края на подменюто, която е предизвикала този метод. Ако подменю не съществува, тя е създадена.

Пример. Добавянето на елемент от менюто.

процедура Forml.mnuItemAddClick (подателя: TSender);

Var Newltem. TMenuitem;

NewItem.Caption: = "Нова позиция;

приключи, да добавите нов елемент се произвежда до края на списъка на команда от меню файл. Добавя даден елемент има заглавие нов елемент. Предварително да създадете нов елемент е създаден от дизайнера.

Процедура Insert (Индекс: Integer; Позиция: TMenuItem). За разлика от предишния метод, добавяне на нов елемент от менюто за съответната позиция. индекс параметър определя позицията в масива на елементи от менюто, което се вмъкват в нов параграф. Ако стойността на параметъра индекс е извън предварително Ly приемливи граници, например, по-малък от броя на под-елементи на модифицирани елемента от менюто, има извънредна ситуация.

Процедурата Delete (индекс: число) премахва определен елемент от менюто. Ако изтриете елемента има подточки, те също са отстранени.

Пример. Изтриване на елемент от менюто.

процедура Forml.mnuItemDeleteClick (подателя: TSender);

ако mnuFile.Items [2] .Caption = 'втория елемент "

след mnuFile.Delete (2); приключи;

Процедурата изтриване на елемента от менюто File. Отстранената точка е заглавието на втория елемент и е на втората позиция. С предварителни проверки, дали отстранения елемента с правилното име.

Формулярът може да има повече от един от главното меню. Той се използва, например, когато един от тях съдържа заглавията на английски език, а другата - на руски. За реализиране на тази възможност, с формата на пистата е да се поставят двата компонента и да направи подходящ MainMenu IU гола. След това, когато програмата могат да бъдат свързани до образуване някой от тези менюта. За да се свържете с формата на основните приложения е-имот меню форма Menu.

Пример. Превключването между двете основни менюта.

ако Forml.Menu = EnglishMenu

след Forml.Menu: = RussianMenu друг Forml.Menu: = EnglishMenu;

Меню имената EnglishMenu и RussianMenu. Код, за да се направи меню NE-превключване може да се включи към съответния манипулатор.

Спомнете си, че менюто е едно от свойствата на формата, което показва главното меню, което в момента е активна.