一个小问题，大家帮帮忙

Question

我在使用textfile写文件时，想控制字符串写到第几列，使得字符串能右对齐，请问如何实现？

Answer 1

用stringlist打开textfile
写stringlist的第n行。写完后savetofile

Answer 2

在turbo pascal可以writeln('abc':5)那输出时前有2个空格
不知object pascal是否可以

Answer 3

var s :stringlist;
begin
  s:=tstringlist.created;
  s:=loadfromfile('you file");
  s[2]:="sodfsdof";
  s[3]:="";
  s[n]:="";
  s.savetofile("your file");
end;右对齐不知道有没有现成的函数,但可考虑手工解决,比如求出一行有多长k, 然后每行的字符串的length不够长就在前面加上k-length个空格

Answer 4

（插一句，别打我！）
TextFile是什么？控件吗？我好像没见过。是DELPHI几呀？

Answer 5

文本何来右对齐一说？（notepad一resize，你哭啊——除非限定每行字数，很老DOS一样）
至少也要rtf格式才有右对齐。