Duda obteniendo resultado de un query
 

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

Trato de obtener el resultado asi
pero un error me dice que el campo CLAVE_OBRA no existe en QmaxObra

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.

Resultado de un Query
 

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

Checa Esto...
 

También te funcionará sin el AS

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

Error en Query
 

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