Система управления базами данных Visual FoxPro5.0 - от начальных навыков к профессиональной работе. Крушель Е.Г - 94 стр.

                                        140

      - Предыдущая запись
      - Последняя запись
    Коды для этих пунктов меню см. в пункте 5.2. После того, как Вы описали все
выше перечисленные пункты, перейдем к описанию следующего пункта
горизонтального меню – Выход, который будет содержать:
       - Выход из формы
       - Выход из Visual FoxPro
Опишем процедуры для этих пунктов:
для пункта Выход из формы (аналогично описанию процедуры для кнопки «Выход», см.
пункт 5.2):

      If messagebox ("Выходить из формы?", 4+32+256, "Выход")=6
             _screen.ActiveForm.Release()
      Else
             _screen.ActiveForm.Refresh()
      EndIf
для пункта Выход из Visual FoxPro:

      If messagebox ("Выходить из Visual FoxPro?", 4+32+256, "Выход")=6
             Quite
      Else
             _screen.ActiveForm.Refresh()
      EndIf
   Для сохранения созданного меню выполните команду системного меню File/Save As и
   дайте меню имя, например Menu_Form.
   Cгенерируйте файл (с расширением .MPR). Для запуска генерации описания меню
   нажмите кнопку Generate.
   Для того, чтобы Вы смогли использовать это меню при работе с формой, необходимо
   выполнить следующие действия. Не выходя из конструктора меню, выполните
   команду системного меню View/General Options. Перед Вами появится диалог
   General Options, в котором отметьте флажок Top-Level Form. Откройте в
   конструкторе форм, созданную Вами форму students. После того, как Вы оказались в
   форме выполните команду системного меню View/Code или воспользуйтесь
   соответствующей кнопкой на панели инструментов Form Designer. Перед Вами
   появится окно для написания кода программы, выберите в поле Object объект формы
   (frmStud) в поле Procedure выберите событие Init (инициализация формы) и
   запишите следующую строчку:

                       Do Menu_Form.MPR WITH THIS,.T.,.T.
    (параметры этой команды Вы можете посмотреть в помощи).
    Сохраните код программы.
   Запустите форму на выполнение. И Вы увидите, что в верхней части окна формы
   появилось созданное Вами меню, действия с которым дублируют действия с
   соответствующими командными кнопками, кроме одного пункта меню “Выход из
   Visual FoxPro”.
Вы познакомились с созданием и использованием меню для формы, это позволит Вам в
дальнейшем создавать более сложные меню.


                  9. ПЕРЕЧЕНЬ ЗАЧЕТНЫХ ЗАДАНИЙ к Части 2
      После освоения материала Вы должны самостоятельно разработать меню-
управляемый комплекс со следующими функциями:
• Главное меню, позиции: Команды Visual FoxPro 5.0