var auxiliar :integer begin consulta.close; consulta.sql.clear; consulta.sql.add('select sum(precio) as total from mitabla'); consulta.Open; auxiliar := consulta.fieldbyname('total').AsInteger