Duvida com dbexpress e firebird

Ola!
Eu criei uma tabela com este codigo:

CREATE TABLE CLIENTE(
CODCLI INTEGER NOT NULL,
NOME VARCHAR(100),
PRIMARY KEY(CODCLI));

E criei um generator pra gerar auto incremento pro meu campo codcli.

CREATE GENERATOR GEN_CLIENTE;

Dai criei uma trigger:

CREATE TRIGGER TRG_INC_CLIENTE
FOR CLIENTE ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF(NEW.CODCLI IS NULL) THEN
NEW.CODCLI = GEN_ID(GEN_CLIENTE,1);
END

no delphi quando mando salvar ele da um erro falando q preciso inserir um valor pro campo codcli sendo q isso e pro generator fazer.

estou usando dbexpress