Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.259 Beiträge
Delphi 2006 Professional
|
Re: Funktion den Tage eines Jahres zu bestimmen
28. Jan 2003, 09:43
Hai,
warum adierst Du nicht einfach die Tage der Monate + die Tage des laufenden monats?
z.B.:
datum = 14.04.2003
Dann einfach die DaysOfMonth von Januar bis März addieren.
Prüfen ob es ein Schaltjahr ist und gegebenenfals einen Tag dazu addieren.
Jetzt noch die 14 Tage vom April dazu und fertig.
Müsste in diesem Fall also 31 + 28 + 30 + 14 = 103 ergeben
der 14.04.2004 wäre dann 104.
Stephan B. "Lasst den Gänsen ihre Füßchen"
|