Problemas al crear triggers

[nenufer]

Si cuando ejecuto la consulta no le hago un commit,no me sale el error pero no me crea el trigger.

Código Delphi [-]
procedure creartrigger();
begin
  //Mas codigo.
  IBSQL.ExecQuery;
   //IBSQL.Transaction.CommitRetaining;
   Memo.Lines.Add('Trigger creado');<--- llega hasta aqui sin la linea de arriba
                                                       pero sin crear trigger.
end;

Gracias