[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] |
Convert a TimeStamp value to a TDateTime value.
Source position: datih.inc line 114
function TimeStampToDateTime( |
const TimeStamp: TTimeStamp |
):TDateTime; |
TimeStampToDateTime converts TimeStamp to a TDateTime format variable. It is the inverse operation of DateTimeToTimeStamp.
None.
|
Converts a TDateTime value to a TimeStamp structure. |
|
|
Converts a timestamp to a number of milliseconds. |
Program Example24; { This program demonstrates the TimeStampToDateTime function } Uses sysutils; Var TS : TTimeStamp; DT : TDateTime; Begin TS:=DateTimeToTimeStamp (Now); With TS do begin Writeln ('Now is ',time,' millisecond past midnight'); Writeln ('Today is ' ,Date,' days past 1/1/0001'); end; DT:=TimeStampToDateTime(TS); Writeln ('Together this is : ',DateTimeToStr(DT)); End.