6. Набор форм

В Visual FoxPro вы можете объединить несколько форм в набор форм. Для этого служит команда Create Form Set (Создать набор форм) из меню Form (Форма), создающая объект FormSet.

Создадим объект FormSet из двух форм. Первая форма содержит данные о клиентах таблицы customer, а вторая — итоговую сумму покупок клиентов. Для создания набора форм выполните следующие действия:

1. Откройте окно конструктора для создания новой формы.

2. Выберите в меню Form (Форма) команду Create Form Set (Создать набор форм).

3. Откройте окно Data Environment (Среда окружения) и добавьте в окружение таблицу customer и представление данных sumcust, содержащее сведения об итоговой стоимости покупок клиентов.

4. Скорректируйте свойство caption (Надпись) для первой формы, введя заголовок Клиенты.

5. В форме создайте объект Grid (Таблица), разместив в нем необходимые поля таблицы Customer.

6. Для добавления второй формы выполните команду Add New Form (Добавить новую форму) из меню Form (Форма). В окне конструктора форм откроется вторая форма.

7. Скорректируйте свойство caption (Надпись) для второй формы, введя заголовок Итоговые суммы покупок,

8. Во второй форме создайте объект Grid (Таблица), разместив в нем поля представления данных Sumcust.

Рис. 23. Просмотр набора форм

1. Расположите формы на экране таким образом, чтобы они были удобны для поочередного просмотра.

2. Сохраните созданную форму, нажав кнопку Save (Сохранить) на стандартной панели инструментов.

3. Запустите форму на выполнение.

4. На экране открывается две формы (рис. 15.23). Просмотрев данные в первой форме, перейдите во вторую форму. Для этого активизируйте ее, щелкнув мышью в любом ее месте. Во второй форме вы можете просмотреть итоговые суммы покупок интересующего вас клиента.

7. Таймер

В Visual FoxPro существует объект, обрабатывающий данные системных часов, называемый таймером. Его можно использовать для отображения в форме системных часов, а также для выполнения определенных действий через заданный интервал времени. Например, используя объект данного типа, можно обновлять данные в таблицах.

Для размещения в форме таймера используется кнопка Timer (Таймер) на панели инструментов Form Controls (Элементы управления формы). Объект данного типа обладает свойствами, описанными в табл. 15.4.

Таблица 4

Назначение свойств объекта Timer

Свойство	Назначение
Interval (Интервал)	Интервал активизации объекта в миллисекундах
Enabled (Доступно)	Устанавливает режим работы таймера. Если значение свойства равно True (Истина), то таймер начинает отсчитывать время сразу же после запуска формы. В противном случае вы должны запустить таймер по какому-либо внешнему событию (например, при нажатии на кнопку)

Помимо вышеперечисленных свойств, для объекта Timer (Таймер) определяется событие Timer (Таймер), наступающее через каждый установленный в свойстве interval (Промежуток времени) промежуток времени. В процедуре обработки данного события необходимо определить действия, выполняемые с заданным интервалом.

Для запуска таймера используется метод Reset (Установить), не связанный с каким-либо событием. Поэтому вы должны выполнить его при наступлении каких-либо других событий, например, при нажатии кнопки запуска таймера.