摘要: 阅读全文
posted @ 2022-06-09 11:33 绿水青山777 阅读(15) 评论(0) 推荐(0) 编辑
摘要: function RoundFloat(f: double; i: integer): double;var s: string; ef: extended;begin s := '#.' + StringOfChar('0', i); ef := StrToFloat(FloatToStr(f)) 阅读全文
posted @ 2022-06-09 11:31 绿水青山777 阅读(52) 评论(0) 推荐(0) 编辑