erro ao gerar excecao

21/01/2006

0

fala galera , nao estou conseguindo gerar uma exceção , nao tem como atraves do try except

try
DataModule1.ClientDataSet1.Post;//grava no ClientDataSet
DataModule1.ClientDataSet1.ApplyUpdates(0);//grava no banco
except
DataModule1.ClientDataSet1.Cancel;
MessageDlg(´Codigo existente!´, mtError, [mbOk], 0);
end;


Tdqr

Tdqr

Responder

Posts

21/01/2006

Tnaires

Olá
Não deu pra entender direito o q vc quer.
Vc quer saber como gerar uma exceção, ou quer saber pq o erro q vc postou está dando erro?
Abraços


Responder

21/01/2006

Tdqr

pq o meu ta dando erro nao to entenddendo , eu nao consigo dar o apply updates mas ele nao entra no except


Responder

23/01/2006

Tnaires

Nunca usei ClientDataSets, mas acho q não tá entrando no bloco except por causa do argumento do ApplyUpdates. Se vc tá passando zero, então vc tá dizendo ao sistema para ignorar todos os erros.

Mas não tenho certeza disso... :oops:

Abraços


Responder

23/01/2006

Tdqr

eu tenho que tratar no OnReconcileError do ClientDataSet ou se quiser manter o try except eu tenho que no DataSetProvider no Evento OnUpdate Error gerar um Raise.....


Responder

23/01/2006

Massuda

Eu não entendo muito de BD, mas que eu me lembre, o normal é tratar no OnReconcileError.


Responder

23/01/2006

Aroldo Zanela

Colega,

Erros := DataModule1.ClientDataSet1.ApplyUpdates(0);//grava no banco
If Erros <> 0 then
 ShowMessage(Format(´¬d erros encontrados´,[Erros]))
else
 DataModule1.ClientDataSet1.Refresh;



Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar