Округление числа до заданной точности

[Siluet]

Драсьте всем... у меня вопросик...вот я нашел число(12,1666666666667) и вывожу его в МЕМО...как мне его сократить что бы осталось 2 цифры после запятой ?

[Terran]

Можете сделать так:

Uses
 Math;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
Memo1.Lines.Add(FloatToStr(RoundTo(12.1666666666667,-2)));
End;

Только число слегка округляется по известным правилам.
Вот тоже простой вариант:

Memo1.Lines.Add(FormatFloat('0.##',12.1666666666667));

[Siluet]

спасибо большое))

[Bayazet]

или еще вот вариант:
FloatToStrF(X, ffFixed, 7, 2)
//X - переменная, 7 - общее число цифр для числа, 2 - цифр для дробной части