[Professor Farnsworth]

Один из вариантов решения - ввести в соответствующем наборе данных вычисляемое поле в котором будут считаться значения соответствующих записей (кол-во* Стоимость), после через SQL запрос вычислять итоговую сумму.

Код:

   With ADOQuery1 do
   begin
       Close;
       SQL.Clear;
       SQL.Add('SELECT SUM(summa) AS summa FROM main');
       Open;
   end;