Delphi-PRAXiS - Delphi Wochentag auslesen??

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)

- - Delphi Wochentag auslesen?? (https://www.delphipraxis.net/3285-wochentag-auslesen.html)

Rapthor

5. Mär 2003 07:08

Wochentag auslesen??

Hallo,
gibt es eine Möglichkeit in Delphi per Befehl den aktuellen Wochentag und die Uhrzeit auslesen zu lassen? Und generell das Datum?
Rapthor

janjan

5. Mär 2003 07:23

Kuck mal in der Delphi-Hilfe nach 'Date' und 'Time'.

Beispiel aus der Delphi-Hilfe:

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

begin

  Label1.Caption := 'Today is  ' + DateToStr(Date);

end;

GuGl	5. Mär 2003 07:55

Mit DayOfWeek(date) erhälst du den aktuellen Wochentag.

In der Delphi-Hilfe gibts dazu ein Beispiel.

Gruß, GuGl

Rapthor

6. Mär 2003 13:15

Ok also ich brauche die Unit DateUtils, die ich auch schon unter USES hinzugefügt aber.Nun verwende ich im Quelltext den Befehl DayOfTheWeek(i) aber wenn ich mir nach dem Aufruf dieser Zeile das i ansehe, ist es leer!!In der Hilfe steht, dass das i dann einer Zahl von 1 bis 7 entspräche (je nach Wochentag). Das klappt aber nicht ..... :cry:
Wo liegt der Fehler?

sakura

6. Mär 2003 13:18

Versuche mal wie folgt

Delphi-Quellcode:

ShowMessage(IntToStr(DayOfTheWeek(Now)));

DayOfTheWeek liefert den Wochentag eines beliebigen Datums als Funktionswert (1-7) zurück.

...:cat:...

GuGl	6. Mär 2003 13:20

Hallo Rapthor,

die funktion DayOfWeek(date) gibt dir den Tag als
Integer-Wert zurück. Dabei ist 1 = Sonntag, 2 = Montag, usw... bis 7

In der Delphi-Hilfe gibts ein gutes Beispiel dafür

Gruß, GuGl

Yheeky

6. Mär 2003 15:29

Warum nicht einfach:

Code:

ShowMessage(FormatDateTime('dddd', Date));

?
Geht doch auch :lol:

Gruß Yheeky

Alle Zeitangaben in WEZ +1. Es ist jetzt 06:14 Uhr.