Ceros antes de un numero

[roman]

Otra forma:

Cadena := Format('%0.8d', [Numero]);

antepone ceros hasta completar 8 caracteres (puedes sustituir 8 por cualquier otro valor.

De cualquier forma lo que describes no corresponde con los ejemplos, ¿qué hacen ese 10 y 100 al principio?

// Saludos