• 全部
  • 语言基础/算法/系统设计
  • 数据库相关
  • 图形处理/多媒体
  • 网络通信/分布式开发
  • VCL组件开发及应用
  • Windows SDK/API
  • 问答

请教各位,这个控件怎么用?

kevinhood 2003-05-09 12:06:32
cnupper,是一个关于人民币大小写转换的控件,不知大家用过没有。

在它的demo里有这么一段

当单击转换按钮时,将edit1中的字符转化为大写汉字
显示在memo1中
procedure TForm1.Button1Click(Sender: TObject);
var
v: Extended;
begin
v := StrToFloatDef(Edit1.Text, 0);
//将edit1的文本转化为浮点数
Memo1.Lines.Add('转化结果: ' + CnDigits1.ChineseUpper(v));
//调用控件进行转换并给memo1赋值
Memo1.Lines.Add('');
end;

使用很简单,但我想在quickreport中实现发票的打印,需要调用qrexpr的
表达式的值直接在发票中‘人民币大写’字样后显示汉字,,把上述代码直接
改写放到QRlabel的print事件中,但预览时,一点反应也没有,请各位给
诊断一下。是不是我的方法不对,代码该如何改写,放在那里才正确呢?
先谢谢了。
...全文
69 点赞 收藏 1
写回复
1 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
sunssc 2003-05-09
我没有用过,
你打印出来,才能看到结果,
预览时和答应的结果不完全一样!!!
回复
相关推荐
发帖
Delphi
创建于2007-08-02

4891

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2003-05-09 12:06
社区公告
暂无公告