Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Tamaño fijo de string escribiendo un fichero (https://www.clubdelphi.com/foros/showthread.php?t=27000)

davidgaldo 09-11-2005 17:00:05

Tamaño fijo de string escribiendo un fichero
 
Hola tengo que crear un fichero cuyas lineas son campos de una base de datos, el tamaño de los campos de la base de datos es fijo, pero si escribo en el fichero los datos en el fichero no mantiene el tamaño del campo sino que en funcion de los caracteres me varia la longitud de la linea del fichero. ¿como puedo escribir los datos de manera que si el nº de caracteres del campo no llega al máximo se escriban caracteres en blanco??

jachguate 09-11-2005 18:08:18

Por ejemplo así:

Código Delphi [-]
Memo1.Lines.Clear;
qClientes.First;
while not qClientes.EOF do
begin
  Memo1.Lines.Add(Format('%15s, %50s, %50s, %12.2d', [
    qClientesCODIGO.AsString,
    qClientesAPELLIDOS.AsString,
    qClientesNOMBRES.AsString,
    qClientesSALDO.AsFloat];
  qClientes.Next;
end;
Memo1.Lines.SaveToFile('c:\cliente.txt');

Hasta luego.

;)


La franja horaria es GMT +2. Ahora son las 00:02:01.

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