- 博客(2)
- 资源 (1)
- 问答 (1)
- 收藏
- 关注
原创 人民币大写
const Len:Integer = 10 ; cNum: WideString = 零壹贰叁肆伍陆柒捌玖; function NumToChar(const n: Double): string; var i : Integer; sNum,sTemp : WideString; begin result :=; sNum := format(%+inttostr(Len)+d
2006-05-08 14:58:00 605
转载 人民币大写
const Len:Integer = 10 ; cNum: WideString = 零壹贰叁肆伍陆柒捌玖;function NumToChar(const n: Double): string;var i : Integer; sNum,sTemp : WideString;begin result :=; sNum := format(%+inttos
2006-05-08 14:52:00 1294
员工之间工资不超1.5倍
2017-07-19
TA创建的收藏夹 TA关注的收藏夹
TA关注的人