Проблемка с ZReport

← →
slyfox (2002-12-25 06:42) [0]

Привет всем у меня проблемка возникла
сгруперовал я данные вывел сумму по каждой группе
а обшию вы вести не могу.Поможите люде добые плиз?

← →
Nevel (2002-12-25 06:50) [1]

В своё время Я тоже столкнулся с такой проблемой и решил её так:

var
s:string;
nExport,nimport:LongInt;
begin
nimport:=0;
nExport:=0;
Dm1.Table1.First;
With DM1.Table1 do while not eof do
begin
nexport:=nexport+DM1.Table1["Export"];
nimport:=nimport+DM1.Table1["Import"];
next;
end;
Form7.QRLabel6.Caption:=IntToStr(nExport);
Form7.QRLabel7.Caption:=IntToStr(nImport);
Form7.QuickRep1.Preview;
end;

Здесь программа должна считать сумму поля: Table1["Export"] и Table1["Import"] Я сделал через перебор таблици и подсчёт Занимает время зато работает.

← →
slyfox (2002-12-25 07:17) [2]

Спасибо !
Ща попробую.

← →
slyfox (2002-12-25 08:51) [3]

Сделал так
var sum : integer;
begin
sum:=0;
Table1.First;
while not Avans.Table1.Eof do
begin
Sum:=sum+Table1["Summa"];
Table1.Next;
end;

ZRLabel100.Caption:=inttostr(sum);
ZReport5.Preview;
показывает кол-во записей в отчете

Проблемка с ZReport Найти похожие ветки