Delphi справочник - Форум программистов - Навигация  
 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      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  
Подписаться на рассылку:
Клуб программистов


Основы Delphi
EncodeTime
Функция
Формирует значение TDateTime из значений часа, минуты, секунды и миллисеккунды SysUtils unit
  function EncodeTime ( const Hour, Min, Sec, MSec : Word ) : TDateTime;
Описание
Функция 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
 



© Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки  |     |  Английская версия