Fehler?? Datum1:=strtodatetime('01/01/2001 23:01');

[Daniel B]

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  Datum1: TDateTime;
begin
  Datum1 := StrToDateTime('01/01/2001 23:01');
  ShowMessage(DateTimeToStr(Datum1));
end;

Kann ich Kompilieren.
Wenn ich das SM weglass, dann kommt nur die Warnung dass Datum1 nie benutzt wird.

Was ist das Problem? Fehlermeldung? Mehr Infos Bitte!