Funciona normalmente nas duas máquinas que contém o ACBr e contém o Fortes Report, que é o Report que estamos utilizando para imprimir a NFSe, segue abaixo o código utilizado para a geração:
var
vAux : String;
sNomeArq : string;
begin
if not(InputQuery('Gerar RPS', 'Numero do RPS', vAux))
then exit;
ACBrNFSe1.NotasFiscais.Clear;
AlimentaComponente(vAux);
ACBrNFSe1.NotasFiscais.Items[0].SaveToFile;
vAux := '';
(InputQuery('Tipo Impressão', 'Tipo: ', vAux));
if vAux = 'PDF' then
ACBrNFSe1.NotasFiscais.ImprimirPDF;
if vAux = 'Ver' then
ACBrNFSe1.NotasFiscais.Imprimir;
if vAux = 'Outro' then
ACBrNFSe1.DANFSe.ImprimirDANFSePDF(nil);
ShowMessage('Arquivo gerado em: '+ACBrNFSe1.NotasFiscais.Items[0].NomeArq);
MemoDados.Lines.Add('Arquivo gerado em: '+ACBrNFSe1.NotasFiscais.Items[0].NomeArq);
MemoResp.Lines.LoadFromFile(ACBrNFSe1.NotasFiscais.Items[0].NomeArq);
LoadXML(MemoResp, WBResposta);
PageControl2.ActivePageIndex := 1;
end;
Não é nada de mais, é apenas do proprio exemplo do ACBr, nenhuma das opções indicadas consegue imprimir o PDF em outras máquinas que não sejam as que contém o Acbr instalado, segue abaixo a mensagem:
[Window Title]
Acbrnfse_proj
[Content]
RLNFSe: Erro durante a preparação do relatório
EAccessViolation(Access violation at address 00A52723 in module 'ACBrNFSe_Proj.exe'. Read of address 00000000)
[OK]
[10:56:34] Tom: [Window Title]
Acbrnfse_proj
[Content]
RLNFSe: Erro durante a preparação do relatório
EAccessViolation(Access violation at address 00A52723 in module 'ACBrNFSe_Proj.exe'. Read of address 00000000)
[OK]
Obrigado, aguardo retorno.