Pesquisar na Comunidade

Prezados, Gostaria de imprimir a NFC-e em papel A4 (laser). Estou gerando NFC-e (65) e, ao imprimir, está saindo no modelo NF-e (55). As configurações que utilizei foram: 1 - Gerar a NFC-e: ... NotaF := ACBrNFe1.NotasFiscais.Add; ... if Assigned( ACBrNFe1.DANFE ) then begin if iModelo=55 then begin // NFe NotaF.NFe.Ide.tpImp := ACBrNFe1.DANFE.TipoDANFE; // tipo de impressao: tiSemGeracao, tiRetrato, tiPaisagem, tiSimplificado, tiNFCe, tiMsgEletronica end else begin // NFC-e NotaF.NFe.Ide.tpImp := tiNFCe; // ACBrNFe1.DANFE.TipoDANFE; // tipo de impressao: tiSemGeracao, tiRetrato, tiPaisagem, tiSimplificado, tiNFCe, tiMsgEletronica end; end; ... ////////////////////////////////////////////////////// // QR-CODE ///////////////////////////////////////////////////// if iModelo = 55 then begin // 55 = NFC-e ACBrNFe1.Configuracoes.Geral.VersaoQRCode:=TpcnVersaoQrCode.veqr000; // (veqr000, veqr100, veqr200); end else begin // 65 = NFC-e ACBrNFe1.Configuracoes.Geral.VersaoQRCode:=TpcnVersaoQrCode.veqr200; // (veqr000, veqr100, veqr200); if UpperCase(aqyNFBusca.FieldByName('co_ambiente').AsString)='P' then begin // P=Producao ACBrNFe1.Configuracoes.Geral.IdCSC:=aqyEmp.FieldByName('ID_NF_CSC1').AsString; ACBrNFe1.Configuracoes.Geral.CSC:=aqyEmp.FieldByName('CO_NF_CSC1').AsString; end else begin // H=Homologacao //showmessage('homologacao!! id:' + aqyEmp.FieldByName('ID_NF_CSC1H').AsString + ' CSC:' + aqyEmp.FieldByName('CO_NF_CSC1H').AsString); ACBrNFe1.Configuracoes.Geral.IdCSC:=aqyEmp.FieldByName('ID_NF_CSC1H').AsString; ACBrNFe1.Configuracoes.Geral.CSC:=aqyEmp.FieldByName('CO_NF_CSC1H').AsString; end; end; // gera a nota fiscal ACBrNFe1.NotasFiscais.GerarNFe; 2 - Para imprimir: ACBrNFe1.NotasFiscais.Clear; // recupera xml de nota fiscal assinada e/ou autorizada (5=transmitida) ACBrNFe1.NotasFiscais.LoadFromString(sXml, False); ACBrNFe1.NotasFiscais.Imprimir; // ver opcao de imprimir direto sem visualizar