|
|
![]() |
![]() |
![]() |
Меня
интересует возможность подсчета суммы по таблицам, которые уже находятся на
форме.
Есть
очень простой способ - предположим, что у вас есть на форме Query1,
DataSource1, DBGrid1. Добавьте на эту-же форму компоненты Query2,
DataSource2, DBText1. Установите property Query2.DataSource=DataSource1. В
Query2.SQL напишите
SELECT SUM(FieldName) FROM TableName
где TableName
- имя той-же таблицы что и у Query1, а FieldName - имя столбца по которому
производится подсуммирование. Далее свяжите между собой Query2, DataSource2
и DBText1.
При изменении Query1 (если конечно Query1.RequestLive=True)
Query2 будет автоматически перевыполняться. Это решение хоть и простое, но
неэкономичное - особенно при большом количестве записей в исходной таблице.
Более того, запрос Query2 должен иметь WHERE идентичный Query1.
Для
подсчета сумм правильнее использовать событие TQuery.OnCalcFields. Хорошим
примером является X:\DELPHI\DEMOS\DB\MASTAPP\MASTAPP.DPR.
|
| Copyright ©
"Мастера DELPHI" E-mail:
delphi@mastak.com
http://www.delphimaster.ru |
| Источник получения информации: http://www.delphimaster.ru
|
|
