Wenn du
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.text:=FloatTostr(WochenTag(AYear, AMonth, ADay));
schreibst, und AYear, AMonth und ADay vorher nicht definiert hast, woher soll er dann wissen, welchen tag du haben möchtest ?
Probiers mal so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.text:=FloatTostr(WochenTag(2004, 12, 4));
P.S. Geändert, aber delphi ist nicht case-Sensitive ...