KW (Pascal-Script) #

Beschreibung #

KW gibt zu einem Datumswert die Kalenderwoche als Zahlenwert zurück.

Syntax #

function KW(Value: TDateTime): Integer;

Argumente #

Kw gibt zu einem Datumswert die Kalenderwoche zurück. Der Datumswert ist vom Typ TDateTime. Hat man einen String als Datum vorliegen, muss man dementsprechend den Text erst mit StrToDate in einen Datumswert wandeln. Das Ergebnis ist die Kalenderwoche vom Typ Integer.

Beispiel #

begin
  ShowMessage(IntToStr(KW(CurrentDate)));
end;

Die Funktion CurrentDate ermittelt das Tagesdatum. Dieser Wert wird von der Funktion KW in einen einen Integer, der die Kalenderwoche angibt, gewandelt. Damit ShowMessage das Ergebnis als Text anzeigen kann, wird dieser mit der Funktion IntToStr in einen Text gewandelt und angezeigt.

ShowMessage zeigt zum 27.Jan.2002 dann: 4