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.
__________________
Cancun, Q.Roo, México
|