- Delphi版金额大写(人民币大写读数)代码 2011-09-03 点击:1046 评论:0
- Delphi中将小写数字金额转成大写金额 2011-09-03 点击:1254 评论:0
usesmath; const mnUnit:WideString ='分角元'; const OtherWords:WideString='整负'; const hzUnit:W...
procedure TfmBMZC.BitBtn2Click(Sender: TObject); //金额转换 const chNum : array[0..9] of st...