摘要：
FastReport调用Delphi中的人民币大写转换自定义函数function TJzpzEdit1.MoneyCn(mmje: Double): string;consts1: string = ‘零壹贰叁肆伍陆柒捌玖’;s2: string = ‘分角元拾佰仟万拾佰仟亿拾佰仟万’;function StrTran(const S, s1, s2: string): string;beginResult := StringReplace(S, s1, s2, [rfReplaceAll]);end;varS, dx: string;i, Len: Integer;beginif mmje 阅读全文
