Entwickler-Ecke

Sonstiges (Delphi) - Woche mit Anfangs- und Enddatum


delphi_noop - Di 26.05.09 18:57
Titel: Woche mit Anfangs- und Enddatum
Hallo zusammen!

Hätte eine ganz blöde Frage...

Würde gerne das Anfangs- und Enddatum einer Woche auf einem Panel ausgegeben haben...
z.B. diese Woche: Beginndatum 25.05.2009; Enddatum 31.05.2009;

Wie bekomm ich das hin?

Wär nett, wenn mir jemand helfen könnte!!! ;-)

Danke!!!


Delete - Di 26.05.09 18:59

Schau mal nach StartOfTheWeek bzw. EndOfTheWeek aus der Unit DateUtils.


Narses - Di 26.05.09 19:00

Moin und :welcome: im Forum!

Probier mal das hier aus: ;)

Delphi-Quelltext
1:
ShowMessage(IntToStr(DayOfWeek(Now)));                    
Das liefert eine Tagesnummer (Sonntag=1). :idea:

cu
Narses


delphi_noop - Di 26.05.09 19:03

Danke für deinen Tipp, aber in der Delphi-Hilfe find ich nix passendes!

Hättest du vielleicht ein Beispiel dafür fürs bessere Verständnis?

---Moderiert von user profile iconNarses: Beiträge zusammengefasst---

Danke "Narses"! Aber das ist leider nicht das, was ich wollte...

Also ich möchte von einer Woche das Anfangsdatum und das Enddatum wissen!!! ;-)


Delete - Di 26.05.09 19:06


Delphi-Quelltext
1:
ShowMessage(DateToStr(DateUtils.EndOfTheWeek(now)));                    

Das gibt Dir das Datum des kommenden Sonntags aus.


delphi_noop - Di 26.05.09 19:11

Danke "DeddyH"!
Aber welche Delphi-Version verwendest du? Ich verwende Delphi7 und da klappt das ned so richtig! :-(


Delete - Di 26.05.09 19:13

Ich habe Delphi 2007. Ob es diese Funktion bereits in Delphi 7 gab, weiß ich jetzt auch nicht aus dem Kopf.


delphi_noop - Di 26.05.09 19:13

Muss ich das DateUtils auch in den uses angeben?


Delete - Di 26.05.09 19:14

Sicher.


delphi_noop - Di 26.05.09 19:16

So, das hätte ich gemacht... Aber dann schreibt er wieder: "Datei nicht gefunden: "Dateutils.dcu""!!!

Wie kann ich das lösen? ;-)
Sorry, bin anstrengend, aber ich brauch das für die Schule...


Robert.Wachtel - Di 26.05.09 19:17

user profile icondelphi_noop hat folgendes geschrieben Zum zitierten Posting springen:
[...] Ich verwende Delphi7 [...]

Ist doch immer nett, dass solche Details auch mal erwähnt werden...

Die Unit DateUtils gibt es afair erst seit Delphi 2005.

Schau mal in der JCL nach entsprechenden Funktionen.


Delete - Di 26.05.09 19:18

Im Lib-Verzeichnis meines Delphi 7 (anderes OS) gibt es die Unit sehr wohl.


Robert.Wachtel - Di 26.05.09 19:20

user profile iconDeddyH hat folgendes geschrieben Zum zitierten Posting springen:
Im Lib-Verzeichnis meines Delphi 7 (anderes OS) gibt es die Unit sehr wohl.

Stimmt - bei mir auch... :mrgreen:


delphi_noop - Di 26.05.09 19:25

Danke sehr!!! Hab das Problem soeben gelöst...

Hätte noch eine schwierigere Aufgabe:
Möchte dasselbe von der Vorwoche und von der nächsten Woche auch haben...

Danke!!!


Narses - Di 26.05.09 19:25

Moin!

user profile icondelphi_noop hat folgendes geschrieben Zum zitierten Posting springen:
Aber das ist leider nicht das, was ich wollte...

Also ich möchte von einer Woche das Anfangsdatum und das Enddatum wissen!!! ;-)
Wenn du das mit den Dateutils nicht auf die Kette kriegst ;) ist das genau das, was du wissen willst: :D
Zieh das Ergebnis der Funktion von Now ab, dann hast du den Wochenstart, Ende ist +7. :idea:


user profile icondelphi_noop hat folgendes geschrieben Zum zitierten Posting springen:
Hätte noch eine schwierigere Aufgabe:
Möchte dasselbe von der Vorwoche und von der nächsten Woche auch haben...
Das Wochen aus 7 Tagen bestehen weißt du aber, ja? :?

cu
Narses