decidi fazer esse topico pois vi que muitos amigos estão com problema em usar a imagem do captcha CPF/CNPJ que agora vem em PNG.
eu baixei o componente : GraphicEx
no link: http://www.soft-gems.net/index.php/all-downloads
é só extrair o conteudo do arquivo GraphicEx.zip na pasta de sua escolha
vai no delphi em tools -> environment options -> na aba library -> clica nos botao "..." em Library Path
seleciona a pasta GraphicEx e clica em add
agora no projeto adicione a uses: GraphicEx
e no atualiza captcha do ACBrConsultaCNPJ
é só usar assim:
procedure TF_Principal.LabAtualizarCaptchaClick(Sender: TObject);
var
Stream: TMemoryStream;
Img: TPNGGraphic;
begin
Stream:= TMemoryStream.Create;
Img:= TPNGGraphic.Create;
try
ACBrConsultaCNPJ1.Captcha(Stream);
Img.LoadFromStream(Stream);
Image1.Picture.Assign(Img);
EditCaptcha.Clear;
EditCaptcha.SetFocus;
finally
Stream.Free;
Img.Free;
end;
end;
quero deixar claro que existem outros componentes e outras formas de fazer isso, mas é assim que eu estou usando,
estou apenas querendo ajudar os que ainda tem dificuldade com eu tive.
Segue o demo em delphi 7:ACBrConsultaCNPJ.zip