RosettaCodeData/Task/System-time/Delphi/system-time.pas

lblDateTime.Caption := FormatDateTime('dd mmmm yyyy hh:mm:ss', Now);