округление десятичных знаков

← →
ser35 (2005-03-05 20:55) [0]

Здравствуйте Мастера!
Подскажите как правильно преобразовать число с 3-4 числами после запятой до двух? Попробовал использовать функцию round, округляет до целого
s:real; Form9.Edit26.Text:=FloatToStr(s);

← →
Leeechhhh (2005-03-05 20:57) [1]

эх, в паскале всё просто было!
переменная:8:2
не знаю в делфе пройдёт.

← →
GuAV © (2005-03-05 20:59) [2]

> ser35

FloatToStrF

Только это строковое представление

> с 3-4 числами после запятой до двух
, а не округление, округлить вряд ли получтися.

> Leeechhhh

И так можно. См. процедуру str

← →
Knight © (2005-03-05 21:02) [3]

> ser35 (05.03.05 20:55)
> округляет до целого

А ты до округленя умнож на 100, после округления раздели на 100... тупо, но возможно сойдёт... :)

← →
ser35 (2005-03-05 21:05) [4]

> А ты до округленя умнож на 100, после округления раздели
> на 100... тупо, но возможно сойдёт... :)

Пробовал, не проходит...

← →
Leeechhhh (2005-03-05 21:08) [5]

s:real;
Form9.Edit26.Text:=FloatToStr(s:к-во_целых_элементов:к-во_элементов_после_запятой);

← →
Leeechhhh (2005-03-05 21:08) [6]

помому так

← →
Knight © (2005-03-05 21:11) [7]

> [4] ser35 (05.03.05 21:05)
> Пробовал, не проходит...

Что не проходит?

← →
Leeechhhh (2005-03-05 21:13) [8]

ну про тупо =)
хотя почему, тоже вариант, по идее должно всё проходить

← →
GuAV © (2005-03-05 21:40) [9]

FloatToStrF и Str тоже не подходит ?

← →
Anatoly Podgoretsky © (2005-03-05 21:42) [10]

FormatFloat эквивалент этого переменная:8:2, оно же STR, оно же Format, оно же еще некоторые функции. Но оно же все не соответствует вопросу. Но и он не соответсвует тому что дальше пишется в сообщении.

В совокупности я бы посоветовал использовать FormatFloat , из-за его чрезвычайной наглядности.

← →
ser35 (2005-03-05 22:14) [11]

Спасибо за советы. Сделал немного по другому, и получилось (Мне, как новичку - это показалось очень удобным):
(RoundTo (s,-2)

RoundTo(1.234, -2) 1.23
RoundTo(1.235, -2) 1.24
RoundTo(1.245, -2) 1.24

что-то я логики в последнем примере не уловил...

Наверно это уже после вызова SetRoundMode()...

> ] ser35 (05.03.05 22:14)

А вообще, маладца... все бы так :)))

← →
Mars (2005-03-06 01:38) [15]

Попробуй поэкспериментировать с SimpleRoundTo

В хелпе сказано, что
Round и RoundTo- это "банковское округление" - если десятичная часть 0.5, то окгругялет до ближаешего четного, т. е. Round(3.5)=4 и Round(4.5)=4
А SimpleRoundTo - "арифметическое округление" - Round(3.5)=4 и Round(4.5)=5

округление десятичных знаков Найти похожие ветки