[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index]

Reference for unit 'sysutils' (#rtl)

DateTimeToString

Converts a TDateTime value to a string with a given format.

Declaration

Source position: datih.inc line 157

procedure DateTimeToString(

out Result: string;

const FormatStr: string;

const DateTime: TDateTime;

Options: TFormatDateTimeOptions = []

); procedure DateTimeToString(

out Result: string;

const FormatStr: string;

const DateTime: TDateTime;

const FormatSettings: TFormatSettings;

Options: TFormatDateTimeOptions = []

);

Description

DateTimeToString returns in Result a string representation of DateTime using the formatting specified in FormatStr.

for a list of characters that can be used in the FormatStr formatting string, see formatchars.

Note that for 'c', if the time part is 0 (i.e. midnight), no time is appended.

Errors

In case a wrong formatting character is found, an EConvertError is raised.

Example

Program Example4;

{ This program demonstrates the DateTimeToString function }

Uses sysutils;


Procedure today (Fmt : string);

Var S : AnsiString;

begin
  DateTimeToString (S,Fmt,Date);
  Writeln (S);
end;

Procedure Now (Fmt : string);

Var S : AnsiString;

begin
  DateTimeToString (S,Fmt,Time);
  Writeln (S);
end;

Begin
  Today ('"Today is "dddd dd mmmm y');
  Today ('"Today is "d mmm yy');
  Today ('"Today is "d/mmm/yy');
  Now ('''The time is ''am/pmh:n:s');
  Now ('''The time is ''hh:nn:ssam/pm');
  Now ('''The time is ''tt');
End.

FormatDateTime		Return a string representation of a `TDateTime` value with a given format.
formatchars		Date and time formatting characters

DateTimeToString

Declaration

Description

Errors

See also

Example