关于fastreport里大小写转换，简单问题，我没用过fastreport，给各位送分了。(60分)

L

LiChaoHui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-27

• #21

因为$是单字节，仅仅是为了下一步替换为￥作准备的，
其实方法很多，也可以这样写
s := Format('%d', [DataSet.FieldByName('opvalue').AsInteger]);
for i := 1 to Length(s)do
begin
t := t + s + ' ';
end;
s := StringOfChar(' ', (9 - Length(s))*2) + '￥' + s;
DataSet.FieldByName('opvalue_s').AsString := t;
注意，如果货币转化为字符串时达到10位，则上面的方法会有问题，
因为没有判断这种情况，倒数第二行这么写
if Length(s) < 20 then

s := StringOfChar(' ', (9 - Length(s))*2) + '￥' + s;
不知道你明白了没有呢

 

L

LiChaoHui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-27

• #22

to cxz9
多谢，原来如此啊，我搞了半天都没有搞定，就是不知道怎么
让它预先计算参数的表达式
早知道，我也不用费那么大的事了，我看分数应该给你才对

 

凤

凤舞九天

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-02

• #23

多人接受答案了。