Справка – f1;

Очистка- ALT+6;

Закрыть все- ALT+7;

Стандартное меню- - ALT+8;

Выход – Alt + X.

• Определяем команду, которая будет выполняться при выборе пунктов меню:

Пункт меню	Команда
\<6 Очистка	Clear
\<7 Закрыть все	Close all
\<8 Станд. меню	Set sysmenu to default
\<X Выход	Quit

• Определяем последовательность команд, которая должна выполняться при выборе пункта меню «Справка». Для этого выделяем пункт «Справка». Нажимаем кнопку Create , и в открывшемся диалоговом окне редактирования процедуры определяем фрагмент кода, связанный с элементом строки меню. В моем примере вводим следующий код:

messagebox («Проект разработала»+;

chr(13)+;

«Чуркина Елена Сергеевна»+;

chr(13)+;

«Студентка группы 41-Б»+;

chr(13)+;

chr(13)+;

"(с) НЭПК 2006 года", 0+64+0, "Справка")

• Определяем подменю. Для этого выполняем следующие действия.

1) Нажимаем кнопку Create пункта меню «Покупатели». На экране появляется пустое окно конструктора меню. Список Menu Level нового окна содержит метку текущего пункта меню.

2) Вводим в поле Prompt первой строки заголовок Формы. Используя список Result, задаем тип пункта Submenu. Нажимаем кнопку Create. Вводим в поле Prompt первой строки заголовок Покупатели. Используя список Result, задаем тип пункта Procedure и в окне редактирования процедуры вводим:

set default to x:\Курсовик

do form Покупатели.scx

Закрываем окно процедуры. Аналогично определяем форму «Ноуты» и «Поставка ноутов» для пункта меню «Ноуты» и «Поставка ноутов».

3) При помощи окна Menu Level переходим на уровень выше.

4) Во второй строке вводим заголовок Отчеты. Используя список Result, задаем тип пункта Submenu. Нажимаем кнопку Create. Вводим в поле Prompt первой строки заголовок Агентство. Используя список Result, задаем тип пункта Command и в соседнем поле печатаем команду:

report form x:\ Курсовик\Покупатели

Аналогично делаем отчеты «Ноуты» и «Поставка ноутов» для пункта меню «Ноуты» и «Поставка ноутов».

5) При помощи окна Menu Level переходим на уровень выше.

6) Вводим поле Prompt третьей строки заголовок Запросы. Используя список Result, задаем тип пункта Submenu. Нажимаем кнопку Create. Вводим в поле Prompt первой строки заголовок Покупатели из Городца, используя список Result, задаем тип пункта Procedure и в окне редактирования процедуры вводим

set default to x:\ Курсовик

do Покупатели_из_Городца.qpr

Закрываем окно процедуры. Аналогично определяем запросы ПК_типа_мини, ПК_и_ОС_Windows­_Vista, Цена_ноута_больше_ 13тыс., Кто_купил_больше_25_ноутов.

• Для улучшения внешнего вида меню создаем разделительные линии. Для этого выполняем следующие действия:

1) выделяем пункт меню «Покупатели» и нажимаем кнопку Edit;

2) в открывшемся подменю устанавливаем курсор на пункте «Отчеты» и нажимаем кнопку Insert;

3) в поле Prompt образованного пункта меню удаляем строку New Item и вводим \ -;

4) устанавливаем курсор на пункте «Запросы» и нажимаем кнопку Insert, удаляем строку New Item и вводим \-;

5) переходим на уровень выше и аналогично создаем разделительные линии в подменю пунктов «Ноуты» и «Поставка ноутову».

• Определяем параметры меню. Для этого из меню View выбираем команду General Options. В открывшемся диалоговом окне General Options в группе Location выбираем вариант размещения строки созданного меню Replace. Это значит, что при выполнении созданное мною меню будет замещать стандартное меню VFP. Затем нажимаем кнопку Ok.

2. Сохраняем созданное меню. Для этого в меню File выбираем команду Save as, в открывшемся окне в поле Папка выбираем папку Курсовик, в поле Save Menu вводим имя сохраняемого Меню. В завершении нажимаем кнопку Сохранить.

3. Просматриваем созданное меню с помощью кнопки Preview окна конструктора меню.

4. Сгенерируем созданное меню, чтобы его можно было использовать в приложении. Для этого выполняем следующие действия.

• В меню Menu выбираем команду Generate. При этом откроется диалоговое окно Generate Menu.

• В поле Output File вводим имя файла, который будет создан в результате генерации.

• Для запуска генерации описания меню нажимаем кнопку Generate.

5. Запускаем программу меню на выполнение. Для этого в окне проекта устанавливаем курсор на имени созданного меню и нажимаем кнопку Run. На экране появится созданное меню, которое будет замещать горизонтальное меню Курсовик. Проверяем работоспособность каждого пункта меню.

Экранные формы Меню представлены в Приложении Е.