[Appolon]

Сообщение от Drozh

Не особо понял что требуется, может это поможет:
function Format(const Format: string; const Args: array of const): string;

для твоего случая:
Format('%1.2f', [Value]);
где Value - число которое надо преобразовать, функция вернет строку с числом округленным до двух знаков (подробнее прочитай в справке по Delphi)

есть еще
function FloatToStrF(Value: Extended; Format: TFloatFormat; Precision, Digits: Integer): string;

в нем: Precision - точность, Digits - число цифр;
Значение Precision должно быть не более 7 при преобразовании типа Single, не более 15 для Double, не более 18 для Extended.

А не проще ли будет сделать вот так, чем возиться с функициями:

Код:

Edit1.Text:=FloatToStr(Round(12,563*100)/100);

Сообщение от <<D>>

Интересно... а как сделать чтобы вместо запятой в числе, была точка.
Пример: Вместо - 12,22, Было - 12.22

Для этого в коде создания главной формы укажи команду:

Код:

DecimalSeparator := '.';