00 Votos

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'.

ResponderPositivoNegativo

Sobre el Autor

AvatarEl autor aún no ha agregado una breve descripción del perfil.
Ver Perfil

 

Temas Relacionados

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.