77978

Возможности Delphi для ввода и отображения дат и времен. Таймер

Лекция

Информатика, кибернетика и программирование

Таймер Компонент Delphi Timer очень простой компонент который не виден на экране но тем не менее Delphi Timer выполняет очень важные функции в программе. Delphi Timer позволяет вводить необходимые задержки между выполнением тех или иных действий. Компонент Timer имеет всего четыре свойства и одно событие и работать с компонентом Delphi Timer очень просто. Свойство Назначение Enbled Включение-выключение таймера Intervl Интервал срабатывания в миллисекундах Nme Имя компонента в программе Tg Произвольный числовой параметр Помещаем...

Русский

2015-02-05

193.5 KB

0 чел.

Возможности Delphi для ввода и отображения дат и времен. Таймер

Компонент Delphi Timer очень простой компонент, который не виден на экране, но, тем не менее, Delphi Timer выполняет очень важные функции в программе . Delphi Timer позволяет вводить необходимые задержки между выполнением тех или иных действий.

Компонент Timer имеет всего четыре свойства и одно событие, и работать с компонентом Delphi Timer очень просто.

Свойство

Назначение

Enabled

"Включение-выключение" таймера

Interval

Интервал срабатывания (в миллисекундах)

Name

Имя компонента в программе

Tag

Произвольный числовой параметр

Помещаем компонент Delphi Timer на форму. Задаем в свойстве Interval нужный интервал времени (измеряется в миллисекундах). Переходим на вкладку Events и видим единственное событие, поддерживаемое компонентом Delphi Timer: OnTimer. Выполнив по нему двойной щелчек, или также двойной щелчек по самомукомпоненту, мы попадаем в сформированный средой Delphi обработчик события, где и введем код, предусматривающий выполнение тех или иных действий.

Так как по умолчанию свойство Enabled установлено в True, то в программе через установленный в свойстве Interval промежуток времени таймер сработает, то есть выдаст событие OnTimer. Будут выполнены необходимые действия. Иногда же запланированные действия должны произойти не автоматически при старте программы, а при выполнении каких-либо других действий. В этом случае необходимо свойство Enabled в Инспекторе Объектов устанавить а False. Затем в необходимый момент нужно выполнить команду:

Timer1.Enabled:=True;

 Учтите, что пока Timer1.Enabled равно True, компонент продолжит генерировать событие OnTimer по истечении каждого промежутка времени, равного значению свойства Interval. Поэтому, если нужно только единичное срабатывание, то таймер нужно остановить, причем сразу же:

 procedure TForm1.Timer1Timer(Sender: TObject);

 begin

 timer1.enabled:=false;

 {необходимые действия}

 end;

end.    

 

Если же запрограммировать "выключение" таймера после выполнения предусмотренных в программе действий, то при дастаточном малом по сравнению с продолжительностью необходимых действий значении свойства Interval таймер вновь сработает, и это может помешать ходу программы.

Компонент Delphi Timer не является очень точным и не подходит дя измерения малых промежутков времени. Его точность порядка 50 миллисекундах. В качестве примера приведу простую программу, отображающую текущее время.

На форме будут только компонент Label и собственно наш компонент Delphi Timer. Свойство Timer можно оставить равным 1000, но раньше на более медленных компьютерах приходилось отображать время несколько раз в секунду показания "плавали", что было хорошо заметно на глаз. Размер шрифта возьмем побольше – 50, и подберем шрифт BellMT. Растянем на всю форму: Align=alClient. Запишем код:

 procedure TForm1.Timer1Timer(Sender: TObject);

 begin

 label1.Caption:=timetostr(now);

end;

end.

 Now – это системная функция, возвращаюшая текущую дату-время в соответствующем формате TDateTime. Если преобразовывать ее в строку функцией TimeToStr, то она вернет текущее время, если DateToStr, то текущую дату. Если хотим отображать в нашей программе и дату тоже, достаточно поставить еще один компонент Label, и функцией DateToStr передавать в него дату.

 


 

