Справочник функций и процедур Delphi: EncodeTime

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

EncodeTime
Функция
Формирует значение TDateTime из значений часа, минуты, секунды и миллисеккунды SysUtils unit
  function EncodeTime ( const Hour, Min, Sec, MSec : Word ) : TDateTime;

Delphi Sources

Описание
Функция EncodeTime генерирует возвращаемое значение TDateTime из переданных значений Часа (Hour), Минуты (Min), Секунды (Sec) и Миллисекунды (MSec).

Разрешенные значения параметра:

Hour = 0..23
Min = 0..59
Sec = 0..59
MSec = 0..999

Если Вы превысите эти значения, то подниметя EConvertError.
Примечания
Значение Даты для TDateTime всегда устанавливается в 30 декабря 1899. Почему, не ясно - это за 2 дня до начала 20-го столетия.
Похожие команды
DecodeDate  Извлекает значения года, месяца, дня из TDateTime переменной

DecodeDateTime  Разбивает TDateTime переменную на ее части даты/времени

DecodeTime  Разбивает значение TDateTime на отдельные значения времени

EncodeDate  Формирует значение TDateTime из значений года, месяца и дня

EncodeDateTime  Формирует значение TDateTime из значений времени и дня

 
Пример кода : Назначение времени переменной TDateTime
var
  myDate : TDateTime;

begin
  // Устанавливаем мою переменную даты используя функцию EncodeTime
  myDate := EncodeTime(12, 34, 56, 789);

  LongTimeFormat := 'hh:mm:ss.z';  // Гарантируем, что Миллисекунды будут показаны

  ShowMessage('Дата установлена в '+DateToStr(myDate));
  ShowMessage('Время установлено в '+TimeToStr(myDate));
end;

Дата установлена в 30/12/1899
Время установлено в 12:34:56.789
 


Последние добавленные на сайт исходники

DeLiKaTeS Tetris (Тетрис)

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

 

Айболит (remote control)

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте