修正DB.pas单元小数进位的问题
时间:2011-01-04 来源:☆道法自然☆
1、在db.pas中第5549行
Text := FormatCurr(FmtStr, C);
改为
Text := FormatFloat(FmtStr, C);
2、重新编译DB.pas将产生的db.dcu文件替换Lib文件夹是的db.dcu文件(应先删除“C:\Program Files\Borland\Delphi7\Lib”db.dcu文件,这时在有数据库的程序中会报“找不到db.dcu文件”错误,重新在程序中指定DB.pas所在路径“C:\Program Files\Borland\Delphi7\Source\Vcl”)
3、再检查数据效果OK了
相关阅读 更多 +