Numeración de Factura

[zeta2]

Amigos, lo que yo quiero es que cuando se imprima la factura imprima el número correspondiente de ella.

Por ejemplo: 01-00000130

Con un contador lo puedo hacer pero me queda así:

01-130

Como hago para que me autocomplete los ceros?


Gracias por su tiempo.

Atte. Marco.

[cloayza]

Utiliza la funcion format...

Código Delphi [-]
     edit1.text:=format('%2.2d-%10.10d',[1,130]); //->01-0000131234

Chaito

[Ñuño Martínez]

Tal vez te ayude la función FmtStr. En tu caso podría ser (así, de memoria):

Código Delphi [-]
Cadena := FmtStr ('%02d-%080', [Valor1, Valor2]);

[edit] Leñes, ¡qué despacio escribo! Aun así, lo dejo porisaca.

[zeta2]

Muchas gracias amigos, me sirvió muchisimo...

Saludos.