Ms do Programador
APROVEITAR OFERTA

Frum Imprimir codigos de barras na TLP 2844 (Zebra) via USB #385156

30/08/2010

0

Delphi

Boa Tarde Pessoal,

Estou precisando saber como fao pra imprimir codigos de barras pela a impressora Zebra TLP 2844 pela porta USB,alguem poderia me ajudar ???
Robson Morais

Robson Morais

Responder

Posts

30/08/2010

Dari Junior

Segue o link do exemplo

https://www.devmedia.com.br/post-9510-Integrar-impressora-Zebra-TLP-2844-Parte-1.html
Responder

Gostei + 0

30/08/2010

Robson Morais

Sim, eu peguei esse tutorial, mas nao ensina como imprimir na porta USB!

preciso saber como posso imprimir na porta USB
Responder

Gostei + 0

04/09/2010

Robson Morais

Marcio, consegui fazer imprimir, mas j tem 4 dias que estou quebrando a cabea e nao consigo....

peo ajuda de todos do forum....

pois sou leigo em ingles e todos os manuais so em ingles.....


pois no estou conseguindo acertar os campos, no sei identificar os cdigos.

fiz igual voce explicou no seu artigo https://www.devmedia.com.br/post-9510-Integrar-impressora-Zebra-TLP-2844-Parte-1.html, mas quando eu edito o arquivo ele fica dessa maneira abaixo, mudei o GW por A, mas nada e eu fiz no programa da Zebra e imprime certo. Que dificuldade fazer imprimir na impressora termica .


I8,A,001


Q128,024
q831
rN
S1
D4
ZT
JF
OC1,D
R54,0
f100
N
GW52,94,21,18,
GW162,71,8,15,}}yo
GW282,93,21,18,?c
GW44,68,11,28,??
GW392,70,8,16,}}yo
GW624,71,8,15,}}yo
GW274,67,11,28,?
GW520,93,20,18,>c>c>c>c?wwwwww
GW505,67,11,28,?
B221,69,2,1,2,6,30,N,"1223344"
B451,68,2,1,2,6,30,N,"1223344"
B683,68,2,1,2,6,30,N,"1223344"
P1



ajuda por favore !!!!!
Responder

Gostei + 0

05/09/2010

Robson Morais

Bom consegui j resolver boa parte....


Joguei a consigurao da impressora em um DBgrid para quebrar as linhas e ficar bem legal e coloquei as informaes dentro de uma tabela temporria.
Ficou assim.........


procedure TFrmConfigEtiquetas.SpbImpClick(Sender: TObject);
Var
  Comando : TStringList;
  F       : TextFile;
begin

  TblEtiq.First;

  while not TblEtiq.Eof do
    begin

      Comando.Add(TblEtiqComando.AsString);

      TblEtiq.Next;
    end;  

  // gera arquivo texto com o contedo que ser enviado para a impressora
  Comando.SaveToFile('c:\IzaLoja\IzaSis\etiqueta.txt');

   // criar um arquivo .bat para enviar o arquivo texto gerado para a impressora atraves da porta LPT1
   // usando o comando type do DOS
   if not FileExists('C:\IzaLoja\IzaSis\printlbl.bat') then
   begin
      AssignFile(F, 'C:\IzaLoja\IzaSis\printlbl.bat');
      try
          Rewrite(F);
          Writeln(F, 'Type C:\IzaLoja\IzaSis\etiqueta.txt > LPT1');
       finally
          CloseFile(F);
       end
    end;
  
   ShellExecute(0, 'Open', PChar('C:\IzaLoja\IzaSis\printlbl.bat'), nil, nil, Ord(SW_HIDE));


end;



Dessa maneira eu estou jogando os codigos da Tabela para um txt e mandando por um arquivo bat para a porta LPT1, mas como meu objetivo era para a porta USB eu achei um programinha chamado DOSPRINT na internet que emula a porta LPT1 para USB, bem simples de usar, ai sucesso a impresso saiu corretamente.

N
Q001,8
F2
D10
ZT
A675,115,2,1,1,1,N,"CINTO TRANCADO"
A675,85,2,1,1,1,N,"00001"
A582,95,2,3,1,1,N,"R$14,55"
B490,35,0,2,2,5,30,N,"00001"
A447,115,2,1,1,1,N,"CINTO TRANCADO"
A354,95,2,3,1,1,N,"R$14,55"
A447,85,2,1,1,1,N,"888899970"
B265,35,0,2,2,5,30,N,"888899970"
A217,115,2,1,1,1,N,"CINTO TRANCADO"
A124,95,2,3,1,1,N,"R$14,55"
A217,85,2,1,1,1,N,"888899970"
B35,35,0,2,2,5,30,N,"888899970"
P001



Ai a dor de Cabea foi entender os codigos, (entendi um pouco) e tentei tentei e tentei ai consegui configurar a etiqueta certinho, os codigos esto ai embaixo, [b]mas eis o problema[/b], lembra que falei que entendi um pouco os codigos ?

Ento....vamos l.

