paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-28 21:40:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Corrections of omissions in GetLocalTime

Browse Source 
git-svn-id: trunk@47528 -
This commit is contained in:
Tomas Hajny 2020-11-22 15:53:50 +00:00
parent f5a95782a9
commit ba84c70356
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/os2/sysutils.pp
View File

@ -559,10 +559,11 @@ begin
Year:=DT.Year; Year:=DT.Year;
Month:=DT.Month; Month:=DT.Month;
Day:=DT.Day; Day:=DT.Day;
DayOfWeek:=DT.WeekDay;
Hour:=DT.Hour; Hour:=DT.Hour;
Minute:=DT.Minute; Minute:=DT.Minute;
Second:=DT.Second; Second:=DT.Second;
MilliSecond:=DT.Sec100; MilliSecond:=DT.Sec100 * 10;
end; end;
end; end;