Forum: Object-Pascal / Delphi-Language
Delphi
by samso,
24. Jul 2009
Wie die Formel ja schon zeigt, kann das ja schlicht nicht sein. Auch ein Windows-PC mit Delphi ist in der Lage 13+7 korrekt auszurechnen. Der Fehler liegt also in der Umsetzung des Codes. (Es war ja auch schon spät.. :wink: ) Gibt es ein Code-Auszug?
Forum: Object-Pascal / Delphi-Language
Delphi
by samso,
23. Jul 2009
Ich verstehe die Schleifen-Bemerkung nicht wirklich. Die folgende Funktion ist aber kompatibel und berücksichtigt den Jahreswechsel (schon fast) korrekt (LSLIEFERDATE.Value darf nicht z.B. 2.1.2010 sein, denn das ist KW53/2009 - aber wer liefert da schon was? :) ).
//Ergibt Montag in <AUTOINTERVALL.Value>-Wochen
NaechsterMontag := EncodeDateWeek(YearOf(LSLIEFERDATE.Value),
...