Ir para conteúdo
  • Cadastre-se

dev botao

Access Violation!!!


Ver Solução Respondido por Márcio Antônio,
  • Este tópico foi criado há 1480 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Amigos, já fiz de tudo e não consigo descobrir esse erro de access violation, quando dou o comando de: dtmOC.cdsManifestoItem.Filtered := False; ele continua o meu código, mas da a mensagem de erro: segue abaixo parte do meu código:

      dtmOC.cdsNFEmunicipio.First;
      dtmOC.cdsManifestoItem.Open;

      // Dados do(s) município(s) e da(s) NF-e
      with dtmOC.cdsNFEmunicipio do
      begin
        vQtdTotNF := 0;

        while not dtmOC.cdsNFEmunicipio.Eof do
        begin
          with infDoc.infMunDescarga.New do
          begin
            dtmOC.cdsManifestoItem.First;
            dtmOC.cdsManifestoItem.Filtered := False;
            dtmOC.cdsManifestoItem.Filter := 'MunDescarga = ' + IntToStr(dtmOC.cdsNFEmunicipioMunDescarga.AsInteger);
            dtmOC.cdsManifestoItem.Filtered := True;

            cMunDescarga := dtmOC.cdsManifestoItemMunDescarga.AsInteger;
            xMunDescarga := RemoverCaracteresEspeciais(dtmOC.cdsManifestoItemMunicipio.AsString);

            while not dtmOC.cdsManifestoItem.Eof do
            begin
              with infNFe.New do
              begin
                chNFe := dtmOC.cdsManifestoItemChave.AsString;
              end;

              vQtdTotNF := vQtdTotNF + 1;

              dtmOC.cdsManifestoItem.Next;
            end;
          end;

          dtmOC.cdsNFEmunicipio.Next;
        end;
      end;
 

se alguém poder me ajudar, não sei mais o que fazer, obrigado!

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Boa tarde

esse seu clientdataset é vinculado algum datasource em alguma tela?

pois ao movimentar ele vai tentar fazer o que está nessas telas.

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Administradores

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1480 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.