Abort naum quer abortar
Pessoal estou passando por uma situação estranha:
quando dou applyupdate em um clientdataset(isso ocorre no inherited da primeira procedure) e caso gere um erro ele vai pra segunda procedure
e ao passar pelo abort ,ao inves de parar o codigo ele está voltando para a primeira procedure, é como se o abort estivesse dando um exit.
Alguém já passou por isso ?
estou usando delphi 7.
procedure TfrmCadNotaFiscalEntrada.Gravar;
begin
{atualiza informações do item}
AtualizaItem;
{checa total da Nota fiscal}
ChecaTotalNF;
inherited;
DmNfEntrada.tNfEntrada.CommitRetaining;
end;
{****************************************************************************}
procedure TfrmCadNotaFiscalEntrada.cdsCadastroReconcileError(
DataSet: TCustomClientDataSet; E: EReconcileError;
UpdateKind: TUpdateKind; var Action: TReconcileAction);
begin
DmNfEntrada.tNfEntrada.RollbackRetaining;
inherited;
Abort;
end;
quando dou applyupdate em um clientdataset(isso ocorre no inherited da primeira procedure) e caso gere um erro ele vai pra segunda procedure
e ao passar pelo abort ,ao inves de parar o codigo ele está voltando para a primeira procedure, é como se o abort estivesse dando um exit.
Alguém já passou por isso ?
estou usando delphi 7.
Alexandre_sbo
Curtidas 0
Respostas
Alexandre_sbo
28/04/2005
pessoal realmente o abort naum funciona no ReconcileError
entaum a solução foi fazer o seguinte :
entaum a solução foi fazer o seguinte :
if TClientDataSet(dsCadastro.DataSet).ApplyUpdates(0) > 0 then Abort;
GOSTEI 0