Una cosita facil

[santiago14]

Pido disculpas por mi ignorancia pero lo unico que quiero es lo siguiente:
Ingreso un número, digamos "1", quiero que aparezca en una caja de texto de la siguiente manera "00001"
Pero la cosa está en que debo lograr esto con código y no con el componente MaskEdit, tengo entendido que se puede hacer con la sentencia Format o alguna parecida. Bueno gracias de antemano.

[roman]

Código Delphi [-]
S := Format('%0.5d', [1]); // 1 -> '00001'
S := Format('%0.5d', [84]); // 84 -> '00084'

// Saludos