Estouro De Memoria

[Dangelo2010]

Está dando estouro de memoria quando chega nesse ponto em negrito e nao deixa fazer mais nada.

 

procedure TACBrSPEDPisCofins.WriteBloco_9;
begin
   if Bloco_9.Gravado then exit ;

   if not Bloco_1.Gravado then
      WriteBloco_1 ;
 

[EMBarbosa]

Por favor dê mais informações sobre o ambiente, como versão do Delphi, sistema operacional, etc...

 

Outra coisa, tem como reproduzir esse problema no DEMO do SPEDPisCofins?

[Dangelo2010]

Delphi 7, Windows XP

 

Trabalho com esse componente todos os dias pois gero arquivos para as empresas todos os dias pois sao muitas e foi so fazer uma atualizacao ontem que comeco com esse erro, acredito nao ser nada sobre Delphi ou sistema operacional.

[EMBarbosa]

Você usa o FastMM? Caso negativo, aconselho a adicioná-lo no seu projeto. Ele pode corrigir erros como este.

 

Faça uma atualização hoje novamente. Me parece que o Isaque refez parte desta área do código. Isso pode mudar a situação.

[Isaque Pinheiro]

Faça a atualização novamente e verifique, acabei de subir algo.

[Dangelo2010]

Exclui todo o ACBR, desinstalei tudo e baixei novamente e nada, o erro continua.

[Isaque Pinheiro]

Retornei o código anterior ao que subi ontem, era par voltar ao normal, se não voltou não sei falar o que possa ser, sem contar que no Sped Contribuição não houve nenhuma mudança, o que fiz foi add uma nova função LFill() com parâmetro do tipo Variant, o que removi hoje e subi no ACBrTXTClass.pas

[Dangelo2010]

Isaque Pinheiro, pelo o que vi a unica modificação que você fez foi referente aos Eventos

OnBeforeWriteRegistroC481 e OnBeforeWriteRegistroC485, pois funciono blz

Obrigado!