Esta é minha primeira postagem, então espero que o topico esteja no local certo.
estou com o seguinte problema, estou tentando fazer o download da NF-e e ao chamar a TdocZipCollectionItem diz que não exisite o identificador segue abaixo as 'uses' e a parte do codigo que chamo o TdocZipCollectionItem retorna o seguinte erro "[dcc32 Error] Unit1.pas(3405): E2003 Undeclared identifier: 'TdocZipCollectionItem' "; agradeço a quem puder me ajudar;
uses IniFiles, ShellAPI, pcnRetConsReciNFe,
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Buttons, ComCtrls, OleCtrls, SHDocVw,
ACBrNFe, pcnConversao, ACBrUtil, ACBrNFeDANFEClass, ACBrNFeDANFeESCPOS,
ACBrBase, ACBrDFe, XMLIntf, XMLDoc, zlib, ACBrMail, ACBrNFeDANFeRLClass,
ACBrDANFCeFortesFr, ACBrPosPrinter, Spin, ACBrDFeReport, ACBrDFeDANFeReport;
{...}
procedure TForm1.btnDownloadNfeClick(Sender: TObject);
var
cUFAutor, CNPJ, ChaveNFe: string;
LDocZip: TdocZipCollectionItem;
begin
cUFAutor := '';
if not(InputQuery('WebServices Distribuição Documentos Fiscais', 'Código da UF do Autor', cUFAutor)) then
exit;
CNPJ := '';
if not(InputQuery('WebServices Distribuição Documentos Fiscais', 'CNPJ/CPF do interessado no DF-e', CNPJ)) then
exit;
ChaveNFe := '';
if not(InputQuery('WebServices Distribuição Documentos Fiscais', 'Chave da NF-e', ChaveNFe)) then
exit;
ACBrNFe1.DistribuicaoDFePorChaveNFe(StrToInt(cUFAutor),CNPJ,ChaveNFe);
MemoResp.Lines.Text := ACBrNFe1.WebServices.DistribuicaoDFe.RetWS;
memoRespWS.Lines.Text := ACBrNFe1.WebServices.DistribuicaoDFe.RetornoWS;
LoadXML(ACBrNFe1.WebServices.DistribuicaoDFe.RetWS, WBResposta);
ACBrNFe1.Free;
end;
