DateToStr (Pascal-Script) #

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;

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.