2,498
社区成员
发帖
与我相关
我的任务
分享SOS!!!fastreport打印问题,如何使打印的数据自动加大间距并加上人民币符号?
比方说正常打印数字是123.45,现在想打印出 ￥ 1 2 3 4 5,使每个数字都加上间距,但不一定就是一个空格,一般用FASTREPORT中在每个数字间加上几MM,有个做过这种吗?一般支票上用的.
...全文
请发表友善的回复…
发表回复
sunlight539 2006-01-19
- 打赏
- 举报
在属性charspacing中设置
happypzl 2005-12-31
- 打赏
- 举报
加空格不知道
加人民币符号直接在displayformat的自定义格式写￥0.00就可以了！
加人民币符号直接在displayformat的自定义格式写￥0.00就可以了！
whxxr 2005-12-30
- 打赏
- 举报
5555,我不会,会我自己就写了.
VeryOldMan 2005-12-30
- 打赏
- 举报
自己写个函数实现此功能得了。
小疙瘩 2005-12-30
- 打赏
- 举报
procedure TForm1.Button3Click(Sender: TObject);
var
myMemo: TfrxMemoView;
begin
myMemo := TfrxMemoView(frxReport1.FindObject('Memo1'));
if myMemo <> nil then
myMemo.Memo.Text := '￥'+myMemo.Memo.Text;
frxreport1.ShowReport;
end;
var
myMemo: TfrxMemoView;
begin
myMemo := TfrxMemoView(frxReport1.FindObject('Memo1'));
if myMemo <> nil then
myMemo.Memo.Text := '￥'+myMemo.Memo.Text;
frxreport1.ShowReport;
end;
小疙瘩 2005-12-30
- 打赏
- 举报
间距
charspacing
charspacing
