Delphi/Lazarus: Ajouter des Zéros non significatifs à un Nombre

Parfois, nous voulons afficher un nombre avec des zéros non significatifs en utilisant Delphi ou Lazarus, par exemple, dans le cas où les nombres deviennent des chiffres à deux chiffres à un moment donné et nous voulons directement commencer à 01, 02 et ainsi de suite.

Heureusement, il existe une fonction simple qui peut le faire pour nous:

str := Format('%.*d', [longeur, nombre]);
str := Format('%.*d', [3, 7]);
// str est '007'

Les deux paramètres obligatoires sont le nombre de places que nous voulons avoir (longueur) et le nombre comme integer que nous voulons réécrire (nombre). La valeur de retour est une chaîne / string.

Dans la deuxième ligne, vous pouvez voir un exemple: lorsque nous appelons la fonction avec les paramètres 3 et 7, nous obtenons '007'.