Autonumerico nuevamente

[jzginez]

Hola amigos, nuevamente estoy intentando controlar mejor mis automunericos (campo ID), estoy usando delphi y firebird 1.5.
Ya no estoy usando los triggers puesto que no importa si guardo el registro o cancela la accion el generator de todas forma se incrementa, lo que ahora mejor creo una consulta donde optengo el maximo del campo id y lo incremento en uno.

Lo que quiero intentar es usar el procedimiento que ibexpert genera

Código SQL [-]
BEGIN
  ID = GEN_ID(GEN_TIPOALMACEN_ID, 1);
  SUSPEND;
END

ahora mi pregunta es si este procedimiento lo puedo llamar en delphi atravez de un IBStoreProc pero como hago para tomar el valor de ID y asignarlo al campo correspondiente

Gracias