[REBOL] help with GetTimezoneInformation needed ...
From: petr:krenzelok:trz:cz at: 11-Mar-2005 17:06
Hi,
I am trying to find out if red-icon-problem of IOS is caused by Rebol
incorrectly interpreting timezone info or it is OS who does it in
strange way, but I would need following routine to function :-) Sadly
enough, I get crashes ....
Here's MSDN reference -
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/gettimezoneinformation.asp
It survives the function call, but I can't touch structure, or I get
crash ...
Thanks,
-pekr-
------------------------------
lib: load/library %kernel32.dll
get-timezone-information: make routine! [
timezone [struct! [
Bias [integer!]
StandardName [string!]
StandardDate [struct! [
wYear [integer!]
wMonth [integer!]
wDayOfWeek [integer!]
wDay [integer!]
wHour [integer!]
wMinute [integer!]
wSecond [integer!]
wMilliseconds [integer!]
]
]
StandardBias [integer!]
DaylightName [string!]
DaylightDate [struct! [
wYear [integer!]
wMonth [integer!]
wDayOfWeek [integer!]
wDay [integer!]
wHour [integer!]
wMinute [integer!]
wSecond [integer!]
wMilliseconds [integer!]
]
]
DaylightBias [integer!]
]
]
return: [integer!]
] lib "GetTimeZoneInformation"
tz: make struct! [
Bias [integer!]
StandardName [string!]
StandardDate [struct! [
wYear [integer!]
wMonth [integer!]
wDayOfWeek [integer!]
wDay [integer!]
wHour [integer!]
wMinute [integer!]
wSecond [integer!]
wMilliseconds [integer!]
]
]
StandardBias [integer!]
DaylightName [string!]
DaylightDate [struct! [
wYear [integer!]
wMonth [integer!]
wDayOfWeek [integer!]
wDay [integer!]
wHour [integer!]
wMinute [integer!]
wSecond [integer!]
wMilliseconds [integer!]
]
]
DaylightBias [integer!]
] none
res: get-timezone-information tz