Дизайнер меню

Вызов Дизайнера Меню осуществляется из локального меню компонента MainMenu (команда Menu Designer…)  или двойным щелчком мыши по пиктограмме компонента.

 Шаг 4. Выполните указанную выше команду, и на экране появится окно с заголовком PictureForm. MainMenu. Это и есть Дизайнер Меню.

Чтобы обеспечить наиболее эффективный способ создания меню. Дизайнер Меню работает в паре с Инспектором Объектов. Управление пунктами меню, в частности их создание и удаление, осуществляется в окне Дизайнера Меню, а свойства каждого пункта, например его текст и клавиатурное сокращение, устанавливаются в Инспекторе Объектов.

Шаг 5. Пока строка главного меню состоит из одного безымянного пункта. Дайте пункту программный идентификатор Fileltem (значение свойства Name) и впишите в значении свойства Caption его текст: &file. Символ & обеспечивает подчеркивание следующего за ним символа при отображении текста, поэтому пункт меню будет виден как File. Подчеркнутая буква используется в комбинации с клавишей Alt для прямого доступа к пункту меню с клавиатуры. В данном случае активизация пункта File будет происходить по комбинации клавиш Alt+ F (рис. 7).

 Шаг 6. Сейчас под пунктом File нужно создать выпадающее меню. Для этого просто щелкните в Дизайнере Меню на пункте File, Delphi все сделает за вас. Под пунктом Fileпоявится пустая ячейка — заготовка первого пункта выпадающего меню. Дайте пункту программный идентификатор Openltem и в свойстве Caption впишите текст &0pen.... Вместо пустой ячейки появится текст Open... и пустая ячейка переместится ниже.

Шаг 7. Действуя по аналогии, добавьте еще три пункта: Save As... , Close и Exit. В программе они должны называться SaveAsltem, Closeltem и Exitltem соответственно.

Согласитесь, что добавление новых пунктов сделано в Delphi очень удобно. Но для создания сложного меню одной этой возможности явно недостаточно — нужны средства вставки и удаления пунктов, создания вложенных меню и прочие. Поэтому в Дизайнере Меню для каждого пункта предусмотрено локальное меню с необходимым команд:

Команда	Описание
Insert	Вставляет в позиции курсора новый пункт.
Delete	Удаляет пункт в позиции курсора.
Create Submenu	Создает в позиции пункта выпадающее меню.
Select Menu	Предлагает выбрать для работы другой компонент меню.
Save As Template	Сохраняет текущую структуру меню в списке шаблонов.
Insert FromTemplate	Вставляет в позиции курсора меню, взятое из списка шаблонов.
Delete Templates	Удаляет шаблон(ы) меню.
Insert FromResource	Вставляет в позиции курсора меню, взятое из файла ресурсов.

Бывает, спроектировав меню, вы вдруг обнаруживаете, что какой-то незадачливый пункт стоит не на своем месте. Проблема решается просто: захватите пункт меню щелчком мыши и, удерживая мышь нажатой, отбуксируйте его к новой позиции. Таким образом можно переместить не только отдельный пункт, но и целое выпадающее меню со всеми его пунктами и вложенными меню.