固定字符串长度的函数？

[6060]

呵呵，
请问下，DELPHI中，哪个函数可以实现对字符串固定长度？
比如我要让输出的用户代码为10位字符（不足的话，右边补空格等）。
如何？

[立志做一个佳娃~]

Delphi syntax:

function Length(S): Integer;

求出字符长度，

如果不够10个
加空格就OK

[6060]

谢谢 爱国人士
不过呢，我是要从query中，导出数据到TXT文档中的，很多字段，记录。
没有好办法啦？

[FrameSniper]

var
S:String;
begin
S:='12345';
ShowMessage(Format('%-10s',[S]));
end;

[citytramper]

用format行不行

[FrameSniper]

只能用Format，楼上说的Length不可以！

[tongki]

Format;

如果你有必要，最好和ghyghost(爱国人士) 一样，自已写个function.

[nyf1220]

从数据库里每读出一个数据，然后按 FrameSniper(§绕瀑游龙§) 的方法格式化字符穿就行了

[Tarquila]

初始化一个字符串10各空格，
然后把前面的那个字符串加上这个字符串，然后取10位就可以了亚。