alinear columnas en un memo

[ingabraham]

-Buenos dias,


necesito alinear columnas en un memo.

utilizo:

Código Delphi [-]
    memo1.lines.add( Format(' %s            %s       ',[var1, var2])  );

la variable 1 me desalinea la columna de la dos.


quien me da una didea

[Casimiro Notevi]

Usa courier new

[ingabraham]

Empezado por Casimiro Notevi

Usa courier new

hola gracias,

uy pero se ve muy pequeña la letra y tengo mucho campos,

yo utilizaba el Tahoma es una letra muy visible

no hay otra forma ?

[roman]

Pues entonces usa Courier New a 12 punto o más. La cuestión es que Courier New es una fuente donde todas las letras tienen el mismo ancho y por ello puedes usarla para alinear.

// Saludos

[Casimiro Notevi]

Si quieres que queden "alineadas", tendrás que usar un tipo de letra de ancho fijo: courier New, ocr, lucida console... las llamadas "monoespaciadas" o "fixed width"

EDITO: lo que ha dicho Román.

[[duilioisola]]

Ten en cuenta que también puedes establecer el tamaño y alineación de cada "columna".

Código Delphi [-]
// Esto mostrará 2 columnas de 15 caracteres, sin importar la longitud de la variable
// __________12345 __________abcde
// _________123456 _________abcdef
// ...
memo1.lines.add( Format('%15s %15s',[var1, var2]) );

Código Delphi [-]
// Esto mostrará 2 columnas de 15 caracteres alineados a izquierda, sin importar la longitud de la variable
// 12345__________ abcde__________
// 123456_________ abcdef_________
// ...
memo1.lines.add( Format('%-15s %-15s',[var1, var2]) );

[ingabraham]

Empezado por duilioisola

Ten en cuenta que también puedes establecer el tamaño y alineación de cada "columna".

Código Delphi [-]
// Esto mostrará 2 columnas de 15 caracteres, sin importar la longitud de la variable
// __________12345 __________abcde
// _________123456 _________abcdef
// ...
memo1.lines.add( Format('%15s %15s',[var1, var2]) );

Código Delphi [-]
// Esto mostrará 2 columnas de 15 caracteres alineados a izquierda, sin importar la longitud de la variable
// 12345__________ abcde__________
// 123456_________ abcdef_________
// ...
memo1.lines.add( Format('%-15s %-15s',[var1, var2]) );

gracias,


lo he estado intentando asi pero se me descuadra.

no se si calculando el tamanio de cada cadena y adicionandole espacio en blanco, extra a esa cadena

[Casimiro Notevi]

Empezado por ingabraham

lo he estado intentando asi pero se me descuadra.
no se si calculando el tamanio de cada cadena y adicionandole espacio en blanco, extra a esa cadena

Siempre descuadrará si no usas letras de ancho fijo.

[roman]

Empezado por Casimiro Notevi

Siempre descuadrará si no usas letras de ancho fijo.

Creo que no necesariamente.

Si usamos lo que propone duilioisola pero dejando un tabulador en lugar de un espacio entre las columnas:

Código Delphi [-]
memo1.lines.add( Format('%-15s'#9'%-15s',[var1, var2]) );

puede funcionar aunque para ello los datos de un columna no deben exceder el ancho del campo establecido (15 en el ejemplo de duilioisola).

// Saludos

[ingabraham]

Empezado por roman

Creo que no necesariamente.

Si usamos lo que propone duilioisola pero dejando un tabulador en lugar de un espacio entre las columnas:

Código Delphi [-]
memo1.lines.add( Format('%-15s'#9'%-15s',[var1, var2]) );

puede funcionar aunque para ello los datos de un columna no deben exceder el ancho del campo establecido (15 en el ejemplo de duilioisola).

// Saludos

ok, felicidades distes en el blanco

jeje