mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-11 18:49:14 +02:00
* android: In some android versions time zone names are available only after first call of localtime().
git-svn-id: trunk@47329 -
This commit is contained in:
parent
3ae370b190
commit
2e48a13bfb
@ -128,19 +128,19 @@ begin
|
||||
ReadTimeZoneFromLibC:=False;
|
||||
lTZInfo:=default(TTZInfo);
|
||||
lTZInfoEx:=default(TTZInfoEx);
|
||||
lTZInfoEx.name[false]:=c_tzname[0];
|
||||
lTZInfoEx.name[true]:=c_tzname[1];
|
||||
t:=fptime;
|
||||
tt:=localtime(@t);
|
||||
if tt <> nil then
|
||||
begin
|
||||
lTZInfoEx.name[false]:=utf8string(c_tzname[0]);
|
||||
lTZInfoEx.name[true]:=utf8string(c_tzname[1]);
|
||||
lTZInfo.daylight:=tt^.tm_isdst <> 0;
|
||||
lTZInfo.seconds:=tt^.tm_gmtoff;
|
||||
// ToDo: correct validsince/validuntil values
|
||||
lTZInfo.validsince:=low(lTZInfo.validsince);
|
||||
lTZInfo.validuntil:=high(lTZInfo.validuntil);
|
||||
SetTZInfo(lTZInfo, lTZInfoEx);
|
||||
ReadTimeZoneFromLibC:=lTZInfoEx.name[false] <> '';
|
||||
ReadTimeZoneFromLibC:=c_tzname[0] <> nil;
|
||||
end;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user