四舍五入可以用这种形式，保留2位小数！

Format('%.2f',[StrToFloat(Edit1.text)]);