请教下各位大侠在做打印程序的时候,换行的命令是什么啊?
排版方面如何打印出i个空格(i在打印前才知道其值),我是这么做的:
case (25-length(FieldbyName('mc').AsString+FieldbyName('bzdj').AsString)) of
22 : spstr := ' ';
21 : spstr := ' ';
20 : spstr := ' ';
19 : spstr := ' ';
17 : spstr := ' ';
16 : spstr := ' ';
。这样在length(FieldbyName('mc').AsString+FieldbyName('bzdj').AsString)值不大的时候还行,如果其值很大的情况该如何处理呢,有没有好的方法啊?
排版方面如何打印出i个空格(i在打印前才知道其值),我是这么做的:
case (25-length(FieldbyName('mc').AsString+FieldbyName('bzdj').AsString)) of
22 : spstr := ' ';
21 : spstr := ' ';
20 : spstr := ' ';
19 : spstr := ' ';
17 : spstr := ' ';
16 : spstr := ' ';
。这样在length(FieldbyName('mc').AsString+FieldbyName('bzdj').AsString)值不大的时候还行,如果其值很大的情况该如何处理呢,有没有好的方法啊?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货