asi es como dice nuestro amigo jachguate, aunque nunca lo halla hecho si funciona, ami me funciona con un IBStoredProcedure
creamos el procedimiento
Código:
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
Código:
IBStoredProcedure.Prepare
Try
IBStoredProcedure.ExecProc;
Variable := IBStoredProcedure.ParamByName('IND').AsInteger;
Finally
IBStoredProcedure.UnPrepare;
End;