Array
(
)

Before Delete, como cancelar a ação do evento ???

Faelcavalcanti
   - 09 set 2004

Olá amigos, como faço para cancelar a ação do evento Before Delete, por exemplo:

procedure TFServicosFornecedor.Qry_FornecedorBeforeDelete(DataSet: TDataSet);
begin
// desejo aqui inserir uma ação que cancele caso entre em alguma condição minha
end;


Alguém sabe essa ???

Obrigado!!!!
:shock:


Everton
   - 09 set 2004

Rafael, faça assim:

#Código


procedure TFServicosFornecedor.Qry_FornecedorBeforeDelete(DataSet: TDataSet);
begin
if Condição then
begin
Abort;
Exit;
end;
end;



Faelcavalcanti
   - 09 set 2004

Obrigado amigo, estava pensando em fazer exatamente isso.
Valeu mesmo!!!

:D