ActiveDelphi

Jugger_Guns

Olá, bom dia, gostaria de uma ajuda.
Estou criando este tópico pq procurei no forum, mas não encontrei nenhum nenhum com este problema que tenho, somente com problemas parecidos.
Aqui no meu serviço os usuários utilizam diversos sistemas, e estes geram seus relatorios no quick report. Quando necessitam somente imprimir, td bem, mas alguns querem salvar os arquivos, enviar por email, e também recebem diversos relatorios com a extensão qrp de outras pessoas, e não conseguem abrí-los. Decidi então desenvolver um pequeno aplicativo que abrisse o arquivo qrp para facilitar a vida dos usuários.
Para abrir o arquivo qrp, foi tranquilo fazer o comando

QuickRep1.Prepare;
QuickRep1.QRPrinter.Load('c:\teste.qrp');
QuickRep1.QRPrinter.Preview;

Este abre o relatorio normalmente, visualizo, imprime, normal. Estou querendo agora a partir do arquivo aberto convertê-lo para pdf. Aqui encontrei o problema: O sistema não converte para pdf a partir de um arquivo qrp aberto. Eu tenho um outro sistema que desenvolvi, que gera um arquivo (novo relatorio) em pdf normalmente, mas de um relatorio gerado pelo proprio sistema, com o comando:

Quickrep1.ExportToFilter(TQRPDFDocumentFilter.Create('C:\teste.pdf' ));

Mas, a partir de um arquivo qrp aberto, ele gera o arquivo em pdf, porem o arquivo está vazio, não contém o conteúdo do arquivo qrp q eu abri.

Tentei tb colocar o componente QRPDFFilter: TQRPDFFilter, presente no Quick Report Professional 4 q eu instalei, no qual este possibilita após visualizar o relatorio no quick report salvar uma copia em pdf. E quando clico pra salvar, ele simplesmente não faz nada... não gera o arquivo nem nada. Novamente digo que quando o relatorio é gerado pelo proprio sistema, ele salva um arquivo pdf normalmente. Somente quando abro um arquivo qrp que ele nao faz nada.

Então, aqui venho pedir ajuda, para alguem que tenha uma idéia do pq q isso acontece, ou uma solução. Ah, eu sei que uma possibilidade é instalar uma impressora virtual para converter pra pdf, como o CutePDF, doPDF, entre outros, mas estou tentando não fazer assim, pq essa é uma solução alternativa, e eu não teria como instalar esta impressora em todos os usuarios. Não a descartei, se não houver maneira, mas procuro uma solução no proprio programa que estou desenvolvendo.

Se alguém souber de algo que possa ajudar, tentei até a possibilidade de tentar abrir o arquivo qrp no Rave Report, mas não obtive êxito nesta tentativa, se alguem souber como fazer, pode ser que isso resolva. Ou de algum programa ja desenvolvido que faça isso, pq até agora so encontrei alguns que abrem, mas nao salvam em pdf.

Uso o Delphi 7 com o Quick Report Professional 4.

Desde já agradeço.

Johnny

alexbandeira · Enviada: Qui Jan 07, 2010 9:15 am Assunto:

Cara:
Aqui na cessão de download componentes vc encontrará:

Convert to PDF
Descrição: Exemplo de como utilizar o PDFCreator via Programação Delphi para conversão de Documentos para PDF. Muito útil e dificil de achar na internet, na verdade, adaptei exemplos, que vem com o próprio PDFCreator.

end: "modules.php?op=modload&name=Downloads&file=index&req=getit&lid=648"

vc tbm ainda pode fazer uma pesquisa sobre "pdf". vai encontrar muita coisa.

Espero ter ajudado.

thomazs · Enviada: Qui Jan 07, 2010 1:06 pm Assunto:

Se você está usando o QR Pro, insira um TQRPDFFilter no mesmo form do TQuickRep. Ele vai ter na opção Salvar, na escolha do Tipo de Arquivo, a Opção PDF.
_________________
Suporte e Consultoria em Desenvolvimento de Sistemas
Bacharel em Sistemas de Informação
Especialista em Bancos de Dados
Desenvolvimento: Clipper, Delphi, PHP, Python/Django

Jugger_Guns · Enviada: Qui Jan 07, 2010 2:24 pm Assunto:

thomazs, essa opção eu fiz. Adicionei o componente TQRPDFFilter no meu form. E como eu falei, ela funciona somente quando eu gero o relatorio direto do sistema. Ele salva perfeitamente. Quando eu vou "abrir um arquivo qrp", ele aparece a opção pra salvar em pdf, mas não faz nada, nao salva nem cria nenhum arquivo, isso q eu estou achando estranho.

Estou testando agora a dica do alexbandeira

Jugger_Guns · Enviada: Ter Jan 12, 2010 11:14 am Assunto:

vou dar um up neste tópico para ver se mais alguem tem alguma idéia para ajudar, pois ainda não consegui resultado...

oneshotbr · Enviada: Ter Jan 12, 2010 12:33 pm Assunto:

Qual versão do QuickReport você usa ?

oneshotbr · Enviada: Ter Jan 12, 2010 12:55 pm Assunto:

Utilizo Delphi 2007 com o quickReport 5.0 e ele realmente da esse erro mesmo não conseguindo salvar depois de abrir o arquivo.

rafa.spimenta · Enviada: Seg Jun 06, 2011 11:28 pm Assunto:

vo dar um up pq tb to passando por isso, nao esta gerando arquivo 'txt'.
_________________
"Você pode ter todo o dinheiro do mundo, mas há algo que jamais poderá comprar: um dinossauro!"

Meu blog:
http://delphiexpresso.blogspot.com/

oneshotbr · Enviada: Ter Jun 07, 2011 8:30 am Assunto:

rafa.spimenta · Enviada: Ter Jun 07, 2011 8:49 am Assunto:

Estou usando a versão que vem no Delphi7, também tentei com a versao do QR para o Delphi XE. Qualquer um dos dois para mim serve, só não vou saber exatamente qual o nro da versão agora porque estou no trabalho.

Eu preciso ler um arquivo QRP e Gerar apartir deste um arquivo TXT.
_________________
"Você pode ter todo o dinheiro do mundo, mas há algo que jamais poderá comprar: um dinossauro!"

Meu blog:
http://delphiexpresso.blogspot.com/