Delphi-PRAXiS
Seite 2 von 4     12 34      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Wann beginnt bei einem Jahr x die Sommerzeit ? (https://www.delphipraxis.net/178490-wann-beginnt-bei-einem-jahr-x-die-sommerzeit.html)

Codix32 11. Jan 2014 17:34

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
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 11. Jan 2014 18:27

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Man kann return seit einiger Zeit auch in Delphi benutzen, als exit <Value>.

himitsu 11. Jan 2014 19:10

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Wer ist denn auf diese kranke Idee gekommen die schöne Delphisyntax mit dieser komischer C-Syntax zu verschandeln?

Furtbichler 11. Jan 2014 20:47

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Zitat:

Zitat von himitsu (Beitrag 1243205)
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? :mrgreen:

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 11. Jan 2014 21:10

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
C-Sprachen sind doch alle das Selbe :roll:

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

Furtbichler 11. Jan 2014 21:16

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Zitat:

Zitat von himitsu (Beitrag 1243218)
C-Sprachen sind doch alle das Selbe :roll:

Alles eine Frage der Gewohnheit. Mittlerweile finde ich Delphi old-school und umständlich (ggü C# und .NET). Im Vergleich zu C(++) natürlich nicht. Aber wir kommen vom Thema ab. Die Diskussion C vs. Delphi gabs ja grad vor kurzem.

himitsu 11. Jan 2014 21:50

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Joar, stell dir mal vor die sind dann irgendwann mal gleich, weil jeder alles vom Anderen geklaut hat ... dann hat man ja nix mehr zum Meckern.

Furtbichler 12. Jan 2014 12:49

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Zitat:

Zitat von himitsu (Beitrag 1243221)
Joar, stell dir mal vor die sind dann irgendwann mal gleich, weil jeder alles vom Anderen geklaut hat ... dann hat man ja nix mehr zum Meckern.

Das ist eine völlig neue Sichtweise. :thumb:

Codix32 12. Jan 2014 21:52

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
@Furtbichler,

die Funktion ist ungenau.

Für das Jahr 2018 kriege ich den 1.04.2018 als Sommerzeitbeginn,
weil der 1.04.2018 ein Sonntag ist.

Delphi-Quellcode:
Function AnfangDerSommerzeit(Jahr : Word) : TDateTime;
Begin
   result := EncodeDate(Jahr,4,1);
   result := (result - DayOfWeek(Result))+1;
End;

Sir Rufo 12. Jan 2014 22:17

AW: Wann beginnt bei einem Jahr x die Sommerzeit ?
 
Zitat:

Zitat von Codix32 (Beitrag 1243339)
@Furtbichler,

die Funktion ist ungenau.

Für das Jahr 2018 kriege ich den 1.04.2018 als Sommerzeitbeginn,
weil der 1.04.2018 ein Sonntag ist.

Delphi-Quellcode:
Function AnfangDerSommerzeit(Jahr : Word) : TDateTime;
Begin
   result := EncodeDate(Jahr,4,1);
   result := (result - DayOfWeek(Result))+1;
End;

Es ist auch nur ein kleiner Fehler drin (das war der Intelligenztest :mrgreen:)
Delphi-Quellcode:
Function AnfangDerSommerzeit(Jahr : Word) : TDateTime;
Begin
   result := EncodeDate(Jahr,4,1) - 1; // letzter Tag im März, statt erster Tag im April :o)
   result := (result - DayOfWeek(Result))+1;
End;


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:58 Uhr.
Seite 2 von 4     12 34      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz