Formateo de cadenas

[Neftali [Germán.Estévez]]

PREG. Tengo que presentar una cadena con fechas/números y no encuentro en la ayuda como formatear/rellenar/eliminar blancos.

RESP. Todas esas funciones están en la ayuda. Sus nombres:

Eliminar blacos: Trim, TrimRight y TrimLeft.
Crear una cadena rellena de caracteres: StrOfChar.
Formatear una fecha: FormatDateTime.
Formateo general de cadenas: Format.

Format es especialmente potente (aunque como no detecta errores de tipo en tiempo de compilación, hay que tener cuidado) y nos da opciones muy completas para todo.
Buscando en la ayuda por format specifiers tendrás la referencia completa.

Algunos ejemplos:

# Formatear un número y rellenar con 0s a la izquierda:

Cadena := Format('%.8d', [Numero]);


Separar cadenas de caracteres entre si por 4 espacios:

Cadena := Format('%s%4s%s%4s%s', [Cad1, ' ', Cad2, ' ', Cad3]);


# Separar dos números rellenos con 0s a la izquierda en un campo de 6 caracteres de ancho y separados entre si 20 espacios:


Cadena := Format('%.6d%20s%.6d',[Numero1, ' ', Numero2]);