DateToStrLCID (Pascal-Script) #

Beschreibung #

DateToStrLCID konvertiert einen Wert des Typs TDate in einen String, wobei die sprachspezifischen Formatierungen der angegebenen LCID berücksichtigt wird.

Die Art- und Weise der Formatierung wird vom Betriebssystem ausgelesen. Ob die angegebene LCID unterstützt wird oder das gewünschte Ergebnis ergibt hängt alleine von den Einstellungen des Betriebssystems ab. Diese können unter „Systemsteuerung/Regions- und Sprachoptionen“ eingesehen werden.

Syntax #

function DateToStrLCID(Date: TDate; LCID:Integer): string;

Argumente #

Mit DateToStrLCID erhalten Sie die String-Entsprechung eines Datumswertes für Anzeigezwecke, der in der Formatierung von der übergebenen LCID abhängt. Hierdurch können Sie beispielsweise in einem für Deutschland eingestellten Windows eine Datumsformatierung für den französischen Sprachraum erzeugen. Die Tabelle LCID gibt Ihnen alle in Windows definierten Werte.

Beispiel #

var
  S : String;
  d : TDate;
begin
  d:=StrToDate('15.12.01');
  d:=d+1;
  S:=DateToStrLCID(d,1033);
  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 DateToStrLCID dem Text S zugewiesen. In diesem Beispiel ist steht 1033 für eine „Englisch (US)“-spezifische Ausgabe. Dieser wird anschließend über ShowMessage ausgegeben.

ShowMessage zeigt: 12/16/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.