Wann beginnt bei einem Jahr x die Sommerzeit ?

**hoika**

Hallo #,

aus ptb.de

Zitat:

Die mitteleuropäische Sommerzeit (MESZ) beginnt jeweils am letzten Sonntag im Monat März um 2 Uhr mitteleuropäischer Zeit. An diesem Tag werden die Uhren um 2 Uhr um eine Stunde auf 3 Uhr vorgestellt. Ziel der Zeitumstellung ist die bessere Ausnutzung der Tageshelligkeit.

Die Sommerzeit endet jeweils am letzten Sonntag im Monat Oktober um 3 Uhr mitteleuropäischer Sommerzeit. An diesem Tag werden die Uhren um 3 Uhr auf 2 Uhr zurückgestellt. Bei dieser doppelt erscheinenden Stunde wird die erste Stunde als 2A und die zweite Stunde als 2B bezeichnet.

Wir sind faul:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.FormCreate(Sender: TObject);

var

  tz : TTimeZoneInformation;

  tdtTimeStart : TDateTime;

  tdtTimeEnd   : TDateTime;

  sText        : string;

begin

  GetTimeZoneInformation(tz);

  tz.DaylightDate.wYear := 2014;

  tz.StandardDate.wYear := 2014;

  tdtTimeStart := SystemTimeToDateTime(tz.DaylightDate);

  tdtTimeEnd   := SystemTimeToDateTime(tz.StandardDate);

  sText := 'Start: '+DateToStr(tdtTimeStart)+#13#10+

           'Ende: '+DateToStr(tdtTimeEnd);

  MessageBox(0, PChar(sText), '', 0);

end;

Aber: Es kommt 5.3. raus beim Start.

Ich könnte dass bissel auch per Funktion schreiben,
will ich aber nicht

oder muss ich doch ???

Heiko

Wann beginnt bei einem Jahr x die Sommerzeit ?

Wann beginnt bei einem Jahr x die Sommerzeit ?

Forumregeln