Erro no ACBrConsultaCNPJ1

[Luiz Carlos de Lima]

Boa tarde,

Começou a dar uma mensagem  "Atualize o Captcha" ao chamar o ACBrConsultaCNPJ1.Consulta(EditCNPJ.Text, EditCaptcha.Text), usando o Delphi.  Atualizei o ACBr, agora está

Dando  ........'*******' is not a valid date and Time ao chamar o componente. Se voce optar em continuar, os dados são carregados.

Debuguei e cheguei até esta linha :    FDataSituacaoEspecial := StringToDateTimeDef(LerCampo(Resposta,ACBrStr('DATA DA SITUAÇÃO ESPECIAL')),0);

da funçao >  TACBrConsultaCNPJ.Consulta

 

 

[Juliomar Marchetti]

chegou a atualizar a dll do openssl?

[Diego Foliene]

15 minutos atrás, Luiz Carlos de Lima disse:

Boa tarde,

Começou a dar uma mensagem  "Atualize o Captcha" ao chamar o ACBrConsultaCNPJ1.Consulta(EditCNPJ.Text, EditCaptcha.Text), usando o Delphi.  Atualizei o ACBr, agora está

Dando  ........'*******' is not a valid date and Time ao chamar o componente. Se voce optar em continuar, os dados são carregados.

Debuguei e cheguei até esta linha :    FDataSituacaoEspecial := StringToDateTimeDef(LerCampo(Resposta,ACBrStr('DATA DA SITUAÇÃO ESPECIAL')),0);

da funçao >  TACBrConsultaCNPJ.Consulta

 

 

Boa tarde!
Está é uma exceção controlada, você está executando em Debug?
Por favor, faça um teste executando em Release.
Note que a função usa

StringToDateTimeDef(LerCampo(Resposta.ACBrStr('DATA DA SITUAÇÃO ESPECIAL')), 0);

então se a data for inválida ele joga 0 automaticamente.

[Luiz Carlos de Lima]

Juliomar, Cheguei a apagar toda a pasta que contem o ACBr, e baixei tudo de novo, atualizando para apagar oa antigos.

Diego, em execução normal realmente nao dá o erro.

Pra mim está resolvido. Grato.

[Diego Foliene]

Obrigado por reportar.

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