Переглянути джерело

* TLocalTimeZone.FixDoGetOffsetsAndType

Michaël Van Canneyt 3 тижнів тому
батько
коміт
f8e45083d0
1 змінених файлів з 2 додано та 1 видалено
  1. 2 1
      packages/rtl-objpas/src/inc/dateutil.inc

+ 2 - 1
packages/rtl-objpas/src/inc/dateutil.inc

@@ -3885,7 +3885,8 @@ var
   lDst : Boolean;
 begin
   GetLocalTimeOffset(aDateTime,False,lOffset,lDst);
-  aOffSet:=lOffset;
+  aOffSet:=-lOffset* 60;
+  aDSTSave:=0;
   if lDST then
     aType:=lttDaylight
   else