Acess violetion Cancelamento

[Ox3]

 

ao enviar esse comando no cancelamento esta gerando acess violetion

ACBrSAT1.Inicializado := not ACBrSAT1.Inicializado ;

 

segue código

 

AjustaACBrSAT;

  try
    ACBrSAT1.Inicializado := not ACBrSAT1.Inicializado ;
  Except
    on E: Exception do
    begin
      Application.MessageBox(Pchar('Inic' + SlineBreak + ' ' + e.message), 'EnviarCanc', MB_OK);
      exit;
    end;
  end;

  if gerarCanc then
  begin
    if EnviarCanc then
    begin
      try
        PrepararImpressao;
        ACBrSAT1.ImprimirExtratoCancelamento;
        LoadXML( ACBrSAT1.CFecanc.AsXMLString,  mRecebido);
        GravarXml(ACBrSAT1.CFecanc.ide.nCFe);
      except
        on E: Exception do
        begin
          Application.MessageBox(Pchar('Impressao ' + SlineBreak + ' ' + e.message), 'EnviarCanc', MB_OK);
          exit;
        end;
      end;

   end;

  end;

 

 

 

 

[Ox3]

Corrigido, necessário configurar os eventos do AcbrSat.