请教各位，这个控件怎么用？

[kevinhood]

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事件中，但预览时，一点反应也没有，请各位给
诊断一下。是不是我的方法不对，代码该如何改写，放在那里才正确呢？
先谢谢了。

[sunssc]

我没有用过，
你打印出来，才能看到结果，
预览时和答应的结果不完全一样！！！