en realidad señores del foro les agradezco tanto por su ayuda, a todos, pues de un poco de informacion de todos logramos hacer un boton, enserio a todas las personas que me ayudaron no duden en molestarme cuando necesiten cualquier cosa menos dinero que apenas y tengo para pagar lo del ciber jajajajaja, no enserio muchas gracias todos y aqui dejo el codigo final que me funciono a las mil maravillas, a todos muchas gracias y un gran abrazo.
Código Delphi
[-]
procedure TForm3.Button2Click(Sender: TObject);
var
a:integer;
begin
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));
end;