|
|
Postada em 31/07/2005 10:15 hs
Tenho uma impressora LX 300+ , estou usuando o metodo PRINT# para eviar o texto direto para a impressora, só que em determinado momento preciso aumentar um pouco o tamanho da fonte.....sei que para Negrito é " Print #1, chr(27)&chr(69)" e o tamanho da fonte alguém sabe? Desde já agradeço pela atenção.
|
|
|
|
|
|
kerplunk
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 01/08/2005 08:34 hs
Você não pode aumentar o tamanho da fonte em impressão matricial. |
|
|
|
|
|
Postada em 01/08/2005 09:27 hs
ai ai ai segue os codigos para aumentar a fonte Private Sub Form_Load()
'COMPRIME PARA 8LPP / CONFIGURA PARA EXPANDIR FONTE
'Chr(27) & "0" (COMPRIME PARA 1/8) - Chr(27) & "2" (COMPRIME PARA 1/6)
'Chr(27) & "G" (SELECT DOUBLE STRIKE) - Chr(27) & "H" (CANCEL DOUBLE STRIKE)
'Chr(27) & "E" (SELECT EMPHATIZED MODE) - Chr(27) & "F" (CANCEL EMPHATIZED MODE)
'Chr(15) (CONDENSA) - Chr(18) (NORMAL) Open "LPT1:" For Output As #1
Print #1, Chr(27) & "0" + Chr(27) & "G" + Chr(27) & "E" + "TESTE" + Chr(27) & "H" + Chr(27) & "F"
Print #1, Chr(15); Spc(20 + vcol); "TESTE2" + Chr(18) + Chr(27) + "G"
Print #1, "TESTE3" + Chr(27) & "H" + Chr(15)
Print #1, Chr(27) + "2" + Chr(18)
Close #1
End Sub
Roberto
roberto@vbweb.com.br
|
|
|
|
|
|
Postada em 02/08/2005 07:15 hs
Valeu Roberto.......Como faço para encerar o tópico?
|
|
|
|
Roßerto
|
SAO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/08/2005 08:34 hs
Josimar, no seu primeiro post tem um icone de um cadeado, é só clicar
Roberto
roberto@vbweb.com.br
|
|
|
|
