Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.12.19;
Скачать: [xml.tar.bz2];

Вниз

Подскажите! Сумма чисел в колонке DBGrida   Найти похожие ветки 

 
lscomp   (2002-11-28 19:02) [0]

Есть колонка с числами как в DBGrid найти сумму всех чисел...


 
Cranium   (2002-11-28 19:57) [1]

Грид тут не причем, считай сумму в наборе данных, чего ты тым пользуешь: TTable, TQuery?


 
MsGuns   (2002-11-28 20:27) [2]

Значительно эффективнее:
1.Кладешь TQuery с SQL:
SELECT CAST(SUM(NumField1) AS DECIMAL(15,2)) AS SUM1,
CAST(SUM(NumField2) AS DECIMAL(15,2)) AS SUM2,
CAST(SUM(NumField3) AS DECIMAL(15,2)) AS SUM3,
...........
WHERE условия, по которым выбираются данныве для грида
2. Кладешь TDataSource с DataSet=Query суммирования
3. Внизу (вверху, сбоку,...) грида кладешь столько TDBEdit`в, сколько надо сумм. Св-во DataSource > п.2, DataField>SUM1/2/3..
4. В событии, где открывается форма с гридом даешь
Query.Prepare
Query.Open
5. А дальше только периодический Refresh этой квери (в частности в обработчиках AfterPost/Delete)


 
lscomp   (2002-11-29 09:31) [3]

И как посчитать сумму в TTable?


 
nejest   (2002-11-29 12:07) [4]

сумму можно считать и для грида и для таблицы в ручную, переходишь к первой записи и просматривать последовательно таблицу и суммируя значение нужных записей. Для дочерних таблиц есть одно отличие, там нужно проверять соответствует ли запись дочерней таблицы выбранной записи материнской таблицы и только после этого суммировать значение.


 
BorisUK   (2002-11-29 12:11) [5]

Вместе с EhLib ставится какаято штука DBSumList1
Сам такой фигней не пользовался и тебе не советую..
SQL он всеже лучше :)
Такчто послушайся советов делай через Query


 
MsGuns   (2002-11-29 12:17) [6]

>nejest © (29.11.02 12:07)
>Для дочерних таблиц есть одно отличие, там нужно проверять соответствует ли запись дочерней таблицы выбранной записи материнской таблицы и только после этого суммировать значение.

При правильно построенной связке "один-ко-многим" никаких проверок делать не надо,- подчиненный датасет будет содержать только подчиненные записи текущей записи главной таблицы.


 
Praco   (2002-11-29 12:24) [7]

BorisUK © (29.11.02 12:11)
Возможность выведения итогов есть в самом TDBGridEh, причем не только sum, но и count, avg, пользовательская функция. Я использую и в целом доволен, выглядит красиво.


 
nejest   (2002-11-29 12:26) [8]

>MsGuns
>При правильно построенной связке "один-ко-многим" никаких проверок делать не надо,- подчиненный датасет будет содержать только подчиненные записи текущей записи главной таблицы.


вроде при ручном просмотре дочерней таблицы можно просмотреть записи относящиеся не только к текущей записи главной таблицы


 
MsGuns   (2002-11-29 12:30) [9]

>nejest © (29.11.02 12:26)
>вроде при ручном просмотре

А при ручном - это как - на фиг датасет и руками по секторам веника ?


 
nejest   (2002-11-29 12:53) [10]

> MsGuns
> А при ручном - это как - на фиг датасет и руками по секторам веника ?

сначала при помощи метода First таблицы перехожу на первую запись, потом в цикле пока не последняя запись перемещаюсь по записям методом Next таблицы.


 
MsGuns   (2002-11-29 13:38) [11]

>nejest © (29.11.02 12:53)

Если идет ЛЮБОЕ обращение к детализации связки, включая перемещения, Locate, фильтры, а также RecNo() для локалок и RecordCount - то объектами могут быть только записи детала, находящиеся в отношении Много-к-одному с ТЕКУЩЕЙ (АКТИВНОЙ) ЗАПИСЬЮ мастер-таблицы. Конечно, можно проверять в каждой записи значение мастер-ключа, но оно будет всегда "равно".



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.12.19;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.008 c
1-61586
Explorer
2002-12-10 09:27
2002.12.19
---|Ветка была без названия|---


14-61834
boozer
2002-11-29 22:49
2002.12.19
Где достать в Internet книгу по Delphi в электронном виде ?


1-61677
DVM
2002-12-08 17:43
2002.12.19
Действия с посторонними окнами


1-61596
Maxim_
2002-12-08 22:43
2002.12.19
TListView


3-61429
Ramil
2002-11-27 16:01
2002.12.19
Автоинкрементные поля в IBase...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский