Dúvidas com Trigger

Pessoal

Quando vou inserir novo registro coloquei na trigger assim:

CREATE TRIGGER TI_CLIFOR FOR CLI_FOR
ACTIVE BEFORE INSERT POSITION 0
AS
begin
NEW.COD_CLI_FOR = GEN_ID(COD_CLI_FOR , 1);
NEW.DTCAD_CLI_FOR = CURRENT_DATE;
end

A linha NEW.DTCAD_CLI_FOR = CURRENT_DATE é para pegar a data corrente da máquina. Acontece que no dbedit não mostra nada após a inserção, mas está gravando a data certa no banco, mas gostaria que na hora da inserção ele mostrasse no dbedit.. Tem como fazer ????

Obs: Antes fazia assim:

CdsCliFor.FieldByName(´DTCAD_CLI_FOR´).asdatetime := date;

Isto no Delphi, mas agora criei esta trigger para eliminar código no Delphi.

Sou usuário do Delphi 7.0 + Interbase 6.0 + dbexpress

Rogério