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

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

Проблема с ADOQuery [D7, MSSQL]


igor666 ©   (2006-11-08 10:49:00) 

Проблема вот в чём, в АДОКвери генерится запрос (в запросе используются хранимы процедуры, которые в зависимости от данных в БД генерят различное кол-во полей для вывода, поэтому заранее я не могу знать сколько полей будет выведено в запросе). Так вот, в БД имеются поля типа decimal(18,5), т.е. 5 знаков после запятой, а кверя во время выборки присваивает им тип TBCD, который не выводит больше 4х знаков после запятой, а мне важно именно 5 знаков!!!. Подскажите плз как этого можно избежать, как вдрать 5 знаков из БД?

Спасибо.


sniknik   (2006-11-09 14:05:00) [1]

> если его поставить в false
то конвертация идет не через currency а через float (что тоже плохо для денежных данных. т.к. тип с плавающей точкой)


igor666   (2006-11-09 13:52:00) [2]

Всё оказалось намного проще, в ADO есть свойство EnableBCD, если его поставить в false, то всё конвертится без проблем и все знаки после запятой сохраняются :))


igor666   (2006-11-08 12:11:00) [3]

кстати, а на счёт SetDataType у меня он действительно пустым был, теперь поставил FDataType := Value; :)


igor666   (2006-11-08 12:09:00) [4]

мдя, прийдётся занчит везде в запросе CAST добавлять и конвертить во float, спасибо всем


sniknik   (2006-11-08 11:31:00) [5]

> в модуле просто begin end и всё :),
ага, шутки, и главная шутка в слове abstract в описании.  
и ты не туда смотришь, в моем дельфи SetDataType с одной строчкой внутри
procedure TField.SetDataType(Value: TFieldType);
begin
 FDataType := Value;
end;
 

> decimal(18,5)
этого многие уже не поддерживают, но тип TBCD имеет до 99 знаков после запятой... другое дело что в дельфе приведение идет через currency у которого действительно 4 знака после запятой (вернее это вообще целочисленный тип, просто принили что 4 разряда под дробь).
так что ADOQuery тут не причем (как бы не нелюбил я его но справедливость дороже ;о)), это дельфя, если хочеш можеш попробовать сделать приведение сам, дабавить свой метод asBcd, без этого недостатка (currency).


Stanislav   (2006-11-08 11:14:00) [6]

В запросе преобразовывой в float.


igor666   (2006-11-08 10:59:00) [7]

В том то и дело что в конструкторе это не проблема, но я же писал что кол-во полей динамическое и названия их тоже, поэтому в конструкторе я просто этого сделать не могу. А стандартная процедура TField.SetDataType() - в дэлфи просто пустая, её либо забыли написать, либо просто шутки у борланда такие, в модуле просто begin end и всё :), а между ними пусто.


Stanislav   (2006-11-08 10:55:00) [8]

Я удалял эти поля в Query, и пересоздавал их как Float. Только делал это в конструкторе программно не приходилось.


Наверх

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