I have some code at home I use that reads the TZ stuff from Windows and then does its calculations etc. I will fire it thru when I get home if you have no joy.
Jeremy On Thu, Apr 3, 2014 at 1:39 PM, Rodney <[email protected]> wrote: > Probably can have a look at these links: > > > http://stackoverflow.com/questions/3448983/delphi-equivalent-to-c-sharp-date > time-isdaylightsavingtime-method-needed > > http://code.google.com/p/delphi-tzdb/ > > > Rodney > > > -----Original Message----- > From: [email protected] > [mailto:[email protected]] On Behalf Of > [email protected] > Sent: Thursday, 3 April 2014 12:00 p.m. > To: [email protected] > Subject: Delphi Digest, Vol 126, Issue 5 > > Send Delphi mailing list submissions to > [email protected] > > To subscribe or unsubscribe via the World Wide Web, visit > http://listserver.123.net.nz/mailman/listinfo/delphi > or, via email, send a message with subject or body 'help' to > [email protected] > > You can reach the person managing the list at > [email protected] > > When replying, please edit your Subject line so it is more specific than > "Re: Contents of Delphi digest..." > > > Today's Topics: > > 1. Re: Daylight savings (Robo) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Thu, 3 Apr 2014 00:49:01 +0200 > From: Robo <[email protected]> > Subject: Re: [DUG] Daylight savings > To: NZ Borland Developers Group - Delphi List > <[email protected]> > Message-ID: > <CAJLpVUM1Kd98B0xTyTRF-R8atWtqK2usPaypKX6xprkSh= > [email protected]> > Content-Type: text/plain; charset="iso-8859-1" > > NZ changed the day light saving week a few years ago, hence the incorrect > calculation on older version of Delphi. Easiest way would probably be to > copy XE5's source code. > > Robo > > > On Thu, Apr 3, 2014 at 12:30 AM, Alister Christie < > [email protected]> wrote: > > > I've noticed in Delphi XE that TTimeZone.Local.ToUniversalTime is a > > week out on daylight savings, it works correctly in XE5 however (and > > probably earlier versions). > > > > program Project6; > > > > {$APPTYPE CONSOLE} > > > > uses > > SysUtils, > > DateUtils; > > > > begin > > Writeln(DateTimeToStr(TTimeZone.Local.ToUniversalTime(StrToDateTime( > > '5/4/2014 2pm')))); > > Writeln(DateTimeToStr(TTimeZone.Local.ToUniversalTime(StrToDateTime( > > '12/4/2014 2pm')))); > > Readln; > > end. > > > > > > Outputs > > > > 5/04/2014 1:00:00 a.m. > > 6/04/2014 1:00:00 a.m. > > > > in XE (incorrectly) and > > > > 5/04/2014 1:00:00 a.m. > > 6/04/2014 2:00:00 a.m. > > > > in XE5 (correctly). XE works correctly from the 13th onwards - so > > it's just a problem for a week. > > > > Does anyone have some code that does conversions to UTC correctly for > > Delphi XE? > > > > Alister Christie > > Computers for People > > Ph: 04 471 1849 Fax: 04 471 1266http://www.salespartner.co.nz Follow > > us on Twitter http://twitter.com/salespartner PO Box 13085 > > Johnsonville Wellington > > > > > > _______________________________________________ > > NZ Borland Developers Group - Delphi mailing list > > Post: [email protected] > > Admin: http://delphi.org.nz/mailman/listinfo/delphi > > Unsubscribe: send an email to [email protected] with > > Subject: unsubscribe > > > -------------- next part -------------- > An HTML attachment was scrubbed... > URL: > > http://listserver.123.net.nz/pipermail/delphi/attachments/20140403/881f707a/ > attachment-0001.html > > ------------------------------ > > _______________________________________________ > Delphi mailing list > [email protected] > http://listserver.123.net.nz/mailman/listinfo/delphi > > End of Delphi Digest, Vol 126, Issue 5 > ************************************** > > _______________________________________________ > NZ Borland Developers Group - Delphi mailing list > Post: [email protected] > Admin: http://delphi.org.nz/mailman/listinfo/delphi > Unsubscribe: send an email to [email protected] with > Subject: unsubscribe >
_______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: [email protected] Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to [email protected] with Subject: unsubscribe
