Archivos TXT

[cancun]

Hola Jordy


Si los datos a pasar son muy grandes, no es recomendable el
uso de Txt.

Para crear el archivo es muy simple, usa un TStringList y su método SaveToFile

Var Lista:TStringList;



Lista:=TStringList.Create;

...
Lista.Add(Cadena);
...
...
Lista.SaveToFile('Ruta\Archivo.txt');


Para fijar el tamaño no recuerdo ninguna función en Delphi, pero implementar una es sencillo

function Rellena(Cad:String, Largo:Integer): String;
begin
Result:=Copy(Cad+StringOfChar(' ',Largo),1,Largo);
end;

Espero te sirva.