ADOTable delphpi7

[MrMorozko]

Всем доброго времени суток! Емееться таблица ADOtable1 имя её Sell мне нужно посчитать общую выручку во всей таблице... есть столбцы
"Цена" и "Количество"
как это можно вывести в Label??? СпасибО)

[evg_m]

1. adotable считать в цикле

s:=0;
ado.first;
while not ado.eof do
begin
  s:=s+ado.fieldbyname('цена').asfloat *.ado.fieldbyname('количество').asfloat;
  ado.next;
end;
label.caption:=floattostr(s);

2.перейти на adoquery +SQL

  adoquery.sql.text:='select sum(цена*количество) as fullsumm  from....';
  adoquery.open;
  label.caption:=adoquery.fieldbyname('fullname').asstring;

[MrMorozko]

Спасибо большое