Somar compo no DBGrid

Airton,
Tenho visto muitos participantes fazerem esta pergunta. Na verdade ela é meio estranha. Pois o DBGrid é só a vizualização dos dados. Então o que você quer somar são os registros da tabela. É isso? Se for você pode usar SUM em SQL. Ou se for table, por exemplo, é só correr os registros, somando os campos e dar o resultado em um Edit, mais ou menos assim:

var
soma: currency;
......
soma:=0;
table1.first;
while not table1.eof do
begin
soma:=soma+table1campo1.value;
table1.next;
end;
Edit1.text:=currtostr(soma);

Um abraço.

end;

Tenho duas tabelas, Empenho (Tabela mãe) com os campos CodEmp e ValorEmp e Cheque (TabelaFilha) com os campos CodChe, CodEmp, ValorCheque, como faço para calcular a soma dos cheques relacionados com cada Empenho(CodEmp da Tabela Mãe).
No Oncalcfields coloquei:
Query4.Close;
Query4.SQL.Clear;
Query4.SQL.Add(´SELECT SUM( Valor ) as Total FROM Cheque ´);
Query4.Open;
Query1TCheques.AsCurrency:=Total;