4caf12b7

Для отображения текущей даты и...



  • Для отображения текущей даты и времени расположите два поля ввода 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.
  • Форма готова. Сохраните ее и запустите на выполнение.


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