Sql sumar campo sum()

[teclilla]

Hola! que tal? Necesito ayuda con el sql, estoy con una aplicacion para elaborar presupuestos a clientes mediante un formulario, tengo la tabla maestra Tpresupuestos y la tabla detalle TPresProdDetalle en la cual voy añadiendo productos para elavorar el presupuesto, esta última tabla contiene un campo 'Importe' que contiene el importe de cada linea de detalle, el total del presupuesto se encuentra en el campo 'SumaTotal' de Tpresupuestos.
Para realizar la suma utilizo una sql :

Select sum(Importe) as ST from presprod where Codpres= res

la funcion que ejecuta la sql es:

procedure TFormPresupuestos.CalcularTotal;
var
total: real;
begin
QSuma.Close;
QSuma.Params[0].AsInteger:=TPresupuestosIdpres.AsInteger;
QSuma.Open;
total:=QSumaST.AsFloat;
TPresupuestosSumaTotal.AsFloat:=total;
end;

se llama en los eventos TPresProdDetalleAfterInsert y TPresProdDetalleAfterDelete, es decir cada vez que modificamos el detalle de la factura para que la SumaTotal se actualice.

Mi problema es que se ejecuta todo bien y no obtengo ningun error, pero nunca me realiza la suma, es decir, la suma siempre es cero, aunque solo tenga un articulo, no se si sera la sql, espero que alguien pueda ayudarme.
Gracias.