Functions Delphi

1 function DateTimeToStr ( DateTime : TDateTime ) : string;
2 function DateTimeToStr ( DateTime : TDateTime; const FormatSettings : TFormatSettings ) : string;


Description
The DateTimeToStr function converts a TDateTime value DateTime into a formatted date and time string.

The string comprises :

Date in ShortDateFormat
1 blank
Time in LongTimeFormat

See these two formatting variables for more details.

The date and time formats are also affected by the DateSeparator and TimeSeparator values.

Version 2 of this function is for use within threads. You furnish the FormatSettings record before invoking the call. It takes a local copy of global formatting variables that make the routine thread safe.

Notes
If the time is Midnight (00:00), then it is not stored in the string. Quite why is another matter.


Related commands
DateSeparator The character used to separate display date fields
DateTimeToString Rich formatting of a TDateTime variable into a string
LongTimeFormat Long version of the time to string format
ShortDateFormat Compact version of the date to string format
StrToDate Converts a date string into a TDateTime value
StrToDateTime Converts a date+time string into a TDateTime value
StrToTime Converts a time string into a TDateTime value
TFormatSettings A record for holding locale values for thread-safe functions
TimeSeparator The character used to separate display time fields

Example code : Converting two date/time values to strings
var
myDate : TDateTime;
begin
myDate := StrToDateTime('09/02/2002 12:00');
ShowMessage('Middle of a day = '+DateTimeToStr(myDate));
myDate := StrToDateTime('09/02/2002 00:00');
ShowMessage('Start of a day = '+DateTimeToStr(myDate));
end;

Show full unit code
Middle of a day = 09/02/2002 12:00:00
Start of a day = 09/02/2002