Formato a una Cadena

[marcoszorrilla]

No tienes porque consumir la línea entera lo que tienes que hacer es incrementar x Puntos para que la próxima línea esté a la distanica correcta de la anterior:

Código Delphi [-]
nLin:=10;
 nSaltLin:=20;
 
   While Not Loquesea.Eof
   TextOut(nCol, nLin, cTexto);
   nLin:=nLin + nSaltLin;
   Loquesea.Next;
   end;

Un Saludo.

[Ricsato]

Gracias por tu respuesta, eso es lo que estaba haciendo, definir el renglon y columna donde estoy, mi pregunta mas bien era como hacerle para consumir el total de espacios en el renglon, por que como es una impresion hacia una conexion remota, la impresora no me respetaba los renglones que definia y la unica solucion era ocupar el total de columnas en el renglon, lo cual lo pude hacer de la siguiente forma:

TextOut(0,10, Format('%-42s',[qDetalleDet_Descripcion.AsString]));

definiendo en la funcion format, con el "-", le indico que es alineacion a la izquierda, "42", le indico el numero de columnas a consumir y "s" significa que es de tipo String.

Gracias de todas manera.

Saludos desde Mexicali, B.C., Mexico