设置固定长度字符串,没有字符的都填充为空格,怎么实现啊? s:string[10]s := '测试'这样不行。怎么让其他地方为空格呢?就是实现打印出来的效果为'测试 ' 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var str:string;str:=format('%10s',['abc']); var s:string[10]; i,len:integer;begin s:='测试'; len:=Length(s); for i:=len+1 to 10 do begin s:=s+' '; end; Edit1.Text:=s;end; delphi调用打印的问题 看到一段代码,不知道是啥意思,请帮忙注释 巨难的题,javascript 转 Delphi ,分不够可以开贴再加。 这是一个关于WINDOWS关闭的问题 简单问题 (高分求救)求教超市用的最便宜的微型打印机的信息,回答就有分(前提条件质量要好) 怎样快速积攒积分 求助:读取某进程内存块数据 为何Fastnet的FTP控件不能传大文件???? 一个关于DCOM的问题 如何实现在运行输入框中执行语句的效果 我现在用 AT命令和无线猫做了一个简单的拨号\应答的小软件,怎么连到电脑上的麦和音箱呢?
str:string;str:=format('%10s',['abc']);
s:string[10];
i,len:integer;
begin
s:='测试';
len:=Length(s);
for i:=len+1 to 10 do
begin
s:=s+' ';
end;
Edit1.Text:=s;
end;