Меню приложения в Microsoft Visual FoxPro
|
« Назад Приложение функционирует с одним меню (рис. 2.32), вызывающим формы, а также программу упаковки данных. Рис. 2.32. Меню приложения в проектировщике меню Меню запускается из главной программы проекта. Для открытия формы, например Authors, используется команда do form (appPath + 'Forms\Authors') Процедура пункта меню "Упаковка таблиц" содержит следующий код: && Процедура меню приложения, связанная с пунктом меню "Упаковка таблиц" && flag = MessageBox("Упаковать таблицы?", 4 + 32 + 256) if flag = 6 then do (appPath + 'Prgs\TblsPacking') endif При выборе пункта меню "Закончить" выполняется следующая процедура: && Процедура меню приложения, связанная с пунктом меню "Закончить" && flag = MessageBox("Завершить работу?", 4 + 32) if flag = 6 then clear events && Завершаем обработку событий endif Если приложение функционирует неавтономно, а в составе VFP, то вместо команды CLEAR EVENTS следует поместить команду set sysmenu to default восстанавливающую системное меню VFP, а из главного файла изъять команду READ EVENTS. С каждым пунктом меню связан ускоритель – комбинация клавиш, после нажатия на которую выполняется ассоциированная с пунктом меню команда. Такой ускоритель должен содержать допустимую комбинацию клавиш (см. табл. 5.7). В рассматриваемом меню употребляются следующие ускорители (перечислены в порядке следования пунктов меню): Alt+A, Alt+B, Alt+C, Alt+P, Alt+T и Alt+Q. Во всех случаях используются буквы английского алфавита. Меню после его создания нужно сгенерировать, выполнив команду меню Menu – Generate. |
