[bobneo]

Хай всем! Ситуация такая. Вставил QReport, Назвал поля, на вкладку Detail поставил QRExpr1, в инспекторе объектов в свойствах Expression сделал формулу одно поле поделить на другое. Все норм делит но выводит на просмотр такие цифры как 23,34245353242. КАК СДЕЛАТЬ ТАК чтобы выводилось число с 2 знаками после запятой 23,34. Заколебался везде тыркать. ПОМОГИТЕ ПЛИИЗ!!!

[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.

[<<D>>]

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

[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 := '.';

[moo2k]

Код:

DecimalSeparator:='.';

[<<D>>]

Спасибо!
Есть еще вопросик.
Мне нужно что бы текст с цифрами имел структуру вместо 123456789 было 123 456 789, т.е. разделяло через каждые три символа. Как это можно сделать?