while not datamodule.table.eof do-filtrar dois dados e somar

Ola pessoal como todo iniciante as coisa são dificieis ai temos que pedir socoro. SOCORRO!!!!!
eu preciso que o sistema calcula os registro de uma data e de um tipo de venda eu tava tentando fazer com esse código:

procedure tform_lanc_cx_entrada.calcula_totais;
var _caixa,_acrescentar:string;
begin
if bancos.IBT_mov_cx_entFORMA_PAGAMENTO.Value=´Dinheiro´ then
begin
bancos.IBT_mov_cx_ent.First;
WHILE not bancos.IBT_mov_cx_ent.Eof do
begin

end;
end;
end;

so que ai em impaquei rsrsrs. ou seja eu tenho duas tabelas o do caixa e do mov_cx_ent (movimento de entradas do caixa), que estão ligados pelo master source (mãe e filha), depois de fazer um lançamento na tabela de movimento eu quero somar os valores que correspondem as entradas que tem no campo forma_pagamento a inscrição ´Dinheiro´, para poder colocar na tabela do caixa o valor somado, no campo ent_dinheiro da tabela caixa e somar no campo totais_entrada da mesma tabela tomas as entras, ent_dinheiro, ent_cheque, ent_cheque-pre, .... assim e assim por diante. Uma eu sei que vou aprender esse negocio direitinho e tambem poder ajudar.
Eu to usando Firebird ibtable da aba interbase e delphi7.