Menü

DateToStr (Pascal-Script)

Zurück | Ebene zurück

Beschreibung

DateToStr konvertiert einen Wert des Typs TDate in einen String. 

Syntax

function DateToStr(Date: TDate): string;

Argumente

Mit DateToStr erhalten Sie die String-Entsprechung eines Datumswertes für Anzeigezwecke.

Beispiel

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

Regeln zum Nachvollziehen des Scripts finden Sie hier.

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

In diesem Beispiel wird der Text '15.12.01' über die Umwandlung StrToDate in einen Datumstyp der Variablen d zugewiesen. Danach wird auf die Variable d ein Tag addiert. Die Datumsvariable d wird dann über die Umwandlungs-Funktion DateToStr dem Text S zugewiesen. Dieser wird anschließend über ShowMessage ausgegeben. 

ShowMessage zeigt: 16.12.2001

Beachten Sie, dass StrToDate bei Eingabe eines zweistelligen Datums ein Jahrtausend vorstellt. Die Zahlen 0-50 werden dem aktuellen Jahrtausend zugeordnet, die Zahlen 51-99 dem vorangegangenen Jahrtausend.