[DSerGion]

Люди я делаю Edit1 - куда вводим число. Edit1 у меня StrToFloat.
Вроде суммирую когда выходит число: 4500, 5000, т.д.
А когда делю или умнажаю выходит: 200,44444, 300,55555.
Вот как отбросить ненужные цыфры?
div или mod.
В справке посмотрел, немного не разобрал... Щас листинг приведу:
...
a: real;
...
a:= StrToFloat(Edit1.Text);
...
Label1.Caption:= FloatToStr((a)+100);
! Label2.Caption:= FloatTostr((Label1.Caption)*10/20);
п.с.: где ! вот в этой строчке как применить div or mod? Или какую ту другую операцию, чтоб получилось не 300,4444. а 300,44. или округлить без копеек. 300.

[Мишка-90]

Round(12.75) = 13
Trunc(12.75) = 12
Frac(12.75) = 0.75

вот примеры огругления

[DSerGion]

Сообщение от Мишка-90

Round(12.75) = 13
Trunc(12.75) = 12
Frac(12.75) = 0.75

вот примеры огругления

Спасибо, щас применю. а то применил StringReplace? но это со всем не то...

[Мишка-90]

да, чуть-чуть не то...
дерзайте.
если не ошибаюсь то в методе Round пожно указать количество точек после запятой..

вод даже пример нашел..

Приведем пример округления значение переменной V до двух знаков после запятой. В переменную V записываем новое значение:
V:=RoundTo(V, -2); Приведем пример деления двух чисел: var R1,R2,R: Real;
begin
R1:=152;
R2:=490;
R:=R1/R2;
R:=RoundTo(R, -2);
end;