Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das Datum ? (https://www.delphipraxis.net/139121-bekannt-tag-des-jahres-2009-wie-ermittle-ich-das-datum.html)

HolgerCW 24. Aug 2009 08:44
Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das Datu
 
Hallo zusammen,

ich möchte mit einer For-Schleife 1..366 alle Tage eines Jahres durchgehen und dann immer das entsprechende Datum für die 1, 2, 3, u.s.w. ermitteln. Gibt es für das Ermitteln des Datums eine Funktion ?

Gruss

Holger

angos 24. Aug 2009 08:49
Re: Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das
 
Hi nochmal :) Ebenfalls DateUtils. Aber diesmal die Funktion: EncodeDateDay

gruß
angos

m.wollert 24. Aug 2009 08:51
Re: Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das
 
Hi,

mit EncodeDate kannst Du das Datum des ersten Tages eines Jahres codieren. Anschließend würde ich in einer While-Schleife solange die Daten durchlaufen, solange das Datum noch kleiner < EncodeDate(Jahr + 1, 1, 1)
(Parameterreihenfolge müsstest Du nochmal selbst nachschauen ;-)

Grüße
Michael

Satty67 24. Aug 2009 08:54
Re: Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das
 
Wobei man hier auch einem TDate einfach den 1.1.2009 zuweisen könnte und dann zu TDate den Tag addieren.

himitsu 24. Aug 2009 09:03
Re: Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das
 
@Satty: du meinst wohl 31.12.2008+x oder 01.01.2009-1+x

HolgerCW 24. Aug 2009 09:36
Re: Bekannt: Tag des Jahres 2009 -> Wie ermittle ich das
 
Vielen dank


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:55 Uhr.

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