PHSYS - Wiki

A função EncodeDateTime combina valores individuais de ano, mês, dia, hora, minuto, segundo e milissegundo em um único valor de data e hora do tipo TDateTime.

Sintaxe

Function EncodeDateTime(Ano, Mes, Dia, Hora, Minuto, Segundo, MiliSegundo: Word): TDateTime;

Parâmetros

Nome	Tipo	Descrição
Ano	Word	Ano para a data.
Mês	Word	Mês para a data (1 a 12).
Dia	Word	Dia do mês para a data.
Hora	Word	Hora do dia (0 a 23).
Minuto	Word	Minuto (0 a 59).
Segundo	Word	Segundo (0 a 59).
MiliSegundo	Word	Milissegundo (0 a 999).

Exemplos

var
  dataHora: TDateTime;
  ano, mes, dia, hora, minuto, segundo, miliSegundo: Word;
begin
  ano := 2024;       // 2024
  mes := 7;          // Julho
  dia := 22;         // 22º dia
  hora := 14;        // 14 horas
  minuto := 30;      // 30 minutos
  segundo := 0;      // 0 segundos
  miliSegundo := 0;  // 0 milissegundos
  dataHora := EncodeDateTime(ano, mes, dia, hora, minuto, segundo, miliSegundo);
  Informacao(DateTimeToStr(dataHora));
end.