Criar campo auto-incremento no ibconsole e mostrar no delphi

[phfmiranda 0]

Boa noite Galera,

 

Estou criando uma Agenda Telefonica e queria colocar o campo ID auto-incremento, e estou usando o IBOCONSOLE, como eu poderia criar este campo auto-incremento e mostrar o id no dbedit.

 

Obrigado

[marcio.theis 3]

Certo, mas qual banco de dados esta utilizando?

[phfmiranda 0]

Estou usando o Interbase.

[marcio.theis 3]

Para o interbase você pode fazer isto usando uma Trigger e um Generator

 

 

 

Criação do Generator:

 

CREATE GENERATOR GEN_TABELA
---
SET GENERATOR GEN_TABELA TO 0
---

 

 

Criação da trigger:

 

CREATE TRIGGER TABELA_PROXIMOCOD FOR TABELA BEFORE INSERT POSITION 0 AS
BEGIN
IF (NEW.ID IS NULL) THEN
   NEW.ID = GEN_ID(GEN_TABELA, 1);
END
---