Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Происходит округление до целого числа при выборке из базы [D7, Paradox]


petvv ©   (2006-12-07 06:17:00) 

Люди такой трабл !
Если я в базе делаю запрос такого вида
select
Sum(TotMoney.Receipts) Vir,
Sum(TotMoney.OutBank) Bank,
Sum(TotMoney.OutCash) Ras
from
TotMoney
where
TotMoney.ShiftTo>=:QDBeg and TotMoney.ShiftTo<=:QDEnd
то всё просчитывается нормально, а если делаю так
select
InShift,Receipts, OutBank, OutCash, OutShift
from
TotMoney
where
TotMoney.ShiftTo>=:QDBeg and TotMoney.ShiftTo<=:QDEnd
и потом
qMoney.FindFirst;
OstNaNachalo:=qMoney.FieldValues['InShift'];
qMoney.FindLast;
OstNaKonec:=qMoney.FieldValues['OutShift'];
то он округляет до целого числа. Вопрос почему округляет и как с этим бороться. Для информации поля InShift,Receipts, OutBank, OutCash, OutShift в базе имеют формат $(денежный). Переменные OstNaNachalo, OstNaKonec тип Integer


petvv   (2006-12-07 07:18:00) [1]

Всё люди сам разобрался. С преобразованием запарился. Тема закрыта.


Наверх

Титульная страница Поиск, карта сайта Написать письмо