|
@@ -744,10 +744,10 @@ begin
|
|
DSTEndSec := ADSTEndSec;
|
|
DSTEndSec := ADSTEndSec;
|
|
DSTStartSpecType := ADSTStartSpecType;
|
|
DSTStartSpecType := ADSTStartSpecType;
|
|
DSTEndSpecType := ADSTEndSpecType;
|
|
DSTEndSpecType := ADSTEndSpecType;
|
|
- end;
|
|
|
|
- end
|
|
|
|
- else
|
|
|
|
- DSTOffset := -3600 + TZOffset;
|
|
|
|
|
|
+ end
|
|
|
|
+ else
|
|
|
|
+ DSTOffset := -3600 + TZOffset;
|
|
|
|
+ end;
|
|
end;
|
|
end;
|
|
end;
|
|
end;
|
|
end;
|
|
end;
|