Тема: «Створення проекту додатку»

Вид материалаДокументы

Содержание


Практична робота № 12
All, виберіть групу Other
Prompt введіть найменування першого пункту меню – Анкета
Messagebox(текст_сообщения, тип_диалогового_окна, заголовок)
Create пункту меню «Анкета».
Prompt першого рядка заголовок Форми.
Menu Level
Prompt третього рядка заголовок Запити.
Menu Level
View виберіть команду General Options
File виберіть команду Save as
Подобный материал:
1   2   3   4   5   6

Практична робота № 12


«Створення меню додатку»

  1. Створення рядка меню (горизонтального меню).
  • Відкрийте раніше створений проект.
  • Перейдіть на вкладку All, виберіть групу Other, потім виберіть групу Menus і натисніть кнопку New вікна проекту.
  • У діалоговому вікні New Menu, що з'явилося, виберіть варіант меню Menu (горизонтальне меню). В результаті запускається конструктор меню, а в основне меню Visual FoxPro додається новий пункт Menu. У конструкторі меню в полі Prompt можна ввести найменування пунктів меню. Список Result, що розкривається, використовується для вказівки типу меню (Command – Команда, Pad Name – Найменування рядка меню, Submenu – Підміню, Procedure – Процедура). Кнопка Options відкриває діалогове вікно Prompt Options, в якому можна визначити додаткові параметри даного елементу меню (наприклад, «гарячі клавіші»). У списку Menu level указується рівень поточного меню.
  • У полі Prompt введіть найменування першого пункту меню – Анкета – і натисніть клавішу <Tab> для переходу на наступне поле.
  • Для визначення типу пункту меню натисніть кнопку розкриття списку і виберіть значення Submenu.
  • Перейдіть на наступний рядок і введіть найменування і тип другого пункту меню. Аналогічно введіть найменування інших пунктів меню (рис.1).


Prompt

Result




Анкета

Submenu




Сесія

Submenu




Книги

Submenu




Облік

Submenu




Довідка

Procedure




Вихід

Command






Рис. 1
  • Визначите для пунктів меню «гарячі клавіші». Для цього необхідно включити в його ім'я перед активізуючим символом наступні символи: \<. Як «гаряча клавіша» можна використовувати перший символ імені пункту меню або будь-який інший символ. У нашому прикладі перед іменами пунктів розмістите цифри і їх використовуйте як «гарячі клавіші» (рис.2).

Prompt


\<1 Анкета




\<2 Сесія




\<3 Книги




\<4 Облік




\




\





Рис. 2


  • Визначите клавіші швидкого виклику пунктів меню. Для цього виконаєте наступні дії:

1). Встановіть курсор на пункт меню «Анкета».

2). Натисніть кнопку Options

3). У діалоговому вікні Prompt Options, що відкрилося, в області Shortcut поле Key Label містить підказку press the key. Встановіть курсор в полі Key Label і натисніть комбінацію клавіш Alt + 1, яка використовуватиметься для швидкого виклику.

4). Натисніть кнопку Ok.

5).  Аналогічні дії виконаєте і для решти полів, задавши їм відповідно наступні комбінації клавіш:

Сесія – Alt + 2;

Книги – Alt + 3;

Облік – Alt + 4;

Довідка – F1;

Вихід – Alt + X.

  • Визначите команду, яка виконуватиметься при виборі пункту меню «Вихід». Для цього виділите даний пункт і в полі, розташованому праворуч від списку Result, введіть команду QUIT.



  • Визначите послідовність команд, яка повинна виконуватися при виборі пункту меню «Довідка». Для цього виділите пункт «Довідка». Натисніть кнопку Create і в діалоговому вікні редагування процедури, що відкрилося, визначите фрагмент коди, пов'язаний з елементом рядка меню. У нашому прикладі необхідно ввести наступний код (дані повинні бути свої):

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

chr(13)+;

"Старшинова Ольга Николаєвна"+;

chr(13)+;

"Викладач дисципліни Бази данных"+;

chr(13)+;

chr(13)+;

"(с) НЕПК 2001 рік", 0+64+0, "Довідка")

Примітка:

Функція MESSAGEBOX виводить на екран діалогове вікно. Вона має наступний формат:

Messagebox(текст_сообщения, тип_диалогового_окна, заголовок)

Аргумент тип_диалогового_окна є сумою трьох параметрів: типу кнопок, типу значків і номера кнопки, вибраної за умовчанням

Функція chr(13) здійснює перехід на новий рядок.

  • Визначите підміню. Для цього виконаєте наступні дії:

1). Натисніть кнопку Create пункту меню «Анкета». На екрані з'являється порожнє вікно конструктора меню. Список Menu Level нового вікна містить мітку поточного пункту меню.

2). Введіть в поле Prompt першого рядка заголовок Форми. Використовуючи список Result, задайте тип пункту Submenu. Натисніть кнопку Create. Введіть в поле Prompt першого рядка заголовок Анкета. Використовуючи список Result, задайте тип пункту Procedure і у вікні редагування процедури введіть

set default to c:\Visual FoxPro Projects

do form анкета.scx

Закрийте вікно процедури.

Примітка: У командах VFP в іменах тек і файлів не повинно бути пропусків.


