Ayuda con Consulta Max (ID)

[ecfisa]

Hola.

Es que no andan muy lejos

Tres formas de acceder al campo:

Código Delphi [-]
var
  Max1,Max2,Max3: Integer;
begin
  IBQuery1.Close;
  IBQuery1.SQL.Text:= 'SELECT MAX(ID) AS MAX_ID FROM PRODUCTOS';
  IBQuery1.Open;
  Max1:= IBQuery1.FieldByName('MAX_ID').AsInteger; // (1)
  Max2:= IBQuery1.Fields[0].AsInteger;             // (2)
  Max3:= IBQuery1.FieldValues['MAX_ID'];           // (3)
  with ListBox1.Items do
  begin
    Add(IntToStr(Max1));
    Add(IntToStr(Max2));
    Add(IntToStr(Max3));
  end;
  IBQuery1.Close;
end;

(1), (2) y (3) devuelven el mismo resultado.

Si no creas los campos persistentes que es el modo mas rápido de acceso, te recomiendo usar la forma (1).
La (2), además de ser muy confusa, basta un cambio en la organización de las columnas y ¡ Pif ! lo que eran pollos se vuelven sandías , la forma (3) es la mas lenta de acceder al valor del campo.

Saludos