[fvarela]

Hola

Encontré una forma, no es la mas elegante pero sirve.

Usando la funcion DBINFO de SQL se puede consultar algunos campos de este registro.

Por ejemplo, una tabla con un campo de tipo serial:

create table prueba (
campo serial,
dato char(20)
);


En Delphi, siendo Q un TADOQuery por ejemplo:

Q.SQL.Text := 'insert into prueba(dato) values ("Prueba")';
Q.ExecSQL;

e inmediatamente

Q.SQL.Text := 'select dbinfo("sqlca.sqlerrd1") from systables where tabid=1';
Q.Open;
serial := Q.Fields[0].Value;
...

La documentación acerca de la funcion SQL 'dbinfo' está en los manuales de Informix: Guide to SQL Syntax manual.

Saludos