А также другие работы, которые могут Вас заинтересовать

85015. Профилактика вредных привычек 32.72 KB
  Познакомить учащихся с нормативноправовой базой по профилактике наркомании в нашей стране. Изучаемые вопросы Нормативноправовая база по профилактике наркомании. Три основополагающие истины для профилактики наркомании. Изложение учебного материала Во вступительной части к уроку необходимо еще раз подчеркнуть что такие привычки как курение употребление спиртных напитков и пива разновидность наркомании а наркомания заболевание которое человек приобретает добровольно начав употреблять наркотики.
85016. Общие правила оказания первой медицинской помощи 30.45 KB
  Общие правила оказания первой медицинской помощи Цель урока. Познакомить учащихся с общими правилами оказания первой медицинской помощи; обсудить ситуации при которых необходимо вызывать скорую помощь. Общий порядок в оказании первой медицинской помощи. Рекомендации по изложению учебного материала Дать определение первой медицинской помощи и определить ситуации в которых она оказывается.
85017. Оказание первой медицинской помощи при наружном кровотечении 27.74 KB
  Оказание первой медицинской помощи при наружном кровотечении практическое занятие Цель урока. Сформировать у учащихся умение оказывать первую медицинскую помощь при наружном кровотечении. Оказание первой медицинской помощи при сильном кровотечении. Организация занятия Перечислить последовательность действий при оказании первой медицинской помощи при незначительных ранах при сильном кровотечении.
85018. Оказание первой медицинской помощи при ушибах и переломах 26.3 KB
  Оказание первой медицинской помощи при ушибах и переломах Цель урока. Сформировать у учащихся умение оказания первой медицинской помощи при ушибах и переломах. Отрабатываемые вопросы Оказание первой медицинской помощи при ушибах. Оказание первой медицинской помощи при переломах.
85019. Общие правила транспортировки пострадавшего 29.59 KB
  Общие правила транспортировки пострадавшего Цель урока. Рассмотреть правила и способы транспортировки пострадавшего. Изучаемые вопросы Общие рекомендации при транспортировке пострадавшего. Способы транспортировки пострадавшего.
85020. Различные природные явления и причины их возникновения. Общая характеристика природных явлений 40.01 KB
  Различные природные явления и причины их возникновения. Изучить оболочки Земли и процессы происходящие в оболочках а также различные природные явления оказывающие влияние на безопасность человека. Основные природные явления по месту их возникновения. Природные явления геологического происхождения.
85021. Опасные и чрезвычайные ситуации природного характера 32.54 KB
  Опасные и чрезвычайные ситуации природного характера Цель урока. Сформировать у обучаемых целостное представление об опасных и чрезвычайных ситуациях природного характера о стихийных бедствиях и их возможных последствиях. Изучаемые вопросы Опасные ситуации природного характера. Чрезвычайные ситуации природного характера.
85022. Землетрясение. Причины возникновения землетрясения и его возможные последствия. Защита населения от последствий землетрясений 37.22 KB
  Причины возникновения землетрясения и его возможные последствия. Познакомить обучаемых с природным явлением геологического происхождения землетрясением объяснить причины возникновения землетрясения и порядок оценки его интенсивности. Познакомить учащихся с рекомендациями специалистов МЧС России о том как подготовиться к землетрясению как вести себя во время и после землетрясения чтобы обеспечить личную безопасность и безопасность окружающих. Факторы оказывающие влияние на силу землетрясения.
85023. Вулканы, извержение вулканов, расположение вулканов на Земле. Последствия извержения вулканов. Защита населения 34.74 KB
  Вулканы извержение вулканов расположение вулканов на Земле. Последствия извержения вулканов. Познакомить учащихся с опасными явлениями которые возникают при извержении вулканов. Обсудить меры которые принимаются по защите населения от последствий извержения вулканов.