[sanxpue]

asi es como dice nuestro amigo jachguate, aunque nunca lo halla hecho si funciona, ami me funciona con un IBStoredProcedure

creamos el procedimiento

Create Procedure REG_IND
Return(IND Integer)
As
Begin
  IND = Gen_ID(Nombre_Generador,0);
End

pones un IBStoredProcedure, lo ligas al IBDataBase llamas el procedimiento

a la hora de ejecutarlo

IBStoredProcedure.Prepare
Try
  IBStoredProcedure.ExecProc;
  Variable := IBStoredProcedure.ParamByName('IND').AsInteger;
Finally
  IBStoredProcedure.UnPrepare;
End;