Inkompatible Typen: TDate' und TLabel

[roland0]

Hallo,
ich habe diese Fehlermeldung die ich nicht verstehe.

Delphi-Quellcode:

var days: array[1..7] of string;
begin
  days[1] := 'Sonntag';
  days[2] := 'Montag';
  days[3] := 'Dienstag';
  days[4] := 'Mittwoch';
  days[5] := 'Donnerstag';
  days[6] := 'Freitag';
  days[7] := 'Samstag';

  l_datum.Caption := days[DayOfWeek(Date)] + ', ' + Datetostr(date);//Hier tritt die o.g. Fehlermeldung auf.
end;

Dieser Fehler tritt bei allen Labels, Edits und sogar am Kalender auf.
Vielleicht sieht ja jemand etwas was ich nicht sehe:
Für eure Hilfe bedanke ich mich.

LG Roland