Иллюстрированный самоучитель по Visual FoxPro 8

Создание формы с использованием таймера

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

1. В проекте Sales, используя таблицы Goods, Ordsaled и Ordsalem, создайте представление данных, содержащее наименование товара, суммарное количество проданного товара и суммы продаж по данному товару.
2. Сгруппируйте данные по коду товара.
3. Сохраните созданное представление данных.
4. Откройте новое окно конструктора форм.
5. Откройте окно среды окружения формы и добавьте в него созданное представление.
6. Создайте в форме объект Grid (Таблица), разместив в нем все поля представления данных.
7. Для отображения текущей даты и времени расположите два поля ввода curDate и curTime. Скорректируйте для данных объектов свойство Readonly (Только чтение), установив значение True (Истина).
8. Для создания объекта-таймера нажмите кнопку Timer (Таймер) на панели инструментов Form Controls (Элементы управления формы) и расположите его в форме.
9. Откройте окно процедур для метода Timer (Таймер).
10. Для присвоения значений созданным полям curDate и curTime, а также для обновления данных о продаже товаров через заданный интервал времени введите в окне процедур следующие значения:

    This.Parent.CurDate.Value = DATE()
    This.Parent.CurTime.Value = TIME()
    This.Parent.CurDate.Refresh()
    This.Parent.CurTime.Refresh()
    ThisForm.Gridl.Refresh()
    

11. Определите интервал времени, через который необходимо производить обновление данных в таблице. Для этого воспользуйтесь свойством interval (Промежуток времени), значение которого задается в миллисекундах. Для обновления данных каждые 10 мин введите значение 600000.
12. Форма готова. Сохраните ее и запустите на выполнение.

При работе в сети каждые десять минут на экране будет обновляться информация об итоговом количестве продаж товаров и их стоимости. На рис. 15.25 показан вид созданной формы, а на рис. 15.26 – просмотр данных с помощью этой формы.

Рис. 15.25. Использование таймера в форме

Рис. 15.26. Просмотр итоговых продаж через заданный промежуток времени