CMD mit Output

[Delphi.Narium]

Man nehme als Zeit grundsätzlich GMT und rechne für die Anzeige ggfls. nach den aktuelle gültigen Regeln, Zeitzonen ... um.

Ansonsten braucht man halt die Information, wann und wo es überhaupt irgendwelche Zeitumstellungen gab oder gibt, bzw. den / die zur Umrechnung erforderlichen Algorithmus / Algorithmen.

Mit rein mathematischen Methoden oder purer Logik kommt man da nicht zum Ziel.
Ohne "Wissensbasis" geht da nix.

[Rollo62]

Ja, das meine ich, mit Regeln wie in meinem Link s.u.
Gibt es da vielleicht schon etwas Fertiges, oder einen allgemeingültigen Shortcut ?

[Delphi.Narium]

Da es sich um veränderliche Regeln handelt, kann es nichts allgemeingültiges geben.
Es könnte allenfalls etwas geben, das einen bestimmten Zeitrahmen abdeckt.

Suchmaschine Deiner Wahl mal mit algorithmus zeitberechnung zeitumstellung füttern und dann stöbern, es gibt vieles, interessantes, wissenswerte, unwichtiges ...

Eventuell ein Ansatz: http://www.zeitumstellung.de/

[Maekkelrajter]

Zitat:

Zitat von Delphi.Narium (Beitrag 1429208)

Da es sich um veränderliche Regeln handelt, kann es nichts allgemeingültiges geben.
Es könnte allenfalls etwas geben, das einen bestimmten Zeitrahmen abdeckt.

... und für ein bestimmtes Land gilt

Hier https://www.entwickler-ecke.de/topic...t+_2926,0.html ist eine Routine zu finden, die True zurückgibt, wenn ein Datum in der Sommerzeit liegt (nur BRD/DE seit 1980).

Delphi-Quellcode:

function CheckBRDSz(Datum: TDateTime): Boolean;
var
   y, m, d  : Word;
   sDat, eDat  : TDateTime;
begin
   DecodeDate(Datum, y, m, d);
   if  y < 1981 then
       Result := False
   else begin
       sDat := EncodeDate(y, 3, 31);
       sDat := sDat - (DayOfWeek(sDat) - 1) + Frac(StrToTime('02:00'));
       eDat := EncodeDate(y, 10 - Word(y <= 1995), 31 - Word(y <= 1995));
       eDat := eDat - (DayOfWeek(eDat) - 1) + Frac(StrToTime('03:00'));
       Result := (Datum >= sDat) and (Datum < eDat);
   end;
end

Den Code halte ich allerdings für verbesserungsfähig. U.a. halte ich es für gewagt, word(true) als +1 anzunehmen. Auch sollte ein Ausdruck wie

Delphi-Quellcode:

Frac(StrToTime('02:00')

nicht zur Laufzeit ausgewertet werden, vor allem, wenn der Code in Schleifen verwendet werden soll. Auch könnte man das Ganze flexibler gestalten indem man, anstatt Konstante zu verwenden, eine Länderspezifische Struktur mit Anfangs- und Enddatum + Uhrzeit, Geltungszeitraum usw. übergeben würde.
Ich verwende den Code, wenn ich an iTunes via COM-Interface ein Datum + Uhrzeit (z.B. 'Zuletzt gespielt') übergebe und aktuelles Datum ('now') und übergebenes Datum nicht im gleichen Zeitbereich (MEZ oder MESZ) liegen. In diesem Fall wird nämlich von iTunes je nach 'Richtung' ungefragt eine Stunde addiert bzw. subtrahiert.

Gruß LP