Duda obteniendo resultado de un query

[Markoz]

Como obtengo el valor de regreso de la siguiente consulta hecha con un TIBQuery:

  QMaxObra.Close;
  QMaxObra.SQL.clear;
  QMaxObra.Sql.Add('Select MAX(CLAVE_OBRA) from OBRAS');
  QMaxObra.Sql.Add('Where CLIENTE ='+IntToStr(Cnt));
   QMaxObra.Open;

Trato de obtener el resultado asi

 maximo := QmaxObra.FieldByName('CLAVE_OBRA').AsInteger;

pero un error me dice que el campo CLAVE_OBRA no existe en QmaxObra

[marcoszorrilla]

Código SQL [-]
 QMaxObra.Close;
   QMaxObra.SQL.clear;
   QMaxObra.Sql.Add('Select MAX(CLAVE_OBRA) As CLAVE_OBRA
  from OBRAS');
   QMaxObra.Sql.Add('Where CLIENTE ='+IntToStr(Cnt));
    QMaxObra.Open;

Un Saludo.

[Posseidon]

Saludos a todos, soy nuevo en esto

Markoz recomiendo que cheques el objeto de tu Query ya que esto suele pasar cuando agregas campos por default en la lista de Fields de dicho objeto, espero te ayude esto

[AGAG4]

También te funcionará sin el AS

Código SQL [-]
Select MAX(CLAVE_OBRA) CLAVE_OBRA ....

[Posseidon]

Simlemente usa
if Queryx.Fields [0].AsString = '' then
maximo := 1
else
maximo = Queryx.Fields [0].AsInteger;