Página 1 de 1

PDFCLass - Método PrnToPDF

Enviado: 27 Jan 2024 16:57
por alaminojunior
Boa tarde !

Procurei pelo fórum e não encontrei.
No GitHub percebi que o Quintas até mudou o nome do método para LstToPDF

Alguém teria um exemplo prático de uso deste método ?

Tenho alguns relatórios para matricial (coisa antiga mesmo), e se conseguisse fazer funcionar, me economizaria bastante tempo.

Pelo que entendi, chama-se este método informando o path do arquivo TXT, e ele devolve um PDF

Código: Selecionar todos

oPDF:= PDFClass():New()
oPDF:nType := 1
oPDF:cFileName := cArq
oPDF:CfontName:= "Courier"
oPDF:nFontSize:= 9
oPDF:Begin()
oPDF:PrnToPdf(oArq) // arquivo em anexo
oPDF:End()
Ele gera o PDF, porém apenas a primeira página, não quebrando a página, e nesta segunda página imprime "sem conteudo"

PDFCLass - Método PrnToPDF

Enviado: 28 Jan 2024 03:23
por JoséQuintas
A mensagem conteúdo vazio é quando o contador de páginas fica no zero.
Preciso atualizar então.
Lembrando: no PDF é obrigatório criar uma nova página a cada página, o contador de páginas fica lá.

PDFCLass - Método PrnToPDF

Enviado: 28 Jan 2024 12:33
por JoséQuintas
pdfclass.png
Adicione essa linha.

Nota:
A PDFClass que uso é mais direcionada ao Windows, a que está no github é mais universal.
Na minha já fiz a correção, falta na da internet.

PDFCLass - Método PrnToPDF

Enviado: 28 Jan 2024 17:42
por alaminojunior
Adicione essa linha.
Adicionei.
Não cria mais a página final escrito "SEM CONTEUDO", mas não quebrou a página.
Teria outros itens para continuar imprimindo outras páginas, mas não quebrou.

Notei que o código no GitHub no método LstToPDF está diferente do mostrado por você na imagem da resposta anterior.

PDFCLass - Método PrnToPDF

Enviado: 28 Jan 2024 17:50
por alaminojunior
Lembrando: no PDF é obrigatório criar uma nova página a cada página, o contador de páginas fica lá.
Perdão, não tinha notado esta linha.
Achei que o método por pegar o arquivo txt por parâmetro, já cuidasse de tudo.

PDFCLass - Método PrnToPDF

Enviado: 28 Jan 2024 17:53
por JoséQuintas
A quebra de página no TXT é feita pelo Chr(12), normalmente tem isso quando se faz EJECT.
Veja se o txt tem a quebra de página, o Chr(12)
Na função é só aquela soma de 1 mesmo.
Acho que implementei a contagem de página depois, e nunca mais usei essa função, por isso ficou sem somar página.

Até que as pdfclass estão iguais, mas o nome do método é diferente.

https://github.com/JoseQuintas/zepack/t ... r/pdfclass

A minha tem, por exemplo, preview em GTWVG, o que não serve pra todo mundo.

PDFCLass - Método PrnToPDF

Enviado: 29 Jan 2024 10:16
por alaminojunior
Certinho Quintas !
Funcionando !

Muito obrigado pela valiosa contribuição.