| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Перевод значения Variant в Extended если значение равно Null [D7, 2000, XP]
Tor © (2006-11-16 12:24:00)Доброго времени суток, All!
В принципе можно сделать вот так:
S := 0;
if Contagents.Aggregates.Find('SUM_DEBET_FOR').Value <> Null then
S := S + Contagents.Aggregates.Find('SUM_DEBET_FOR').Value;
...
Но хотелось у знать может есть какой-нибудь метод, который вслучае Null будет возвращать просто 0 ?
Tor (2006-11-16 12:33:00) [1]> VarType(Variant)=varNull
тоже самое что в первом примере, только с другой стороны
Tor (2006-11-16 12:31:00) [2]К сожелению дядя борланд наградил этот объект только МЕТОДОМ Value.
Да и работают эти агрегаты както через Ж, в плане округления значений, если например задать в св-ве Expression такое выражение: Sum(Field1) - Sum(Field2)
З.Ы. Это так к слову :)
Dmitrij_K (2006-11-16 12:28:00) [3]VarType(Variant)=varNull
Плохиш (2006-11-16 12:27:00) [4]Может у неизвестного объекта Contagents.Aggregates.Find('SUM_DEBET_FOR') имеется метод AsFloat?
| |
