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

09/09/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:


Faelcavalcanti

Respostas

09/09/2004

Everton

Rafael, faça assim:

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



Responder Citar

09/09/2004

Faelcavalcanti

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

:D


Responder Citar