Он-лайн самоучитель Visual FoxPro
Создание формы с использованием таймера Рассмотрим пример использования таймера в форме, в которой через заданный интервал времени на экран будут выводиться данные о количестве продаж каждого товара на текущий момент времени. Форма будет отображать информацию из представления данных, содержащего наименование товара, суммарное количество проданного товара и сумму продаж по товару:
- В Проекте Sales, ИСПОЛЬЗУЯ таблицы Goods, Ordsaled и Ordsalem, создайте представление данных, содержащее наименование товара, суммарное количество проданного товара и суммы продаж по данному товару.
- Сгруппируйте данные по коду товара.
- Сохраните созданное представление данных.
- Откройте новое окно конструктора форм.
- Откройте окно среды окружения формы и добавьте в него созданное представление.
- Создайте в форме объект Grid (Таблица), разместив в нем все поля представления данных.
- Для отображения текущей даты и времени расположите два поля ввода curdate и curtime. Скорректируйте для данных объектов свойство Readonly (Только чтение), установив значение True (Истина).
- Для создания объекта-таймера нажмите кнопку Timer (Таймер) на панели инструментов Form Controls (Элементы управления формы) и расположите его в форме.
- Откройте окно процедур для метода Timer (Таймер).
-
Для присвоения значений созданным
полям curdate и curtime, а также для обновления данных о продаже товаров через
заданный интервал времени введите в окне процедур следующие значения:
This.Parent.CurDate.Value = DATE() This. Parent.CurTime.Value = TIME() This.Parent.CurDate.Refresh()
This.Parent.CurTime.Refresh()
ThisForm.Gridl.Refresh()
- Определите интервал времени, через который необходимо производить обновление данных в таблице. Для этого воспользуйтесь свойством interval (Промежуток времени), значение которого задается в миллисекундах. Для обновления данных каждые 10 мин введите значение 600 000.
- Форма готова. Сохраните ее и запустите на выполнение.
Рис. 15.24. Использование таймера в форме
Рис. 15.25. Просмотр итоговых продаж через заданный промежуток времени
При работе в сети каждый час на экране будет обновляться информация об итоговом количестве продаж товаров и их стоимости. На рис. 15.24 показан вид созданной формы, а на рис. 15.25 — просмотр данных с помощью этой формы.
Назад | Оглавление | Дальше