Generator no DBEXPRESS / FIREBIRD

Question

Tenho um generator em uma trigger criada em um banco de dados firebird. No IBX era facinho colocar o generator mas troquei para SQLdataset(Dbexpress) e naum sei como fa�o para colocar o generator.
Algu�m pode me ajudar ???

Afarias · Answer

N�o entendi o lance da Trigger --- ou vc gera o valor no banco (trigger) *OU* na aplica��o!!

na aplica��o � simples (d� um desconto no c�digo pq n�o conhe�o DBX)::

function NovoID(const NomeGenerator: string): Integer;
const
  sqlText = �SELECT GEN_ID(�s, 1) FROM RDB$DATABASE�;
begin
  with SQLQuery do
  begin
    { abre a transa��o }
    try
      SQL.Text := Format(sqlText, [NomeGenerator]);
      ExecSQL;
      Result := Fields[0].AsInteger;
    finally
      { fecha a transa��o }
    end;
  end;
end;

dai � s� usar o c�digo acima onde desejar... como num evento OnNewRecord ou BeforePost de um DataSet... ou no BeforeUpdateRecords de um DataSetProvider... ou onde for melhor!

ex::

DataSetTal.FieldByName(�CODIGO�).AsInteger := NovoID(�gerador1�);

T+

F�rum Generator no DBEXPRESS / FIREBIRD #45915