Value := DateToStr(Date);
Value := TimeToStr(Time);
Value := DateTimeToStr(Now);
Date, Time and Now are function which return respectively the current date, time and date+time.
Date/Time functions were added lately, so they only works in latest AMC release (3.5.1, maybe even only 3.5.1.1)
Code: Select all
function EncodeDate(Year, Month, Day: Word): TDateTime;
function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;
procedure DecodeDate(DateTime: TDateTime; var Year, Month, Day: Word);
procedure DecodeTime(DateTime: TDateTime; var Hour, Min, Sec, MSec: Word);
function Date: TDateTime;
function Time: TDateTime;
function Now: TDateTime;
function DateToStr(DateTime: TDateTime): string;
function TimeToStr(DateTime: TDateTime): string;
function DateTimeToStr(DateTime: TDateTime): string;
function StrToDate(S: string): TDateTime;
function StrToDateDef(S: string; Default: TDateTime): TDateTime;
function StrToTime(S: string): TDateTime;
function StrToTimeDef(S: string; Default: TDateTime): TDateTime;
function StrToDateTime(S: string): TDateTime;
function StrToDateTimeDef(S: string; Default: TDateTime): TDateTime;