Delphi/Lazarus: Agregar Ceros Iniciales a un Número
Consejo de Progger99 | 26/10/2020 a las 13:06
A veces queremos mostrar un número con ceros a la izquierda usando Delphi o Lazarus, por ejemplo, en el caso de que los números se conviertan en dígitos dobles en algún momento y directamente queremos comenzar en 01, 02 y así sucesivamente.
Afortunadamente, hay una función simple que puede hacer esto por nosotros:
str := Format('%.*d', [longitud, numero]); str := Format('%.*d', [3, 7]); // str es '007'
Los dos parámetros requeridos son el número de lugares que queremos tener (longitud) y el número como integer, queremos reescribir (número). El valor de retorno es una cadena / string.
En la segunda línea puede ver un ejemplo: Cuando llamamos a la función con los parámetros 3 y 7, obtenemos '007'.
Sobre el Autor
El autor aún no ha agregado una breve descripción del perfil.
Ver Perfil
Temas Relacionados
Renombrar Archivos en sus Nombres de Carpeta
Tutorial | 0 Comentarios
Delphi/Lazarus: Mostrar Fecha y Hora actuales
Consejo | 0 Comentarios
Lazarus: Entrada de Números binarios, hexadecimales y integers
Artículo | 0 Comentarios
Reescribir Archivos de Texto con una Longitud de Línea Fija
Tutorial | 0 Comentarios
Reparar Archivos de Texto con Saltos de Línea Mixtos
Tutorial | 0 Comentarios
Lazarus: Cargar Archivo como Array de Bytes y Guardar Array de Bytes como Archivo
Tutorial | 0 Comentarios
Delphi/Lazarus: ¿Está presionada la tecla ALT, SHIFT o CTRL?
Tutorial | 0 Comentarios
Aviso Importante
Por favor tenga en cuenta: Las contribuciones publicadas en askingbox.com son contribuciones de los usuarios y no deben reemplazar el asesoramiento profesional. No son verificados por independientes y no reflejan necesariamente la opinión de askingbox.com. Aprende más.
Participar
Haga su propia pregunta o escriba su propio artículo en askingbox.com. He aquí cómo.