PrintFileRaw -> PDF Printer

Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.

Moderador: Moderadores

Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

PrintFileRaw -> PDF Printer

Mensagem por asimoes »

Olá Pessoal,

A minha contribuição de hoje é PrintFileRaw, equivalente a win_PrintFileRaw, só que pode gerar um pdf enviando a impressão a partir de um arquivo texto simples para uma impressora pdf, a sequencia escape não consegui sucesso, formfeed funcionou, o código tá disponível para quem quiser testar.

Código no anexo.
Anexos
WinPrintRaw.prg
(5.77 KiB) Baixado 136 vezes
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar do usuário
fladimir
Colaborador
Colaborador
Mensagens: 2445
Registrado em: 15 Nov 2006 20:21

PrintFileRaw -> PDF Printer

Mensagem por fladimir »

:-Y :-Y :-Y
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


Até 2017    Desktop Console [ Legado ] Harbour | MinGW | DBF | CDX | FastReport | MySQL


Novos Projetos:

   Desktop Visual           Windev Desktop
   Celular Android/iOS   Windev Mobile
   WEB                            Windev Web


Sejamos gratos a Deus.
Avatar do usuário
rubens
Colaborador
Colaborador
Mensagens: 1520
Registrado em: 16 Ago 2003 09:05
Localização: Nova Xavantina - MT

PrintFileRaw -> PDF Printer

Mensagem por rubens »

ASimoes

Como compila? o que precisa incluir?

salvei como teste.prg e tentei um hbmk2 teste
mas dá um monte de erros
hbmk2: Processing environment options: -comp=bcc
C:\Users\PROGRAMA\AppData\Local\Temp\hbmk_espg86.dir\teste.c:
Warning W8079 teste.prg 120: Mixing pointers to different 'char' types in function HB_FUN_PRINTFILERAW
Warning W8079 teste.prg 122: Mixing pointers to different 'char' types in function HB_FUN_PRINTFILERAW
Warning W8079 teste.prg 128: Mixing pointers to different 'char' types in function HB_FUN_PRINTFILERAW
Warning W8079 teste.prg 143: Mixing pointers to different 'char' types in function HB_FUN_PRINTFILERAW
Warning W8004 teste.prg 181: 'dwJob' is assigned a value that is never used in function HB_FUN_PRINTFILERAW
Warning W8004 teste.prg 181: 'dwCount' is assigned a value that is never used in function HB_FUN_PRINTFILERAW
Warning W8080 teste.prg 181: 'dwBytesWritten' is declared but never used in function HB_FUN_PRINTFILERAW
Warning W8080 teste.prg 181: 'cDocName' is declared but never used in function HB_FUN_PRINTFILERAW
Warning W8004 teste.prg 112: 'rVal' is assigned a value that is never used in function HB_FUN_PRINTFILERAW

hbmk2: Error: Referenced, missing, but unknown function(s):
WIN_PRINTERGETDEFAULT()
Obg...

Rubens
"Eu e minha casa servimos ao Senhor e você ???"
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

PrintFileRaw -> PDF Printer

Mensagem por asimoes »

Rubens,

Esse fonte foi feito para harbour 3.4 qual é a lib que você está usando?
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

PrintFileRaw -> PDF Printer

Mensagem por asimoes »

O pdf criado com a função PrintFileRaw

Para funcionar instale uma impressora pdf CutePdf Writer ou Pdf Creator
Anexos
h-PrintFileRaw.zip
Fontes com exemplo compilado com harbour 3.4 + Mingw
(592.6 KiB) Baixado 109 vezes
Test Print Job1.pdf
(12.81 KiB) Baixado 95 vezes
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Responder