Página 1 de 1
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 31 Ago 2011 13:18
por juniorcamilo
Amigos minha aplicacao ja impreme perfeitamente nas impressoras nao fiscais da BEMATECH , ate chegar o novo modelo MP4200TH via USB, ela nao executa os comandos para NEGRITO, CONDENSADO, EXPANDIDO e etc. Alguem pode me ajudar?
Código: Selecionar todos
x_exp_a := chr(14)
x_exp_d := chr(20)
x_cond_d := chr(27) + chr(80) + chr(18)
x_cond_a1 := chr(27) + chr(64)
x_cond_a2 := chr(27) + chr(77)
x_cond_a3 := chr(27) + chr(80) + chr(15)
x_cond_a4 := chr(27) + chr(80) + chr(15)
x_cond_a5 := chr(27) + chr(77) + chr(15) && 156 char
x_neg_a := chr(27) + "E"
x_neg_d := chr(27) + "F"
x_esp_a := chr(27) + "0"
x_esp_d := chr(27) + "2"
x_Ital_a := chr(27) + "4"
x_Ital_d := chr(27) + "5"
x_Supl_a := chr(27) + chr(45) + "1"
x_Supl_d := chr(27) + chr(45) + "0"
x_CondA6 := chr(27) + chr(83) + chr(49) && "1" Super Pequeno
x_CondA6_D := chr(27) + chr(84)
x_1_72 := chr(27) + chr(49)
x_1_8 := chr(27) + chr(48)
x_1_6 := chr(27) + chr(50)
x_Retorna := chr(27) + chr(10)
Para imprimir na USB da impressora, eu entro em COnf. de Impressoras, PORTAS e Ativo o POOL de Impressao selecionando a USB e LPT1..
desde ja muito obrigado.
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 02 Set 2011 08:45
por marca
Ola pessoal bom dia
Sou novato aqui e espero que minha mensagem esteja dentro dos padroes adotados p. vcs aqui
É meu amigo passei p. este mesmo problema e foi complicado resolver pos o suporte nao ajudou muito neste caso, mas como nos programadores somos meio teimosos pegue ai a solução
É o seguinte
existem duas maneiras de vc resolver isso
1° Vc instala o driver virtual delas BemaUni_setup_v2.0.6.exe e a partir deste driver ela funciona normalmente caso vc queira imprimir direto na com da impressora
sem ele vc nao conseguira fazer ela reconhecer os caracteres
2° para funcionar com o driver normal dela digo BemaSetup_MP4K_v4.1.0.exe q. usa a usb vc tem q. usar os seguintes comandos
Impressora Bematech Mp 4200
Código: Selecionar todos
// Funcionando Mp4200 SEM o driver virtual instalado e imprimindo NA IMPRESSORA CRIADA NA USB
cManda := ""
cManda += CHR(27) + "!" + CHR(00) + "INICIAR NORMAL " + CRLF // Inicializa a impressora
cManda += CHR(27) + "!" + CHR(01) + "INICIAR COMPACTADO " + CRLF // Inicializa e finaliza compactado
cManda += CHR(27) + "!" + Chr(09) + "INICIAR COMPACTADO COM NEGRITO" + CRLF // Inicializa e finaliza compactado
cManda += CHR(27) + "!" + CHR(08) + "ATIVA NEGRITO " + CRLF // Ativa e desativa negrito
cManda += CHR(27) + "!" + CHR(00) + "INICIAR NORMAL " + CRLF // Inicializa a impressora
cManda += CHR(27) + "!" + Chr(16) + "ATIVA DUPLA LINHHA" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "!" + Chr(128) + "ATIVA SUBLINHADO" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "!" + Chr(32) + "ATIVA EXPANDIDO" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "!" + CHR(01) + Replicate("-",54) + CRLF
FOR I = 1 TO 8
cManda+= " " + CRLF
NEXT
cManda += CHR(27) + "m" + CRLF // Corte parcial do papel
cLisErr := "TESTE" + AllTrim(Str(Day(Date()))) + AllTrim(Str(Month(Date()))) + ".LOG"
MemoWrit(cLisErr,cManda)
cPorta := "MP-4200 TH"
Set Printer To ( cPorta ) // Somente para setar a impressora
PrintFileRaw( cPorta ,cLisErr)
Impressora Bematech Mp 4200
Código: Selecionar todos
// Funcionando com mp4200 mas com o driver virtual instalado e imprimindo como se fosse em com BemaUni_setup_v2.0.6.exe
cManda := ""
cManda += CHR(27)+ Chr(116) + Chr(08) + CRLF // Inicializa a impressora
cManda += "INICIADO MODO DE ACEITAR CARACTERES " + CRLF // Inicializa a impressora
cManda += CHR(27) + CHR(15) + "INICIAR COMPACTADO COM ESC E 15 " + CRLF // Inicializa e finaliza compactado
cManda += CHR(27) + CHR(18) + "INICIAR NORMAL " + CRLF // Inicializa a impressora
cManda += CHR(27) + "E" + "ATIVA NEGRITO " + CHR(27) + "F" + CRLF // Ativa e desativa negrito
cManda += CHR(27) + Chr(14) + "ATIVA EXPANDIDO " + CHR(27) + Chr(18) + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "-1" + "ATIVA SUBLINHADO " + CHR(27) + "-0" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "4" + "ATIVA ITALICO " + CHR(27) + "5" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "S0" + "ATIVA sobrescritos " + CHR(27) + "T" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "S1" + "ATIVA subrescritos" + CHR(27) + "T" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "N1" + "ATIVA baixa densidade" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "N2" + "ATIVA densidade normal" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "N3" + "ATIVA alta densidade" + CRLF // Inicializa e finaliza o negrito
cManda += CHR(27) + "N4" + "ATIVA altíssima densidade" + CRLF // Inicializa e finaliza o negrito
cManda += Replicate("-",48)+CRLF
FOR I = 1 TO 8
cManda+= " " + CRLF
NEXT
oPub:wPorta := "COM2"
cArq := fCreate(oPub:wPorta)
fWrite(cArq,cManda)
fClose(cArq)
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 02 Set 2011 15:23
por juniorcamilo
vou testa muido obrigado
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 08 Set 2011 18:46
por juniorcamilo
So pra constar ... deu certo a dica do amigo 'marca'
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 12 Set 2011 09:19
por andreitc
Bom dia. Estou passando pelos mesmos problemas. Poderiam me informar onde baixo o arquivo BemaUni_setup_v2.0.6.exe.
Aguardo resposta.
Muito Obrigado.
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 12 Set 2011 10:33
por Clipper
Prezado Colega
Pegue no link abaixo :
http://www.bematech.com.br/equipamento- ... ?#conteudo
Até logo.
Marcelo
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 11 Out 2011 13:29
por marbio
Boa Tarde,
voce pode me ajudar, estou perdidinho em ECF, tenho um programa para farmacia popular, agora o governo quer
que o cupom seja vinculado no ECF o meu cliente tem uma impressora Bematech PM 2100, o que eu preciso e so acessar a impressora e mandar o cupom da goverto.
Grato
Marbio
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 17 Out 2011 11:47
por pena
Uma pequena duvida amigo, vc disse que imprime em usb com clipper? como faz isso?
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 17 Out 2011 16:34
por marbio
Boa Tarde
Eu nao disse que imprimir em USB, mas tem varios programa para fazer esta impressao
em USB.
voce monta um relatorio em txt, chama outro programa e pronto.
A minha duvida e referente a impressao direta na impressora Bematech pela serial.
se eu posso usar o ECF para imprimir um relatorio da farmacia popular.
Grato.
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 28 Nov 2012 21:37
por clipsis
Olá, boa noite a todos!!
Tentei com havia sugerido o companheiro Marca
1° Vc instala o driver virtual delas BemaUni_setup_v2.0.6.exe e a partir deste driver ela funciona normalmente caso vc queira imprimir direto na com da impressora
sem ele vc nao conseguira fazer ela reconhecer os caracteres
2° para funcionar com o driver normal dela digo BemaSetup_MP4K_v4.1.0.exe q. usa a usb vc tem q. usar os seguintes comandos
Impressora Bematech Mp 4200
Deu certo (+/-) com a 2°
Os comando CHR(27)+"!", funcionaram.
Existe algum comando para alterar a font da impressora. Está imprimindo com uma fonte maior e não cabe todos os caracteres na linha, causando a quebra.
O interessante é que o a impressão da configuração da impressora é feita em uma fonte menor. Mas quando mando a impressão pelo programa a font fica diferente (altera o formato dos caracteres) e fica maior
Alguma fonte como a Courier New, talvez resolvesse. (Parece que a configuração da impressora é feita com Courier New)
Abraços
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 14 Jul 2016 07:27
por asimoes
Olá pessoal,
Voltando ao assunto das bematech´s, com relação a impressão de uma logo, bitmap qual seria a sequência escape, alguém sabe?
Eu consigo a impressão usando a dll mp2032.dll, mas não queria ficar mais quebrando a cabeça toda vez que a bematech lança um modelo novo e ter que fazer adaptações com condicionais. Este método imprimindo para impressora usb direto usando o spooler do windows é perfeito, em tese serve para qq impressora,
2500, 4000 e 4200
BEMATECH MP 4200TH nao executa charcters de comando
Enviado: 15 Jul 2016 12:11
por asimoes
Com relação a acentuação, existe algum exemplo?