Erledigt - DateUtils.RecodeTime und 0 Sekunden

[Sherlock]

Klar geht das mit FormatDateTime, gerade unter Tokyo.1 getestet.

Delphi-Quellcode:

procedure TForm10.Button1Click(Sender: TObject);
var
  mytime: TDateTime;
begin
  mytime := Trunc(Now);
  Label1.Caption := FormatDateTime('ddddd tt', mytime, TFormatSettings.Create);
end;

Das liefert im Label dann "30.08.2017 00:00:00"

Ansonsten ist das Verhalten von DateTimeToString "as designed".

Sherlock

[sko1]

Zitat:

Gerade entdeckt, dass DateTimeToStr() keine Zeit darstellt, wenn es 00:00:00 ist.

Dann nimm FormatDateTime und Du hast, egal wie die Uhrzeit ist, immer die gleiche Formatierung!

Ciao
Stefan