Окргление

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
paul
Посетитель
Сообщения: 37
Зарегистрирован: 29 мар 2005, 17:49
Откуда: урал -

Окргление

Сообщение paul »

В vip отчете я пишу
H:=DBFopen('C:\out.DBF',stCreate);
DBFAddField(H,'KOLPROD', dbNum, 12, 4);
...
DBFPutFieldValue(H,'KOLPROD', Round(SpSopr.KolFact - SpSopr.OstKol,4));


В результате все равно записывает до 2 знаков после запятой, хотя структура
Numeric 12,4.
Gal582 без всяких патчей и оперов.
;D
Max_Fin
На пенсии
Сообщения: 797
Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:

Re: Окргление

Сообщение Max_Fin »

Воспользуйся DoubleToStr
Жду выхода Вселенная 2.12!
paul
Посетитель
Сообщения: 37
Зарегистрирован: 29 мар 2005, 17:49
Откуда: урал -

Re: Окргление

Сообщение paul »

Помогло
trim(String(SpSopr.KolFact - SpSopr.OstKol,12,4))
Спасибо за совет
Ответить