Página 1 de 1
setfont no win32prn
Enviado: 07 Ago 2008 15:18
por tonyx
estou usando
setfont(´corier new´,10,10) // normal
setfont(´corier new´,7 , 14) // comprimido
imprimi 1 ate 80 no normal
imprimi 1 ate 132 no comprimido
lado esquerdo numro de linhas
estou achando as letras muito juntas
passa dos 60 linhas folha A4
voces tem DICAs
Re: setfont no win32prn
Enviado: 07 Ago 2008 15:39
por sygecom
De uma olhada no link abaixo e compile o exemplo que o Hasse postou ai tem o que vc procura:
viewtopic.php?t=6465
Código: Selecionar todos
oPrinter:SetFont('Courier New',12,{1,nFont}, 0, .F., .F.)
oPrinter:Textout(STR(oprinter:LineHeight() ) + " -altura da linha",.t.)
oPrinter:Textout(STR(oprinter:CharWidth() ) + " -largura da coluna",.T.)
oPrinter:TextOut(STR(oPrinter:GetCharWidth() ) + " -GetCharWidth",.T.)
oPrinter:TextOut(STR(oPrinter:GetCharHeight() ) + " -GetCharHeigth",.T.)
oPrinter:Textout(STR(oprinter:Prow() ) + " -Posição atual da " + "linha",.T.)
Re: setfont no win32prn
Enviado: 08 Ago 2008 08:28
por tonyx
no caso gostaria de saber
1- alem dos fontes "corier new, console " outra para A4 ??
2- caso de fixar altura entre linhas, margens - existe para win32prn
no exemplo ele so mostra sa vem fixo, e nao varia como o word
3 - testei estou usando agora (corier,10,11) // normal e (corie,6.5,18) // comprimir
4- adiciono o txt em dbf e lendo (mai facil controle de leitura)
5- estou usando [Compri_1], [Compri_2], [normal_1}, [normal_2], [Landscap] dentro txt
6- setchart(255) para acentos
----- as dicas do winprn32 sao boas mas atualmente estou em leitura simples do txt
Re: setfont no win32prn
Enviado: 31 Mar 2009 15:07
por asimoes
Amigos,
Estou precisando imprimir um relatório que tem 140 colunas, qual setfont devo colocar para esta impressão?
[]´s
Re: setfont no win32prn
Enviado: 02 Abr 2009 21:13
por Hasse
Caro Asimoes.
No teste passa dos 160 caracteres na largura do formulário A4. E pode conter ainda mais.
oPrinter:SetFont('Courier New',7,{1,20}, 0, .F., .F.)
Re: setfont no win32prn
Enviado: 03 Abr 2009 08:17
por Hasse
Caro Tonix.
Você pode adicionar qualquer fonte que esteja instalada no seu Windows.
A diferença é que a fonte Courier New tem pitch fixo, e a grande maioria das outras fontes tem pitch proporcional.
A altura da linha pode ser manipulada na Classe Win32prn(), mas não pode ser alterada num mesmo documento. Veja a linha contendo:
Código: Selecionar todos
::LineHeight := INT(::PixelsPerInchY / 6) // Default 6 lines per inch == # of pixels per line
No caso das margens, eu ainda não testei, mas creio que podem ser alteradas num mesmo documento. O Help do xHarbour nada menciona.