2015年5月8日
Delphi 实现数字转大写
摘要： 从网上找的一段代码/// /// 小写转大写/// /// /// function MoneyConvert(mmje: real): string;const s1: string = '零壹贰叁肆伍陆柒捌玖'; s2: string = '分角元拾佰仟万拾佰仟亿拾佰仟万'; functi... 阅读全文
posted @ 2015-05-08 20:55 伪装大牛 阅读(1131) 评论(0) 推荐(0)