Delphi: Führende Nullen zu einer Zahl hinzufügen

Manchmal möchte man eine Zahl mit führenden Nullen bei Delphi darstellen, zum Beispiel wenn die Zahlen irgendwann zweistellig werden und wir direkt bei 01, 02 und so weiter beginnen möchten. Zum Glück gibt uns Delphi eine einfache Funktion zur Hand:

str := Format('%.*d',[laenge, zahl]);
str := Format('%.*d',[3, 7]);
//str ist '007'

Die beiden benötigten Parameter sind die Anzahl der Stellen, die wir hinterher haben möchten (laenge) und die Integer Zahl, die wir umschreiben möchten. Die Rückgabe ist dann ein String.

In der zweiten Zeile seht ihr ein Beispiel: Wenn wir die Funktion mit den Parametern 3 und 7 aufrufen, bekommen wir '007'.