Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Convetir 1 a 00001 (https://www.clubdelphi.com/foros/showthread.php?t=3012)

rafadrover 18-08-2003 14:12:36

Convetir 1 a 00001
 
Hola amigos, quisiera saber si alguno de ustedes ya tiene implementada una funcion similar a la que busco, quiero convertir un integer a un string rellenado con zeros es decir convertir integer 1 a string 00001, una chorrada, pero si alguien ya tiene una idea me la podria prestar, solamente es por si hay comandos de delphi que ya lo hacen.
Por ejemplo, si una base de datos tiene un campo clave entero y la queremos mostrar como 00001, basta modificar el formato Display con una mascara 00000 i llamando al metodo displaytext, ya esta convertido el 1 a 00001, tocaria haber algo similar pero sin base de datos, como format o strformat.

Gracias por su atencion.

__cadetill 18-08-2003 15:19:48

FormatFloat('00000', Numero);

Espero te sirva

rafadrover 18-08-2003 18:28:49

Cita:

Posteado originalmente por cadetill
FormatFloat('00000', Numero);
Espero te sirva


Esperaba que fuera algo tan simple como eso, pero ya se sabe, algunas veces alguno se pierdo dentro del help buscando strformat, format, etc....
No habia mirado esta poque en mi caso era un integer, cosas de la vida, gracias por la instruccion

Mick 19-08-2003 20:03:40

Otra posibilidad (que evita la conversion automatica de integer a double que se hace para llamar a formatfloat):

Str:= Format('%5.5d',[numero]);

Salud2 !!!


La franja horaria es GMT +2. Ahora son las 16:25:38.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi