El Generador ya se puede controlar a gusto del poeta. Con este código:
Código Delphi
[-]
nGen:=FDConnection1.GenLastAutoGenValue('GEN_FOTO'); nGenNext := FDM2.FDConnection1.ExecSQLScalar( 'select gen_id(gen_foto, 0) from rdb$database' );
nGenNext := FDM2.FDConnection1.ExecSQLScalar( 'select gen_id(gen_foto, 1) from rdb$database' );
Creo que puede ser útil. Pero tal vez no esté en el hilo apropiado.
Saludos.
bulc