Реляционные СУБД в 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, а также для обновления данных о продаже товаров через заданный интервал времени введите в окне процедур следующие значения:

    11. 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 — просмотр данных с помощью этой формы.


Содержание раздела