会员
周边
众包
新闻
博问
闪存
赞助商
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
K.R
博客园
首页
新随笔
联系
订阅
管理
2018年3月15日
[转]Delphi 12种大小写转换的方法
摘要: 第一种方法 function TPrintfrm.NumToChar(n: Real): wideString; //可以到万亿,并可随便扩大constcNum: WideString = '零壹贰叁肆伍陆柒捌玖-万仟佰拾亿仟佰拾万仟佰拾元角分'; cCha: array[0..1, 0..11]
阅读全文
posted @ 2018-03-15 16:39 K.R
阅读(2653)
评论(0)
推荐(0)
编辑
公告