7.3.3 Размещение графического изображения в форме

В экранные формы можно вставлять различные графические изображения. Для этого необходимо выполнить следующие действия:

1. Выбрать инструмент Image на панели инструментов Form Control и установить указатель мыши на форму. Удерживая указатель мыши в нажатом состоянии, переместить курсор по диагонали так, чтобы получилась рамка требуемого размера. Вид созданного поля будет напоминать обратную сторону конверта.

2. Открыть окно свойств Properties созданного объекта, нажав на соответствующую кнопку панели инструментов.

3. В окне свойств нужно установить курсор на свойство Picture объекта и нажать на кнопку правее поля ввода значения свойства. В результате будет открыто окно диалога Open, в результате чего графическое изображение появится в форме.

7.3.4 Создание одиночных кнопок управления

Для создания одиночной кнопки управления необходимо выполнить следующие действия:

1. На панели инструментов Form Control выбрать инструмент Command Button и поместить кнопку в определенном месте.

2. Открыть окно свойств Properties созданного объекта Command.

3. На кнопке можно расположить текст или графическое изображение. При расположении текстовой информации нужно определить свойство Caption, разместив в поле ввода значения текст, который будет отображаться на кнопке. Для расположения графического изображения нужно выбрать свойство Picture (см предыдущий пункт).

4. Когда кнопка создана, осталось определить команды, которые будут выполняться при нажатии кнопки. Для этой цели служит метод объекта Click, который автоматически вызывается при нажатии на кнопку мыши во вкладке Methods. На экране откроется окно процедур. В текстовой области окна нужно ввести команды, которые будут выполняться при нажатии на данную кнопку:

Рис. 7.6. Окно процедур для метода Click

Например, нужно создать кнопку выхода из формы, при нажатии на которую на экране будет появляться запрос о подтверждении выхода из формы (рис.7.7). при утвердительном ответе форма будет закрыта. Для выполнения этих действий используется функция Visual FoxPro MESSAGEBOX. Текст процедуры обработки события нажатия на кнопку выглядит следующим образом:

IF MESSAGEBOX ("Выходить из формы?",4+32+256, "Выход")=6

_screen.ActiveForm.Release()

ELSE

_screen.ActiveForm.Refresh()

ENDIF

Рис. 7.7. Запрос о подтверждении выхода из формы

5. После ввода текста процедуры окно процедур следует закрыть. Кнопка для выхода из экранной формы готова.

Практическая работа №7.

Цель работы: учиться создавать и модифицировать экранные формы.

Задача работы:

1. Вызвать мастер форм для создания однотабличной формы и создать формы для представлений данных, созданных в предыдущей работе.

2. Изучить работу мастера форм в случае создания формы на основе двух связанных таблиц.

3. Открыть окно конструктора формы с целью модификации созданной формы.

4. Изменить цвет фона экранной формы.

5. Переименовать заголовки полей.

6. Вставить в форму графическое изображение.

7. Используя, описанную инструкцию, создать кнопку выхода из формы.

8. Запустить созданные формы на выполнение.

9. Ввести в режиме формы новые записи в соответствующие таблицы.

10. Дать письменный ответ на вопросы:

    1. Что такое экранная форма?

    2. Для каких элементов БД могут быть созданы формы?

    3. Каково назначение экранной формы?

    4. Какие средства в Visual FoxPro используются для создания формы?

    5. Каково назначение инструментов конструктора форм?

    6. Какие свойства объектов вы использовали при работе с конструктором форм?