ALTERAR FONTE USANDO PRINT
Pessoal, Boa tarde!
Utilizo o PRINT conforme um pequeno exemplo abaixo, no qual funciona perfeitamente
Open [Ô]COM3[Ô] For Output As #1
Print #1, [Ô]------------------------------------------------[Ô]; Chr$(&HA);
Print #1, [Ô] P I Z Z A R I A[Ô]; Chr$(&HA);
Print #1, [Ô] D E L I V E R Y[Ô]; Chr$(&HA);
Print #1, [Ô]------------------------------------------------[Ô]; Chr$(&HA);
Close #1
minha duvida é:
Como eu poderia formatar a fonte usando o PRINT? tipo: Aumentar, Dimuir , Negrito.. etc...
Estou utilizando uma EPSON LX-300
Obrigado,
Emanuel
Utilizo o PRINT conforme um pequeno exemplo abaixo, no qual funciona perfeitamente
Open [Ô]COM3[Ô] For Output As #1
Print #1, [Ô]------------------------------------------------[Ô]; Chr$(&HA);
Print #1, [Ô] P I Z Z A R I A[Ô]; Chr$(&HA);
Print #1, [Ô] D E L I V E R Y[Ô]; Chr$(&HA);
Print #1, [Ô]------------------------------------------------[Ô]; Chr$(&HA);
Close #1
minha duvida é:
Como eu poderia formatar a fonte usando o PRINT? tipo: Aumentar, Dimuir , Negrito.. etc...
Estou utilizando uma EPSON LX-300
Obrigado,
Emanuel
emanuel no manual da impressora tem todos os comandos, chr(algumacoisa), é só pesquisar no manual, eu nao tenho o manual aqui,mas sei que no manual tem.
Só tem como se for pelo código da impressora matricial no caso Epson.
De uma olhada neste link http://www.macoratti.net/printer.htm
[]'s
Dá uma olhada aqui
http://caclipperwebsite.com/todos/node/impressoras#CE
Nesse tem vários tipos de fontes disponÃveis para várias impressoras ...
FICA COM DEUS ... FORTE ABRAÇO
http://caclipperwebsite.com/todos/node/impressoras#CE
Nesse tem vários tipos de fontes disponÃveis para várias impressoras ...
FICA COM DEUS ... FORTE ABRAÇO
Bom eu não testei mas olhando no manual e lendo alguns tópico conclui que:
no manual da EPSON os comandos são desciminados da seguinte maneira:
baseado nas informações acima, bastaria você informar o o código ASC de cada função
exemplo
para definir font Sans Serif
ESC k 1
ESC = CHR(69)
k = CHR(107)
1 = CHR(49)
ou seja
bom veja se funciona e poste caso positivo
no manual da EPSON os comandos são desciminados da seguinte maneira:
Citação:Overall printing style
ASCII Dec. Hex. Description
ESC x n 120 78 Select NLQ or Draft
n = 1: NLQ
0: Draft
ESC k n 107 6B Select NLQ Font
n = 0: Roman
1: Sans Serif
ESC ! n 33 21 Master Select
To find the value of n, add together
the numbers of the the typestyles you
want to combine from the list below:
n = 0: 10 cpi 16: Double-Strike
1: 12 cpi 32: Double-Width
4: Condensed 64: Italic
8: Emphasized 128: Underline
baseado nas informações acima, bastaria você informar o o código ASC de cada função
exemplo
para definir font Sans Serif
ESC k 1
ESC = CHR(69)
k = CHR(107)
1 = CHR(49)
ou seja
Print #1, Chr(69);Chr(107);Chr(49)
Print #1,[Ô]teste[Ô]
bom veja se funciona e poste caso positivo
Tópico encerrado , respostas não são mais permitidas