Wann beginnt bei einem Jahr x die Sommerzeit ?

[Codix32]

Zitat von Furtbichler:

Wäre es möglich, das das so einfach geht?

Delphi-Quellcode:

Function AnfangDerSommerzeit(Jahr : Word) : TDateTime;
Begin
  result := EncodeDate(Jahr,4,1);
  return result - DayOfWeek(Result); // Letzter Sonntag im März
End;

Function EndeDerSommerzeit(Jahr : Word) : TDateTime;
Begin
  result := EncodeDate(Jahr,11,1);
  return result - DayOfWeek(Result); // Letzter Sonntag im Oktober
End;

Hilfe Furtbichler,

was macht denn das 'return' da drin?
Ist das 'return' nicht eher was für C++ ?

Das erinnert mich irgendwie auch an Basic, aber ehrlich, ich verstehe die Funktion so nicht.

Ich habe Deine Funktion in meinem Delphi getestet und so geht sie dann:

Delphi-Quellcode:

Function TForm1.AnfangDerSommerzeit(Jahr : Word) : TDateTime;
Begin
   result := EncodeDate(Jahr,4,1);
   result:= (result - DayOfWeek(Result))+1; // Letzter Sonntag im März
End;

Function TForm1.EndeDerSommerzeit(Jahr : Word) : TDateTime;
Begin
   result := EncodeDate(Jahr,11,1);
   result:= (result - DayOfWeek(Result))+1; // Letzter Sonntag im Oktober
End;

Hm, da stellt sich mir noch die Frage, ob die Funktion zwei Resultate blitzschnell und fürs Auge unbemerkt liefert, oder ob das erste 'result' in der Funktion verbleibt...

[Klaus01]

Zitat von Codix32:

Hm, da stellt sich mir noch die Frage, ob die Funktion zwei Resultate blitzschnell und fürs Auge unbemerkt liefert, oder ob das erste 'result' in der Funktion verbleibt...

Das erste result wird doch überschrieben.
Mit result wird ja auch nicht aus der Funktion herausgesprungen, daher zählt das was als letztes, bevor die Funktion verlassen wird, in result geschrieben wird.

Grüße
Klaus

[Furtbichler]

Zitat von Codix32:

was macht denn das 'return' da drin?

C# verdorben, sorry.

Das 'result' ist einfach eine lokale Variable, die Du verwenden kannst. Wie Klaus01 schon richtig schrieb, entspricht sie dem Resultat. Eine Sprunganweisung ist mit der Zuweisung nicht verbunden.

[Codix32]

Zitat:

was macht denn das 'return' da drin?
C# verdorben, sorry.

Das 'result' ist einfach eine lokale Variable, die Du verwenden kannst. Wie Klaus01 schon richtig schrieb, entspricht sie dem Resultat. Eine Sprunganweisung ist mit der Zuweisung nicht verbunden.

Danke Furtbichler und Klaus01.

[Union]

Man kann return seit einiger Zeit auch in Delphi benutzen, als exit <Value>.

[himitsu]

Wer ist denn auf diese kranke Idee gekommen die schöne Delphisyntax mit dieser komischer C-Syntax zu verschandeln?

[Furtbichler]

Zitat von himitsu:

Wer ist denn auf diese kranke Idee gekommen ...?

Wie meinen, der Herr? Höre ich da etwa Neid auf eine richtige Programmiersprache (C#) in einer IDE, die nicht ständig abschmiert und Sprachelementen, die vollständig und korrekt umgesetzt sind?

Um deine Frage zu beantworten (da dein Scrollrad ja defekt ist). Icke.

PS: Ach, Du hast das ja mit C verwechselt. Stimmt, das wäre dann wirklich *krank*.

[himitsu]

C-Sprachen sind doch alle das Selbe

Wobei ich den meinte, der das in den Compiler reingebaut hat, bzw. der die Idee dazu hatte.