[u][b]minha etiqueta de 3 colunas, agora se eu mando imprimir 9 etiquetas, automaticamente muda o campo[/b][/u] [b]P001[/b] da etiqueta para [b]P003[/b], [u][b]3 linhas de 3 colunas = 9 etiquetas, mas ai nao sai certo na etiqueta, no d o espao certo de cada linha para sair na posio certa, sei que isso nos codigos acima que est ai, olhei no manual, traduzi bastande coisa mas no achei e estou desesperado!!!!! :(

algum pode me ajudar nisso ????[/b][/u]
 
Responder

Gostei + 0

07/09/2010

Robson Morais

Jhonas estava me esquecendo de comentar sobre esse projeto, pois estou com essa Zebra aqui, mas ela utiliza a linguagem da ELTRON, ( EPL ) e nao ( ZPL ), esse codigo que tem eu olhei e at tentei mas nao deu certo, ai pesquisei na net e achei bastante coisa, mas nada explicando direito os codigos, olhei mais o manual e consegui me virar, abaixo vou explicar um pouco tbem para quem precisar:




N
Q104,18
F2
D10
ZT
A124,95,2,3,1,1,N,"R$14,55"
P001







N            > Limpa imagem da memria

Q104       > 104 significa 104 dots, 1 mm = 8 Dots a altura da etiqueta 104 Dots = 13 mm (1,3 cm)    , 18 dots espao entre etiquetas  
F2           > No achei
D10         > Densidade da impresso
ZT           > Direo da Impressao
A124       > Coluna
,95          > Linha
,2            > Rotao
,3            > Tipo de Fonte
,1            > Multiplicador de Altura dos caracteres
,1            > Multiplicador de Largura dos caracteres
,N            > Limpa imagem da memria
,"R$14,55" > Texto a ser impresso
P001        > Total de impressao na etiqueta




consegui obter os dados de configurao da etiqueta ligando a impressora e apertando o boto sai os codigos de configurao lendo os modelos da etiquetas.

Fiz tudo e :D  consegui.....ufa.....impreimei perfeitamente, mas como alegria dura pouco...mandei imprimir 30 etiquetas e imprime 15 etiquetas (5 linhas) ai pula uma linha de etiqueta ai imprime mais 6 etiquetas e pula uma linha.


estou na reta final, acabei com o ribow e com as etiquetas o cliente t furioso e eu feliz por ter conseguido bastante coisa, mas mais uma vez peo ajuda, o porque t pulando assim ?????



Responder

Gostei + 0

28/09/2012

Douglas Braz

cara para vc usar essa impresora na porta usb vc vai na impresora instalada e comprtilha ela, em nome de compartilhamento vc digita teste. ok, agora vc vai no pronpt de comando ou cmd e digita
"net use lpt1: \\ o nome do pc\nome da impresora(nesse caso teste)", detalhe no esquea de colocar espao entre os dois pontos e a barra envertida. depois va no bloco de notas e copie e cole os codigos do tutorial e salve em qualquer diretorio, depois va no propt de comando e va p o diretorio onde vc salvo o arquivo e digite
"type "nome do arquivo".txt>lpt1",,, feito isso saira na impresora zebra tpl 2844 o que estava no arquivo testo...



espero ter ajudado
Responder

Gostei + 0

02/12/2015

Sidney Abreu

Amigos eu tb estou tentando, mas ela imprime varias etiquetas ou seja, linhas em branco.

Cdigo utilizado
N
D10
S3
B50,50,0,E30,2,3,50,N,"12345679"
P1
Responder

Gostei + 0

02/12/2015

Robson Morais

assim no tem erro:

#Cdigo
1
2
3
4
5
6
7
	
N
Q104,18
F2
D10
ZT
A124,95,2,3,1,1,N,"R,55"
P001





Citao:



N            > Limpa imagem da memria

Q104       > 104 significa 104 dots, 1 mm = 8 Dots  a altura da etiqueta 104 Dots = 13 mm (1,3 cm)    , 18 dots espao entre etiquetas  
F2           > No achei
D10         > Densidade da impresso
ZT           > Direo da Impressao
A124       > Coluna
,95          > Linha
,2            > Rotao
,3            > Tipo de Fonte
,1            > Multiplicador de Altura dos caracteres
,1            > Multiplicador de Largura dos caracteres
,N            > Limpa imagem da memria
,"R$14,55" > Texto a ser impresso
P001        > Total de impressao na etiqueta
Responder

Gostei + 0

02/12/2015

Sidney Abreu

Amigo fiz assim, mas continua imprimido varias em branco, se puder me ajudar lhe agradeo.



var
f:TextFile;
linha: string;
begin
   AssignFile(f,'c:\teste.txt');
   Rewrite(f);
   Writeln(f,'N');
   writeln(f,'Q104,18');
   Writeln(f,'F2');
   Writeln(f,'D10');
   Writeln(f,'ZT');
   Writeln(f,'A124,5,2,3,1,1,N,"R,55"');
   Writeln(f,'P001');
   CloseFile(f);
   AssignFile(f,'c:\teste.txt');
   Reset(f);
   while not eof(f) do
    begin
     readln(f,linha);
     FrmPrincipal.Memo1.Lines.Add(linha);
    end;
    CloseFile(f);
  Memo1.Lines.SaveToFile('\\ultra\ZDesigner');
Responder

Gostei + 0

02/12/2015

Robson Morais

ser que no pode ser o sensor da impressora que no est posicionado no intervalo da etiqueta ?
Responder

Gostei + 0

03/12/2015

Rafael Santos

Amigo, me manda um Email em rafael.santos@bgmrodotec.com.br

lhe ajudo.

Se der certo, voc posta a soluo aqui depois para outros desenvolvedores que se depararam com o mesmo problema.

Att, Rafael Ferreira.
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experincia para nossos usurios, consulte nossa poltica de privacidade.

Aceitar