At 08:09 3-6-2005, you wrote:
there is an inconsistency:TDateTimeRec = record case TFieldType of ftDate: (Date: Longint); ftTime: (Time: Longint); ftDateTime: (DateTime: TDateTimeAlias); end; TTimeStamp = record Time: integer; { Number of milliseconds since midnight } Date: integer; { One plus number of days since 1/1/0001 } end ; TTimeStamp,Date is integer, and TDateTimeRec.ftDate is longint. on AMD 64 integer<>longint?
integer is 32 bit. Peter _______________________________________________ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-devel
