Si vas a usar los IBX y vas a usarlo todo como lo estas planteando entonces hazlo asi:
A la propiedad SQL del IBQuery1, colocale el script correspondiente a traer el numero maximo de la tabla que es:
Código SQL
[-]
select Max('NombreDelCampo') NombreDelCampo from NombreDeLaTabla
Hagamos un ejemplo sencillo de como capturar ese dato, asi:
Código Delphi
[-]
with NombreDelDataModulo do
begin
IBQuery1.Close;
IBQuery1.Open;
ShowMessage(IntToStr(IBQuery1.FieldByName('NombreDelCampo').AsInteger));
end;
Claro que ese IBQuery1 debe tener amarrada su conexión a la BD, con el componente TIBDatabase correspondiente.
Espero que esto te haya ayudado a aclarar algo.