@@ -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