StrToDate (Pascal-Script) #

Beschreibung #

StrToDate konvertiert einen String in einen Wert des Typs TDate

Syntax #

function StrToDate(const S: string): TDate;

Argumente #

Mit StrToDate kann ein String mit einer Datumsangabe geparst werden. Enthält S kein gültiges Datum, so wird ein Kompilerfehler ausgelöst.

Der String muss aus zwei oder drei Zahlen bestehen, die durch das Datumstrennzeichen ‘.’ voneinander getrennt sind. Die Reihenfolge von Tag, Monat und Jahr muss gegeben sein.

Enthält der String lediglich zwei Zahlen, wird er als Datum (M.T oderTT.M) des aktuellen Jahres interpretiert.

Zweistellige Jahresangaben zwischen 0 und 50 werden durch das aktuelle Jahrtausend ergänzt, Jahreszahlen von 51-99 durch das vorangegangene.

Beispiel #

var
  S : String;
  d : TDate;
begin
  d:=StrToDate('15.12');
  S:=DateToStr(d);
  ShowMessage(s);
end;

Ein Datumstyp kann nicht direkt über ein Script mit einem Datumswert gefüllt werden. Hier muss der Umweg über die Umwandlung von einen Text gegangen werden. Anschließend kann mit einem Datumstyp gerechnet werden.

In diesem Beispiel wird der Text ‘15.12’ über die Umwandlung StrToDate der Variablen d als Datumstyp zugewiesen. Die Datumsvariable d wird dann über die Umwandlungs-Funktion DateToStr dem Text S zugewiesen. Dieser wird anschließend über ShowMessage ausgegeben.

ShowMessage zeigt: 15.12.2001

Beachten Sie, dass StrToDate ohne Jahreszahlangabe vom aktuellen Jahr ausgeht.