Sintegra Erro Na Geração Do Arquivo

[edulamy]

Bom dia,

 

Estou com problema na geração do arquivo, pois estou utilizando os registros 70/71, dentro da função LimpaRegistros existem dois comandos FRegistros70.Clear e FRegistros71.Clear, quando o sistema passa for essas funções causa access violation, comentei as duas e quando eu fecho o Form é a apresentada a seguinte mensagem de erro:

 

Access violation at address 00000100. Read of address 00000100.

 

Estou utilizando o comando Action := caFree; no OnClose do Form.

Editado 26 Setembro, 2013 por edulamy

[EMBarbosa]

Alterando o programa de exemplo do ACBrSintegra, você consegue reproduzir o problema?

Em caso afirmativo, anexe as alterações para que possamos verificar.

[edulamy]

Vou verificar. e posto o resultado.

[edulamy]

No exemplo não ocorre o problema não sei dizer se o problema é a quantidade de registros, no exemplo eu utilizo apenas um registro e no meu sistema são mais de 2000.

 

 

[Juliomar Marchetti]

Verifica se o FRegistros71 não está nil ali

[Elton Mamede]

vc ja tentou debugar para ver em qual linha mostra o acess violation

[Carlos Modesto]

Eu tive o mesmo problema e debugando encontrei esse problema no destructor TACBrSintegra.Destroy; ao tentar liberar o registro;

Por exemplo: FRegistro10.Free;

[EMBarbosa]

Isso pois alguém destruiu o FRegistro10 antes da hora. A orientação continua a mesma:

 

Alterando o programa de exemplo do ACBrSintegra, você consegue reproduzir o problema?

Em caso afirmativo, anexe as alterações para que possamos verificar.

Caso não consiga reproduzir no exemplo do ACBrSintegra, muito provavelmente o seu código é que está incorreto.