Преглед изворни кода

* fixed TTimeStamp for integer=smallint

git-svn-id: trunk@27087 -
nickysn пре 11 година
родитељ
комит
8926a3268c
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      rtl/objpas/sysutils/datih.inc

+ 2 - 2
rtl/objpas/sysutils/datih.inc

@@ -89,8 +89,8 @@ type
 {$endif windows}
 
    TTimeStamp = record
-      Time: integer;   { Number of milliseconds since midnight }
-      Date: integer;   { One plus number of days since 1/1/0001 }
+      Time: longint;   { Number of milliseconds since midnight }
+      Date: longint;   { One plus number of days since 1/1/0001 }
    end ;