PC Toledo

Olá...

Uma das grandes vantagens quando se migra do clipper para o harbour é justamente poder imprimir em qualquer impressora instalada no windows. Mas não é bem assim... Sempre tem que mexer em alguma coisa ou criar relatórios novos. O meio mais fácil é direcionar o relatório para um arquivo e enviar esse arquivo para a impressora através do Win_PrintFileRaw(). Só que o só vai conseguir imprimir em impressoras RAW ficando de fora as gráficas, normalmente as LaserJet mais novas, principalmente da Hp. Daí não tem jeito é recriar os relatórios novamente. Daí o inconveniente de um relatório para matricial e outro para a laser. Aqui no Fórum já foi postados exemplos que na época eu não consegui compilar. Através de um exemplo do Toledo com HWGui foi possível compilar as funções em anexo e gerar no mesmo relatório tanto para Matricial como para USB.. Não se importa se RAW ou Gráfica. Usei a HaruPdf e para visualizar os pdf o Sumatra, que fica livre, é só para visualizar mesmo. No exemplo é criado um relatório simples com uso de Expandido, negrito e condensado. Para quem está migrando agora talvez ajude.

As libs necessárias para compilação estão mencionadas no programa. Rubens

Obrigado Rubens

:-Y X:)

Meus caros,

Usei esse modelo do Rubens pra gerar pdf a partir do txt.

Tudo certo com um problema, não mostra os caracteres acentuados.

Já alterei os fontes para UTF-8 e nada.

já tentei
REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
HB_SetCodePage( "PT850" )
HB_LANGSELECT("PT")

também já tentei
REQUEST HB_CODEPAGE_UTF8EX
hb_cdpSelect( "UTF8EX" )

Isso no fonte principal

O relatório em pdf continua eliminando os caracteres acentuados ou substituindo por outros.

Se alguem puder me ajudar. . .

Amiguinhos,

lucasburitis
O arquivo .TXT está sendo salvo em UTF-8?

Boa noite Rochinha,

Tanto os fontes prg quanto o txt gerado é ANSI.

Hoje consegui resolver. Na função TxtToPdf()

Alterei a variável
font := HPDF_GetFont( pdf, "Courier", NIL ) para font := HPDF_GetFont( pdf, "Corbel", "CP1252" )

Deu certinho, acentuação saindo ok.

Grato pelo atenção.

Bom dia...

Ótimo .... parabéns...

Para isso que server o Fórum... tenta isso, tenta aquilo até que dá certo... não 'Olha no manual tal' que você encontra... O tempo que o cara indicando o manual, basta dar um sugestão que quem tá precisando vai lá tenta, tenta de novo e se não der certo tenta de novo.. não consegue volta aqui com cara cachorro que caiu da mudança e fala 'não deu certo, alguma outra sugestão ?'...
E eu também não sabia... agora sei como fazer...

Rubens

alquem me indica como faço para imprimir direto para impressora sem a necessidade de abrir o gerenciador de impressao. é para impressao de fita de comprovante de venda em uma impressora térmica, onde o relatório tem que ser gerardo de forma rápida, sem fazer o usuário clicar várias opções ou pré visualizar o relatório, antes de enviar para impressora. desde já agradeço a atençao de todos que nos ajudam em momentos de difuculdades.

Usando a PDFCLASS do Quintas os PDF viram moleza , aí você imprime onde quiser

Ola!
Não esquecer que raw é o texto puro ascii.
Impressoras matriciais usam como padrão é muito rápido a impressão. LX350 para formulários continuo de até 4 vias.
Imprimir PDF/DOC(Word) nessas impressoras, embora aceite é lento.

Saudações,
Itamar M. Lins Jr.

amigos obrigado pelas dicas, mas não é ainda o que necessito, vejam só:
inicio o relatório com:

SELECT PRINTER DIALOG PREVIEW
START PRINTDOC NAME 'Gerenciador de Impressão '
START PRINTPAGE
...
...
...

FINALIZO COM:

END PRINTPAGE ; END PRINTDOC

*****
ATÉ AI TUDO CERTO, a questão é como faço, para que o relatório vá direto para impressora sem tem q abrir a janelas com opões de impressão. ?

Ola!
Esses comandos não são do Harbour.

Saudações,
Itamar M. Lins Jr.

miniprint

Ola!
O que é isso miniprint ?
Vc usa qual lib grafica ? Minigui ?

Saudações,
Itamar M. Lins Jr.

Ola!
Já vi aqui, é da Minigui.
O que diz o manual desses comandos ?

Já viu a sintaxe deles ?

Saudações,
Itamar M. Lins Jr.