Создание формы с использованием таймера
Рассмотрим пример использования таймера в форме, в которой через заданный интервал времени на экран будут выводиться данные о количестве продаж каждого товара на текущий момент времени. Форма будет отображать информацию из представления данных, содержащего наименование товара, суммарное количество проданного товара и сумму продаж по товару:
В проекте 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 мин введите значение 600000.
Форма готова. Сохраните ее и запустите на выполнение.
Рис. 15.25. Использование таймера в форме
Рис. 15.26. Просмотр итоговых продаж через заданный промежуток времени
При работе в сети каждые десять минут на экране будет обновляться информация об итоговом количестве продаж товаров и их стоимости. На рис. 15.25 показан вид созданной формы, а на рис. 15.26 — просмотр данных с помощью этой формы.
Содержание раздела