Delphi数字大小写转换程序实例.rar

weixin_39882200 54 0 RAR 2019-07-16 02:07:30

Delphi数字大小写转换程序实例,并附有语音报号程序,实例在Delphi7.0下可顺利编译。主要是针对人民币的数字大小写转换,将阿拉伯数字转换成大写,具体定义:constmnUnit:WideString='分角元';  constOtherWords:WideString='\u6574\u8d1f';  consthzUnit:WideString='拾佰仟万拾佰仟亿';  consthzNum:WideString='\u96f6\u58f9\u8d30\u53c1\u8086\u4f0d\u9646\u67d2\u634c\u7396';

用户评论
请输入评论内容
评分:
暂无评论