Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.27;
Скачать: CL | DM;

Вниз

Как сделать так,CalcFields считались сразу для всех записей Query   Найти похожие ветки 

 
Al11 ©   (2003-03-11 13:37) [0]

При открытии формы с DBGrid-ом, связанным с Query, у которого есть
вычисляемые поля, переменнная СOnCalcFields: C:= C+1) равна количеству
отображенных в DBGrid-е (видимых (помещающихся) на экране) записей Query.
Как сделать так, чтобы эта переменная была равна общему количеству записей Query.
(т.е. CalcFields считались сразу для всех записей Query)


 
Johnmen ©   (2003-03-11 13:42) [1]

Зачем же это делать в OnCalcFields ?!!!
Возможно, подойдет RecordCount...


 
Al11 ©   (2003-03-11 15:04) [2]

Извините! Не то хотел спросить...
Нужно подсчитать сумму значении вычисляемомго поля (например FieldCalc у Query),
записи содержащие данное поле предварительно фильтруются. я сделал это так:

procedure...
...
Sum:=0;
Query.filtred:=true;
...
end;

В OnFiltredRecord у Query записи Фильтруются по условию и
у записей удовлетворяющих фильтру генерируется OnCalcFields, где
есть такой фрагмент Sum:=Sum+QueryFieldCalc.Valu
Но все дело в том, что Sum считается только
для тех записей удовлетворяющих фильтру, которые отображены в
DBGrid-е (связанной с Query)


 
Al11 ©   (2003-03-11 15:13) [3]



 
Johnmen ©   (2003-03-11 15:18) [4]

Так делать в принципе неверно !
Если нужна сумма, то просто пробежаться по всему НД и просуммировать...


 
Соловьев ©   (2003-03-11 15:21) [5]

select sum(field)
from table


 
Соловьев ©   (2003-03-11 15:27) [6]

with Query do
begin
Sum := 0;
First;
while not Eof do
begin
Sum := Sum + FieldByName("CalcField").AsIneteger;
Next;
end;
end;



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

Текущий архив: 2003.03.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
7-88274
BANick
2003-02-03 21:11
2003.03.27
Помогите советом.


3-87867
Anonimus
2003-03-11 10:27
2003.03.27
Потеря данных


1-87908
NKiril
2003-03-16 10:36
2003.03.27
Выделение строк Word-а из Делфи.


9-87767
APTEMKA
2002-10-18 03:19
2003.03.27
Прозрачная текстура


9-87769
seemann
2002-10-28 14:36
2003.03.27
Обход препятствий