Creating a date in Delphi

Basic types / Date and time

Getting the current date
Converting from a string
Converting to a string
Comparing dates
Creating a date
Getting the year, month, day
Date arithmetic
Interval between two dates

uses System.SysUtils, System.DateUtils;

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

  //date and time
VictoryDate := EncodeDateTime(
    1945, 5, 9, 1, 0, 0, 0);
  WriteLn(FormatDateTime(
    'yyyy-mm-dd hh:nn', VictoryDate));
end.