2014年7月13日
Float四舍五入
摘要： 关键词:一个四舍五入的函数这是一个四舍五入的函数，具体用法　myround(1.999,2) = 2.00 第一位1.999为要四舍五入的数，2为要取的小数位。欢迎大家测试探讨。QQ：81392790uses Math, StrUtils;function myround(const yuan: E... 阅读全文
posted @ 2014-07-13 12:30 梁彦坤 阅读(1175) 评论(0) 推荐(0) 编辑
delphi导出数据至Excel的七种方法及比较
摘要： 一;delphi 快速导出exceluses ComObj,clipbrd;function ToExcel(sfilename:string; ADOQuery:TADOQuery):boolean;const xlNormal=-4143;var y : integer; tsList : TS... 阅读全文
posted @ 2014-07-13 10:33 梁彦坤 阅读(950) 评论(0) 推荐(0) 编辑