Hi!
Delphi-Quellcode:
Str := IntToStr(93); //Deine Zahl;
While Length(Str) < 4 do
str := '0'+str;
Das sollte eigentlich auch funktionieren. Es wird solange eine Null vorn dran gehängt, bis die Länge 4 Zeichen beträgt. Aber natürlich ist Mirilins Lösung kürzer
Man liest sich, Stanlay
