Простые типы / Дата и время

uses System.SysUtils, System.DateUtils;

var
  VictoryDate: TDateTime;
begin
  //date only
  VictoryDate := EncodeDate(194559);
  WriteLn(FormatDateTime(
    'yyyy-mm-dd', VictoryDate));

  //date and time
  VictoryDate := EncodeDateTime(
    1945591000);
  WriteLn(FormatDateTime(
    'yyyy-mm-dd hh:nn', VictoryDate));
end.