Função EncodeTime

A função EncodeTime combina valores individuais de hora, minuto, segundo e milissegundo em um único valor de hora do tipo TDateTime.

Sintaxe

Function EncodeTime(Hora, Minuto, Segundo, MiliSegundo: Word): TDateTime;

Parâmetros

Nome Tipo Descrição
Nome Tipo Descrição
Hora Word Hora (0 a 23).
Minuto Word Minuto (0 a 59).
Segundo Word Segundo (0 a 59).
MiliSegundo Word Milissegundo (0 a 999).

Exemplos

var
  hora: TDateTime;
  h, m, s, ms: Word;
begin
  h := 14;      // 14 horas
  m := 30;      // 30 minutos
  s := 0;       // 0 segundos
  ms := 0;      // 0 milissegundos
  hora := EncodeTime(h, m, s, ms);
  Informacao(TimeToStr(hora));
end.