xchinese.txt

我自己用的Delphi函数单元 具体说明见打包文件的HELP目录下面

unit xChinese;


//将货币值转换为人民币大写
function ToRMB(v:Currency):String; //精度在1万亿之内。

//取的汉字的拼音的首字母
function GetHzPy(const AHzStr: string): string;