Impressão saindo estranha com caractéres especiais na Impressora bematech
18/04/2015
0
iRetorno = cupom.ConfiguraModeloImpressora(8);
iRetorno = cupom.IniciaPorta("COM3");
iRetorno = cupom.FormataTX( "Ç ,Ã,É\n", 2, 1, 2, 2, 1 );
iRetorno = cupom.FormataTX("IMPRESÃO\r\n", 2, 1, 2, 2, 1);
iRetorno = cupom.FormataTX("IMPRESÃO\r\n", 2, 1, 2, 2, 1);
iRetorno = cupom.FormataTX("IMPRESÃO\r\n", 2, 1, 2, 2, 1);
iRetorno=cupom.AcionaGuilhotina(1);
iRetorno = cupom.FechaPorta();
Valdeilton
Post mais votado
21/04/2015
Ronaldo Lanhellas
Mais Posts
22/04/2015
Valdeilton
22/04/2015
Ronaldo Lanhellas
22/04/2015
Ronaldo Lanhellas
22/04/2015
Valdeilton
Comando para habilita a Tabela ABICOMP: chr(27) + chr(116) + chr(1)
Após habilitar a tabela, é necessário que a sua aplicação, envie o caractere de acentuação para a impressora, ou seja, se apenas enviar “Coração”, o resultado ainda não seria acentuado.
Então deverá converter o caracter especial de acordo com a sua representação na tabela ASCII ex:
"Letra -A- com todos os acentos:" + chr(13) - Visual Basic
"-----------------------------------" + chr(13) - Visual Basic
chr(161) + " " + chr(162) + " " + chr(163) + " " + chr(164) + " " + chr(165) + chr(13) - Visual Basic
chr(193) + " " + chr(194) + " " + chr(195) + " " + chr(196) + " " + chr(197) + chr(13) - Visual Basic
---
"Letra -A- com todos os acentos:" + #13 - Delphi
"-----------------------------------" + #13 - Delphi
#161 + " " + #162 + " " + #163 + " " + #164 + " " + #165 + #13 - Delphi
#93 + " " + #194 + " " + #195 + " " + #196 + " " + #197 + #13 - Delphi
----------------------------------------------------------------------------------------------------------------------
"Letra -E- com todos os acentos:" + chr(13) - Visual Basic
"-----------------------------------" + chr(13) - Visual Basic
chr(167) + " " + chr(168) + " " + chr(169) + " " + chr(170) + chr(13) - Visual Basic
chr(199) + " " + chr(200) + " " + chr(201) + " " + chr(202) + chr(13) - Visual Basic
---
"Letra -E- com todos os acentos:" + #13 - Delphi
"-----------------------------------" + #13 - Delphi
#167 + " " + #168 + " " + #169 + " " + #170 + #13 - Delphi
#199 + " " + #200 + " " + #201 + " " + #202 + #13 - Delphi
----------------------------------------------------------------------------------------------------------------------
"Letra -I- com todos os acentos:" + chr(13) - Visual Basic
"-----------------------------------" + chr(13) - Visual Basic
chr(203) + " " + chr(204) + " " + chr(205) + " " + chr(206) + chr(13) - Visual Basic
---
"Letra -I- com todos os acentos:" + #13 - Delphi
"-----------------------------------" + #13 - Delphi
#203 + " " + #204 + " " + #205 + " " + #206 + #13 - Delphi
----------------------------------------------------------------------------------------------------------------------
"Letra -O- com todos os acentos:" + chr(13) - Visual Basic
"-----------------------------------" + chr(13) - Visual Basic
chr(176) + " " + chr(177) + " " + chr(178) + " " + chr(179) + " " + chr(180) + chr(13) - Visual Basic
chr(208) + " " + chr(209) + " " + chr(210) + " " + chr(211) + " " + chr(212) + chr(13) - Visual Basic
---
"Letra -O- com todos os acentos:" + #13 - Delphi
"-----------------------------------" + #13 - Delphi
#176 + " " + #177 + " " + #178 + " " + #179 + " " + #180 + #13 - Delphi
#208 + " " + #209 + " " + #210 + " " + #211 + " " + #212 + #13 - Delphi
----------------------------------------------------------------------------------------------------------------------
"Letra -U- com todos os acentos:" + chr(13) - Visual Basic
"-----------------------------------" + chr(13) - Visual Basic
chr(182) + " " + chr(183) + " " + chr(184) + " " + chr(185) + chr(13) - Visual Basic
chr(215) + " " + chr(216) + " " + chr(217) + " " + chr(13) - Visual Basic
---
"Letra -U- com todos os acentos:" + #13 - Delphi
"-----------------------------------" + #13 - Delphi
#182 + " " + #183 + " " + #184 + " " + #185 + #13 - Delphi
#215 + " " + #216 + " " + #217 + " " + #13 - Delphi
----------------------------------------------------------------------------------------------------------------------
"Letra -C- com cedilha:" + chr(13) - Visual Basic
"-----------------------------------" + chr(13) - Visual Basic
chr(166) + " " + chr(198) + chr(13) - Visual Basic
---
"Letra -C- com cedilha:" + #13 - Delphi
"-----------------------------------" + #13 - Delphi
#166 + " " + #198 + #13 - Delphi
----------------------------------------------------------------------------------------------------------------------
// Imprime a palavra CORAção
"Exemplo: CORA" + chr(166) + chr(164) + "O" + chr(13) - Visual Basic
"Exemplo: CORA" + #166 + #164 + "O" + #13 - Delphi
Clique aqui para fazer login e interagir na Comunidade :)