ACBRConsultaCNPJ erro

[Luiz Carlos de Lima]

Boa Tarde,

1    ACBrConsultaCNPJ1.Provedor := cwsReceitaWS;
2   ImgArq := ExtractFilePath(ParamStr(0))+PathDelim+'captch.png';
3    Stream.SaveToFile( ImgArq );
4    Image1.Picture.LoadFromFile( ImgArq );

Erro na linha 4

First chance exception at $75FC9392. Exception class EPNGInvalidFileHeader with message 'The file being read is not a valid "Portable Network Graphics" image because it contains an invalid header. This file may be corrupted, try obtaining it again'. Process Receber.exe (18496)

[Renato Rubinho]

Boa tarde,

O erro está acontecendo porque a imagem que está sendo carregada na linha 4 não é um png.

Mas o componente não precisa mais deste tratamento.

Atualize seus fontes e teste com o programa de exemplo para validar.

../trunk2/Exemplos/ACBrTCP/ACBrConsultaCNPJ

Preencha somente o provedor e teste o método de consulta passando o CNPJ.

 

 

[Luiz Carlos de Lima]

Perfeito, ficou ótimo.

Grato.

[Renato Rubinho]

Obrigado por reportar.

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