Zitat von
sventeq:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
neu:=23.04.2008;
ShowMessage('Aktuelle Kalenderwoche: ' + IntToStr(GetKW(neu));
end;
Das wird so nix... Deine Datumzuweisung geht so nicht. Du kannst z.b. die Function EncodeDate benutzen.
Und editiere bitte deinen letzten Beitrag und setze den Code zwischen die [ DELPHI] / [ /DELPHI] Tags (ohne die Leerzeichen) um deinen Code sauber zu formatieren.