FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Ceros antes de un numero
Amigos de delphi, les mando un saludo y estoy con una duda espero me puedan hechar la mano, estoy haciendo una aplicacion que necesito que los numero que yo ingrese se le agreguen ceros antes para llenar cierto tamaño de caracteres... es decir...
10 ----- 00010 100 ----- 00100 etc. Alguien sabe como hacer esto grax
__________________
J.·. |
#2
|
|||
|
|||
Prueba esto;
Código:
numero := DupeString('0',NumCaracteresTotales-Length(Numero) ) + numero; Saludos. |
#3
|
||||
|
||||
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 |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|