Datumholen plus berechnen

[Mydoene]

Hi Leutz!

Ich wollt mal ein Proggi schreiben zur Berechnung eines Datums von den Zahlen zum Buchstaben. Und das soll so aussehen:

1. Man gibt das Datum, das man haben will, als int in ein Editfeld ein.
2. Mithilfe einer function und/oder einer procedure (komplizierter sollt's nicht werden) wird das Datum in Buchstaben verwandelt.

Also zum Beispiel: Ich gebe 16 in Edit1 ein, 09 in Edit2 und 2006 in Edit3 und onClickButton1 steht auf Panel1: Samstag.

Nur leider hab' ich keine Ahnung, wie ich das Datum aus'm Rechner holen soll (was ja meißtens das aktuelle Datum ist), und ich weiß auch nicht so richtig, wie ich das verrechnen kann.

Wär' mal ganz froh, wenn mir wer helfen könnt' ^^

Allsdann, warte auf Antwort,

[mkinzler]

Um was geht es jetzt um aus 16 Sechzehn zu machen oder den Wochentag zu einem datum zu ermitteln?

[Basti552]

Zitat von mkinzler:

Um was geht es jetzt um aus 16 Sechzehn zu machen oder den Wochentag zu einem datum zu ermitteln?

so weit ich das verstanden hab ein Datum in ein Wochentag zu ermitteln!

[Mydoene]

Zweiteres.

Ich hab' nämlich manchmal das Bedürftnis, zu wissen wann mein oder anderer Leute Geburtstag ist, also:

Welcher Wochentag.

Im Sinne von Montag, Dienstag, Mittwoch etc. K?

[edit:] Oh, uups, sry ^^

[mkinzler]

DayOfTheWeek();

[Mydoene]

Und wie benutze ich DayOfTheWeek(); ?

Ich mein, was genau liefert das? Int, string oder wie?

[mkinzler]

Besitzt du keine Delphi-Hilfe?

Zitat von Delphi-Hilfe:

DayOfTheWeek Routine

Gibt den Wochentag zurück, den ein TDateTime-Wert repräsentiert.

Namespace
Borland.Vcl.DateUtils

Syntax


[Delphi] function DayOfTheWeek(const AValue: TDateTime): Word;


Beschreibung
Mit DayOfTheWeek können Sie den Wochentag ermitteln, den der angegebene TDateTime-Wert repräsentiert. DayOfTheWeek gibt einen Wert zwischen 1 und 7 zurück. 1 entspricht Montag, 7 Sonntag.
Hinweis:
DayOfTheWeek ist ISO 8601-konform (Montag ist der erste Wochentag). Die Funktion DayOfWeek basiert dagegen auf dem Sonntag als erstem Wochentag.

Tipp:
Mithilfe der Wochentagkonstanten können Sie die Aussagekraft des Rückgabewertes verbessern.

[Mydoene]

OK, das ist ja schon ganz nice, noch ne Frage hätte ich: Wie wandle ich die Edit-Eingaben in TDateTimes um?

Habsch nämlich mal keine Ahnung ...

[mkinzler]

EncodeDate() oder nimm gleich eine Komponente, in der man direkt ein datum auswählen kann.

[Mydoene]

Da fänd' ich encoden aber besser.

Kann mir wiederum einer helfen? -_- Ich hab' keine Ahnung...