Sql sumar campo sum()

[[Caral]]

Hola
Acuerdate de usar las etiquetas.

Código SQL [-]
Select sum(Importe) as ST from presprod where Codpres= res

Código Delphi [-]
procedure TFormPresupuestos.CalcularTotal;
var
total: real;
begin
QSuma.Close;
QSuma.Params[0].AsInteger:=TPresupuestosIdpres.AsInteger;
QSuma.Open;
total:=QSuma.FileByName('ST').Value;
TPresupuestosSumaTotal.AsFloat:=total;
end;

Saludos