Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by juergen,
29. Dez 2019
Hallo zusammen,
mit der Lösung aus meinem Post #14 war ich mir nicht 100%ig sicher. Ich muss mich aber auf die ermittelte Anzahl an Monaten und Wochen verlassen können!
Ich habe dann gesucht und eine Tabelle gefunden, wo die Anzahl der Wochen und die Anzahl der Monate und der jeweilige Tag als Datum drin stehen. Somit hatte ich eine Basis für Reverse Engineering!
Dann habe ich eine...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by juergen,
28. Dez 2019
Danke für deine Hinweise, Uwe! Ich hatte mich zum Zeitpunkt wo ich den Thread erstellt hatte durch die Function DateToStr() täuschen lassen. Zu dem Zeitpunkt wusste ich noch nicht, dass der Wert negativ wird wenn das Datum < 30.12.1899 ist und dass das ein gültiger Wert ist.
@Redeemer,
Danke für deine Hilfe!
Ich verwende nun folgenden Code der in etlichen Tests mit den Werten aus den...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by juergen,
27. Dez 2019
Hallo,
ja, meine Angaben sind wohl unvollständig.
Die Anzahl von Wochen und Monaten stehen in einigen Tabellen einer Datenbank.
ich muss damit "irgendwie" zurecht kommen. Datumswerte gibt es nicht. Ich muss z.B. alle Datensätze auslesen, die vom April 2019 sind. Das entspricht der Anzahl von Monaten => 24220.
Ich gehe davon aus, dass als Grundlage für die Berechnungen rückwirkend bis zum...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by juergen,
27. Dez 2019
Hallo zusammen,
ich muss die Anzahl der Monate und Wochen seit dem 01.01.0001 bis zu einem frei auswählbaren Datum ermitteln.
Das Problem: Alle Funktionen die ich kenne nutzen Date(time) welche wohl nur einen Gültigkeitsbereich bis 30.12.1899 haben.
Jetzt habe ich schon etwas getrickst mit abs(ISO8601ToDate(…)), aber irgendwas funktioniert da noch nicht 100%ig.
Hier einer meiner Versuche:...