Format "0001" IntToStr

[strom]

Hallo,

möchte das aktuelle Datum + eine fortlaufende Zahl anzeigen lassen.

Anzeige Beispiel: 1506010001

Lasse ich das "(Format('%.3d')" weg wird der Text so angezeigt: 1506011!
Das Ziel ist aber:" 0001" (1506010001)

Was ist hier falsch?

Delphi-Quellcode:

ShowMessage((FormatDateTime('yymmdd',now))+(Format('%.3d',[IntToStr(zaehler)])));
inc(zaehler);