Utiliza un Alias:
Código SQL
[-]
SELECT max(IdProv) as MaximoValor FROM proveedores
y luego consulta en el query utilizando ese Alias...
Código Delphi
[-]
var
f:TField;
begin
...
query1.Exec;
f := query1.FieldByName('MaximoValor');
if not(f.IsNull) then begin
Edit1.Text := f.AsString;
end;
...te lo pongo de memoria, así que tal vez se me escape algun error (pequeño
![Wink](http://www.clubdelphi.com/foros/images/smilies/wink.gif)
), si es así pregunta o échale un vistazo a la ayuda; Debe funcionar.