Como llenar con espacion en blanco o con ceros una cadena?
Hola a todos
Mi pregunta es la siguiente: Yo genero un archivo de texto con informacion que estraigo de una BD hay y esta es separada por tamaños de campos, tengo algunos campos en mi Layout que debe ser llenados con espacion en Blanco o con 0000000. como realizo esta fncion Alguien me puede explicar... ??? |
|
Creo que no es lo que necesariamente necesito pero gracias deja acomodar las ideas para explicar dicho asunto...
|
Saludos
Tengo este codigo No estoy seguro si es lo que quieres :o |
|
hola puedes utilizar esta funcion que permite ajustar el tamaño de la cadena que se pasa por parametro, llenando los espacios con el caracter requerido, así como ajustar la alineacion de la cadena.
espero sirva, para mis reportes y logs de seguimiento ha sido muy util. asi lo utilizo:
un ejemplo de como quedaria el reporte.
|
CerosDelante -> concatena tantos ceros delante de la cadena como la diferencia entre la longitud especificada en la función y la real de la cadena. CerosDetras -> Lo mismo pero por detrás.;):eek: Para colaborar con la causa! Espero que te sirva. Saludos!!:D |
Por cierto! Si quieres que en vez de 0 te ponga espacios en blanco, sólo tienes que cambiar el 1r parámetro de la funcion Pad de '0' a ' '.
Saludos!! |
Hola:
Para rellenar hasta 12 caracteres (con ceros delane) entero := 345 cadenadoce := RightStr ( '000000000000' + IntToStr ( entero ) , 12 ); Para rellenar hasta 20 caracteres (con .... por detrás) texto := 'Aragón' cadenaveinte := LeftStr ( texto + '....................' , 20 ); Un saludo. |
Gracias por si ayuda estare revisando dichos codigos y consejos de como me dicen...
|
Tambien puedes usar la función format para llenar con 0's:
Saludos... |
La franja horaria es GMT +2. Ahora son las 05:47:18. |
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