Crear archivo .txt

[[seoane]]

Siguiendo con el ejemplo de dec, solo tenemos que darle formato a la cadena:

Código Delphi [-]
var
  ts: TStrings;
  Str1, Str2, Str3: string;
begin
  ts := TStringList.Create;
  try
    Str1:= 'X';
    Str2:= '2';
    Str3:= 'ESTA ES UNA';
    ts.Add(Format('%-5.5s%-5.5s%s',[Str1,Str2,Str3]));
    ts.SaveToFile('d:\coordenadas.txt');
  finally
    ts.Free;
  end;
end;

La parte interesante del código anterior es la cadena '%-5.5s%-5.5s%s' que le indica a la función format como debe realizar el formato. Esta dividida en 3 partes cada parte empieza por '%' y termina por 's' indicando que la variable es una string. Entre ambos se indica como se debe formatear esa cadena, el símbolo '-' indica que el texto se debe justificar a la izquierda, el primer '5' indica el tamaño mínimo de la cadena (rellenando con espacios en blanco si es necesario) y el segundo el tamaño máximo (recortando si es necesario). Puedes modificar estos valores para obtener el resultado deseado. Y ya me dejo de tanto rollo que en la ayuda explican mejor que yo como va esta función

Espero que te sirva.