3). У другому рядку в полі Prompt введіть Анкета2. Використовуючи список Result, задайте тип пункту Procedure і у вікні редагування процедури введіть команди:

set default to c:\ Visual FoxPro Projects

do form анкета2.scx

Закрийте вікно процедури.

4). За допомогою вікна Menu Level перейдіть на рівень вище.

5). У другому рядку введіть заголовок Звіти. Використовуючи список Result, задайте тип пункту Submenu. Натисніть кнопку Create. Введіть в поле Prompt першого рядка заголовок Анкета. Використовуючи список Result, задайте тип пункту Command і в сусідньому полі надрукуйте команду:

report form c:\ Visual FoxPro Projects \анкета


Примітка:

При виконанні цієї команди звіт друкуватиметься тільки на екрані у вікні VFP. Для того, щоб очистити екран після проглядання звіту потрібно в командному вікні ввести команду clear. Щоб звіт виводився на друк, а не на екран потрібно команду використовувати в наступному форматі:

report form c:\ Visual FoxPro Projects \анкета to printer


6). У другому рядку в полі Prompt введіть заголовок Адреси. Використовуючи список Result, задайте тип пункту Command і в сусідньому полі надрукуйте команду:

report form c:\ Visual FoxPro Projects\адреса

7). За допомогою вікна Menu Level перейдіть на рівень вище.

8).  Введіть в поле Prompt третього рядка заголовок Запити. Використовуючи список Result, задайте тип пункту Submenu. Натисніть кнопку Create. Введіть в поле Prompt першого рядка заголовок Договір. Використовуючи список Result, задайте тип пункту Procedure і у вікні редагування процедури введіть

set default to c:\ Visual FoxPro Projects

do договір.qpr

Закрийте вікно процедури.

9). У другому рядку в полі Prompt введіть Рік народження. Використовуючи список Result, задайте тип пункту Procedure і у вікні редагування процедури введіть

set default to c:\ Visual FoxPro Projects

do год_рождения.qpr

Закрийте вікно процедури.

10). Перейдіть на перший рівень меню, вибравши в списку Menu Level пункт Menu Bar.

11).Аналогично визначите підміню для пунктів «Сесія», «Книги», «Облік».

  • Для поліпшення зовнішнього вигляду меню створіть розділові лінії. Для цього виконаєте наступні дії:

1). Виділите пункт меню «Анкета» і натисніть кнопку Edit.

2).  У тому, що відкрився підміню встановіть курсор на пункті «Звіти» і натисніть кнопку Insert.

3). У полі Prompt освіченого пункту меню видаліть рядок New Item і введіть \ -

4).  Встановіть курсор на пункті «Запити» і натисніть кнопку Insert, видаліть рядок New Item і введіть \ -

5).  Перейдіть на рівень вище і аналогічно створіть розділові лінії в підміню пунктів «Сесія», «Книги», «Облік».


  • Визначите параметри меню. Для цього з меню View виберіть команду General Options. У діалоговому вікні General Options, що відкрилося, в групі Location виберіть варіант розміщення рядка створеного меню Replace. Це означає, що при виконанні створене Вами меню заміщатиме стандартне меню VFP. Потім натисніть кнопку Ok.

Примітка:

Для того, щоб відновити на екрані стандартне горизонтальне меню VFP в командному вікні введіть команду:

set sysmenu to default
  1. Збережете створене меню. Для цього в меню File виберіть команду Save as, у вікні, що відкрилося, в полі Папка виберіть теку Visual FoxPro Projects, в полі Save Menu введіть ім'я меню Меню1, що зберігається. У завершенні натисніть кнопку Зберегти.



  1. Проглянете створене меню за допомогою кнопки Preview вікна конструктора меню.



  1. Згенеруйте створене меню, щоб його можна було використовувати в додатку. Для цього виконаєте наступні дії:
  • У меню Menu виберіть команду Generate. При цьому відкриється діалогове вікно Generate Menu.
  • У полі Output File введіть ім'я файлу, який буде створений в результаті генерації.
  • Для запуску генерації опису меню натисніть кнопку Generate.



  1. Запустіть програму меню на виконання. Для цього у вікні проекту встановіть курсор на імені створеного меню і натисніть кнопку Run. На екрані з'явиться створене вами меню, яке заміщатиме горизонтальне меню Visual FoxPro. Перевірте працездатність кожного пункту меню.

Примітка:

Якщо створене меню працює некоректно і потребує відладки, у вікні проекту виділіть його ім'я Меню1 і натисніть кнопку Modify. Після внесення змін меню слід наново згенерувати, як описано в пункті 4.
  1. Створіть спливаюче меню. Для цього виконаєте наступні дії:
  • У вікні проекту на вкладці All виберіть групу Menus і натисніть кнопку New вікна проекту.
  • У діалоговому вікні New Menu, що з'явилося, натисніть кнопку Shortcut. Відкриється вікно конструктора меню.
  • У полі Prompt послідовно введіть тексти пунктів меню і визначте для них виконувані дії (аналогічно горизонтальному меню).
  • Збережете створене меню з ім'ям Меню2.
  • Для генерації виберіть команду Generate в меню Menu.
  • Запустіть створене меню на виконання.



  1. Закрийте проект.



  1. Закрийте додаток.