Delphi-PRAXiS - Delphi Datum ergänzen

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

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Datum ergänzen (https://www.delphipraxis.net/167982-datum-ergaenzen.html)

Hallo,

ich möchte dass man in einem Eingabefeld ein Datum entweder in der Form DD oder DD.MM oder DD.MM.YY eingeben kann.
Beispiel: Wenn ich 10 eingebe, macht er heute 10.04.2012 daraus. Wenn ich 10.3 mach er 10.03.2012 daraus.

Ich werde die Funktion im Validate Event aufrufen.

Gibt es eine Interne Funktion die das macht oder hat jemand sowas schon mal programmiert?

Gruß
Alfonso

AW: Datum ergänzen

Ich würde

TDateTimePicker.OnUserInput versuchen. (oder meinst du das mit "Validate Event" ? )

Natürlich mußt du so oder so selber für die Vervollständigung sorgen.

AW: Datum ergänzen

Hallo,

Zitat:

Gibt es eine Interne Funktion die das macht

ich kenne keine.

Zitat:

hat jemand sowas schon mal programmiert?

sicher, aber wer?

aber so schwer ist das nicht:
- nimm das aktuelle Datum (*
- teile es auf Tag Monat und Jahr auf (*
- schreibe aus deiner Eingabe die Daten bis zum ersten Trennzeichen in die Variable Tag
- schreibe die Daten zwischen ersten und zweiten Trennzeichen ins Monat
- schreibe die Daten nach dem 2. Trennzeichen ins Jahr (ev. aus 2-stellig noch 4-stellig machen)
- mache aus Tag, Monat und Jahr wieder ein Datum (*
(* dafür gibt es interne Funktionen, der Rest muss mit konbination von mehreren Funktionen gelöst werden