大写金额转换 (转)

大写金额转换 (转)[@more@]

  最近做一个数据库，要用到大写的金额格式显示，于是自己写了一个，希望大家多提宝贵意见！（真是感到了C++ Builder的资料短缺了，连现成的这个函数都找不到！）

AnsiString CurrToChnNum(float CurrNum, bool DisplayZero = true, int SpaceNum = 2);

AnsiString CurrToChnNum(float CurrNum, bool DisplayZero, int SpaceNum)
//参数说明：CurrNum  这个是要转化的数值
　　　　　  DisplayZero  是否要显示零　如：(显示零)壹佰 零拾 叁元 伍角 伍分
 SpaceNum  字符间的空格数，默认值为2
{
  //数值转换为大写金额
  //18个数字单位
  const String Dw[18] = {"分","角","元","拾","佰","仟","万","拾","佰","仟","亿","拾","佰","仟","兆","拾","佰","仟"};
  //10个数码
  const String Num[10] = {"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"};
  AnsiString sTemp;
  sTemp = FormatFloat("0.00", CurrNum);  //格式化数值
  sTemp.Delete(sTemp.Pos("."), 1);  //去掉小数点
  if ( sTemp.Length() > 18 )  //是否超长？
  {
  MessageDlg("数值位数太多，不能处理！",mtError,TMsgDlgButtons() << mbYes,0);
  return NULL;
  }
  AnsiString sRusult = "￥ ";  //字串的头部字符，根据喜好
  for (int i = sTemp.Length(); i > 0; i--)  //开始加工
  {
  if ( !DisplayZero && i > 2 && sTemp[sTemp.Length() - i + 1] - 48 == 0 )
  continue;
  sRusult += Num[sTemp[sTemp.Length()-i+1]-48];
  sRusult += Dw[i-1];
  sRusult += AnsiString::StringOfChar(, SpaceNum);
  }
  return sRusult;
}
//---------------------------------------------------------------------------

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/10752043/viewspace-992185/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/10752043/viewspace-992185/