Registro duplicado usando trigger

Question

boa tarde a todos, meu problema e o seguinte:tenho uma tabela chamada modelo que tem os seguintes campos:codigo integer autoincremento que � minha chave primaria edescricao varchar(30) e para completa...

Gandalf.nho · Answer

Nem precisa usar uma EXCEPTION. J� que vc declarou o campo como �nico basta interceptar a mensagem de erro normal e passar a mensagem amig�vel pro usu�rio....

Tronbr · Answer

a titulo de exemplo estou fazendo o seguinte:
no evento onclick de um TButton eu chamo o seguinte processo

var
  TD: TTransactionDesc;
begin
  TD.TransactionID := 1;
  TD.IsolationLevel := XILReadCommitted;
  SQLConnection1.StartTransaction(TD);
  try
    DS.Post;
    DS.ApplyUpdates(0);
    SQLConnection1.Commit(TD);
    DS.Last;
  except
    on E: Exception do
      ShowMessage(E.Message);
  end;

onde DS � um TsimpleDataSet que tem em sua propriedade DataSet.CommandText = �Select * from modelo�. o erro quando estou debugando acontece, mas quando o programa est� executando direto sem o delphi a mensagem de erro nem aparece, ele apenas n�o grava.
para entrar com a descricao e o codigo estou usando Tdbedit linkado ao DS.

muito obrigado pela rapidez com que vc respondeu a primeira pergunta, em outros foruns isto levaria horas sen�o dias.

Gandalf.nho · Answer

Pelo que sei, em em ClientDataSet e similares vc deve usar o evento OnReconcileError para interceptar as mensagens de erro, pq o Try/Except n�o funciona nesse caso....

Tronbr · Answer

eu sei que nao e de bom tom estar agradecendo as respostas, para nao entulhar o forum, mas ja entulhando muito obrigado. sua dica funcionou perfeitamente....

F�rum Registro duplicado usando trigger #51003