Código Delphi
[-] a:=0;
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('select sum(monto)');
query1.SQL.Add(' from ' + QuotedStr('control del internet'));
query1.Open;
a := query1.fields[0].AsInteger;
query1.Close;
showmessage(inttostr(a));
Ejecuta solamente esta parte y dinos que resulta.
Porque si falla es posible que el nombre de la tabla no sea el adecuado y tengas que encerrarlo entre corchetes []
Un Saludo.