怎么对Float小数点后一位四舍五入，并且取绝对值

如何对Float小数点后一位四舍五入，并且取绝对值？
比如：Edit1.text：=FloatToStr（-15.6912345）;
要求Edit1显示15.7 应该怎么做？请给出代码，谢谢！

[解决办法]
首先引用math单元，
然后这样写：edit1.text:=floattosrt(roundto(-15.6912345,-1));
[解决办法]
格式输出 Format('%6.1F', xxx) or FormatFloat('0.0', xx)

绝对值 Abs
[解决办法]
Edit1.text:=Format('%0.1f',[abs(-15.6912345)]);