文本文件输出格式,即每一列怎样实现左对齐或右对齐?(50分)

  • 主题发起人 主题发起人 pxw
  • 开始时间 开始时间
自己写程序用空格补位对齐
左对齐在后面补空格
右对齐在前面补空格
 
在TRichEdit.Paragraph(TParaAttributes类)中
property LeftIndent: Longint;
//左对齐
property RightIndent: Longint;
//右对齐
 
ShowMessage(Format('''%10s++++%-20s''', ['ABC', 'EFG']))


More Info, See Help!
 
看来还是得自己判断.
左对齐就不用说了,右对齐嘛...
先假设每一行的最大长度为n
然后,在输出每一行的时候:
for i:= 1 to (n-本行长度)do
输出一个空格;
 
多人接受答案了。
 

Similar threads

回复
0
查看
1K
不得闲
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部