Explorar o código

* fixed TTimeStamp for integer=smallint

git-svn-id: trunk@27087 -
nickysn %!s(int64=11) %!d(string=hai) anos
pai
achega
8926a3268c
Modificáronse 1 ficheiros con 2 adicións e 2 borrados
  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 ;