Pesquisar na Comunidade

Bom dia . Amigos estou com um problema no ACBrETQ, compilei este componente e gerei o próprio teste dele para salvar em um txt na opção etqzpl e 3 colunas,e ver como estavam as posições, ao gerar esse txt as posições Vertical e Horizontal estava sendo multiplicado por 8, por exemplo : CORRETO: A30,01,0,3,1,1,N,"NOME IMPRESSO " ESTA GERANDO: A240,08,0,3,1,1,N,"NOME IMPRESSO " O CÓDIGO DE GERAÇÃO ESTÁ ASSIM: ImprimirTexto(orNormal, '0', 1,1,1,30,NOME IMPRESSO);

Bom dia Estou utilizando o AcbrETQ para fazer a impressão de etiquetas em uma impressora Zebra ZD230 só que eu estou com um problema que quando eu mudo o tamanho da etiqueta tenho que ir no driver da impressora e por o tamanho da nova etiqueta. Talvez tem como eu passar o tamanho da etiqueta para a impressora pelo código?

Pessoal estou usando o ACBRETQ para imprimir na GC420t normalmente, mas quando fui testar o mesmo codigo na TLP2844 a impressora apenas pisca o led uma vez e não imprimi a etiqueta. Existe alguma diferença de configuração de uma impressora pra outra ??? Config da GC420t que estou usando: DPI := dpi203; Modelo := etqZPLII; Temperatura := 30; Velocidade := -1; BackFeed := bfNone; Unidade := etqMilimetros; para imprimir: ImprimirTexto(orNormal, '0', 60, 60, 3, 3, Copy(EdtDescCupom.Text,1,27), 0, True); ImprimirTexto(orNormal, '0', 50, 50, 10, 3, Copy(EdtDescCupom.Text,28,27)); ImprimirBarras(orNormal, barEAN13, 2, 2, 16, 5, EdtCodBarra.text, 8, becSIM); ImprimirTexto(orNormal, '0', 100, 100, 16, 32, 'R$'); if CheckBox2.Checked then begin if StrToFloat(EdtPromocao.Text) = 0 then ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtValor.Text))) else ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtPromocao.Text))); end else begin if StrToFloat(EdtNatural.Text) <> 0 then ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtNatural.Text))) else ImprimirTexto(orNormal, '0', 120, 120, 16, 50, FormatFloat('########0.00', StrToFloat(EdtValor.Text))); Imprimir(StrToInt(EdtQtdEtq.Text), StrToInt('0')); Aguardo ajuda....

Bom dia, pessoal. Estamos implementando a impressão de etiquetas com a impressora Zebra TLP-2844 através do AcbrEtq. Já ajustamos o layout e está tudo certo. O problema está na velocidade da impressão. Estamos fazendo um teste com um lote de 54 etiquetas, o que corresponde a 18 linhas. O problema é que a impressora imprime uma linha e pausa a impressão, e depois de alguns instantes continua. Isto está fazendo com que o tempo de impressão seja muito grande. Verificamos na fila de impressão que existe um trabalho para cada linha. A implementação ficou assim: Já fizemos testes com o Imprimir(NumeroCopias, Avanco) fora do While, só que a impressora imprime uma somente a primeira linha e para. Existe alguma forma de otimizar esta impressão? Obrigado

Olá a todos, Pretendo criar um Wizard visual para desenhar etiquetas e gerar modelos e codigos tanto em Acbr qnto em comando Pl2 como o ZebraDesing. Gostaria de propor um lugar para compartilhar blocos de codigos comuns para modelos de etiquetas: Modelo Impressora : Tamanho/Modelo Etiqueta: Imagem de exemplo: Bloco de Código para gerar na impressora. Ex: Argox: Modelo = etqPpla Gondola_100mm_x_32mm_3_Colunas Sem imagem de exemplo: Codigo: ImprimirTexto(orNormal, 2, 1, 2, 180, 15, Etiqueta.Descr); ImprimirTexto(orNormal, 2, 1, 1, 140, 15, 'R$ ' + Etiqueta.Valor); ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 20, 10, Etiqueta.Barras, 70); ImprimirTexto(orNormal, 2, 1, 2, 180, 315, Etiqueta.Descr); ImprimirTexto(orNormal, 2, 1, 1, 140, 315, 'R$ ' + Etiqueta.Valor); ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 20, 315, Etiqueta.Barras, 70); ImprimirTexto(orNormal, 2, 1, 2, 180, 620, Etiqueta.Descr); ImprimirTexto(orNormal, 2, 1, 1, 140, 620, 'R$ ' + Etiqueta.Valor); ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 20, 620, Etiqueta.Barras, 70); Zebra: epl2 Gondola_100mm_x_32mm_3_Colunas Sem imagem de exemplo: ImprimirTexto(orNormal, 2, 1, 3, 15, 55, Etiqueta.Descr); ImprimirTexto(orNormal, 2, 1, 1, 80, 55, 'R$ ' + Etiqueta.Valor); ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 120, 55, Etiqueta.Barras, 080, becSIM); ImprimirTexto(orNormal, 2, 1, 3, 15, 365, Etiqueta.Descr); ImprimirTexto(orNormal, 2, 1, 1, 80, 365, 'R$ ' + Etiqueta.Valor); ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 120, 365, Etiqueta.Barras, 080, becSIM); ImprimirTexto(orNormal, 2, 1, 3, 15, 670, Etiqueta.Descr); ImprimirTexto(orNormal, 2, 1, 1, 80, 670, 'R$ ' + Etiqueta.Valor); ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 120, 670, Etiqueta.Barras, 080, becSIM); Argox: etqPpla Gondola_100mm_x_32mm_Simples FACbrEtiqueta.ImprimirTexto(orNormal, 2, 2, 2, 190, 5, Centraliza(Etiqueta.Descr, 8) ); FACbrEtiqueta.ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 32, 0, Etiqueta.Barras, 90, becSIM); FACbrEtiqueta.ImprimirTexto(orNormal, 3, 3, 2, 15, 300, 'R$'); FACbrEtiqueta.ImprimirTexto(orNormal, 3, 4, 4, 15, 450, Etiqueta.Valor); //OU centralizada em 3 linhas sHorizontal := retornaHorizontal(Etiqueta.BarCode, Etiqueta.Barras); //Original Code: Descricao, valor e barras centralizadas horizontalmente FACbrEtiqueta.ImprimirTexto(orNormal, 3, 1, 2, 0220, 0080,Centraliza(Etiqueta.Descr, 3)); FACbrEtiqueta.ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '9', '3', 0010, StrToInt(sHorizontal), Etiqueta.Barras, 100, becSIM); FACbrEtiqueta.ImprimirTexto(orNormal, 5, 1, 1, 0150, 0080, centraliza('R$ ' + Copy(Etiqueta.Valor, 0, 8), 5)); Zebra :epl2 Gondola_100mm_x_32mm_Simples FACbrEtiqueta.ImprimirTexto(orNormal, 2, 2, 2, 15, 55, Centraliza(Etiqueta.Descr, 8)); FACbrEtiqueta.ImprimirBarras(orNormal, Etiqueta.TipoBarCode, '2', '2', 95, 55, Etiqueta.Barras, 90, becSIM); FACbrEtiqueta.ImprimirTexto(orNormal, 3, 3, 2, 110, 355, 'R$'); FACbrEtiqueta.ImprimirTexto(orNormal, 3, 4, 5, 85, 515, Etiqueta.Valor); Caso tenham modelos para trocar me enviem no email: [email protected] Obrigado.

Ola a todos. Estou com problemas para imprimir uma imagem na impressora Zebra GC420t, estou usando o próprio exemplo do ACBr com a imagem fornecida mas sai tudo preto. CONFIGURAÇÕES: Modelo: etqEpl2 Porta: \\NOTE\ZDesigner GC420T DPI Impressora: dpi203 Limpar Memória: SIM N Cópias: 1 Avança Etq: 600 Temperatura: 10 Alguém pode me ajudar?

Boa tarde, Estou querendo imprimir um logo em minhas etiquetas e verificando o AcbrEtq, eu chego nessa linha: 1Y0100000100010ACBR (isso faz com que seja enviados os comandos para impressora imprimir o logo) Porém eu já tenho meu processo todo realizado no meu software ... gostaria só de adaptar ... como posso fazer para esse comando buscar um caminho do logo ? Existe possibilida de indicar um caminho, exemplo: 1Y0100000100010"C:\logo.bmp" Ou é necessário carregar a imagem em STream ?

BOA TARDE AMIGOS SOU NOVATO NA PROGRAMACAO E ESTOU COM NECESSIDADE ENORME, JA TENHO EM MEU PROGRAMA PARA IMPRESSORA DE ETIQUETA NA IMPRESSORA ARGOX, MAS PRECISO IMPLEMENTAR A IMPRESSORA ZEBRA, A GRANDE DUVIDA É O SEGUINTE, NA ARGOX TENHO ALGUMAS CHAMADAS DE DLL NO INCIO DO FORM, PRECISO SABER SE NA ZEBRA E A MESMA COISA OU ENTAO COMO FAÇO PARA USAR O COMPOMENTE ACBr DE ETIQUETA, POIS JA BAIXEI E JA ESTA INSTALADO, POR FAVOR ME AJUDEM URGENTE OBRIGADO

Olá fiz o teste de impressao de codigo de barras na Argox PLA td bem ok, e descobri os tipos de codigo de barras: //Tipo cod.Barras : A-39, //Tipo cod.Barras : E-128, //Tipo cod.Barras : F-EAN, //Tipo cod.Barras : G-EAN-8, Mas quais os Tipos de codigo de barras para a impressora Zebra EPL ? "E30" = EAN 8 ou 13 "1" = 128 Cod 39 = ??? Mas qual código para 39 que imprima correto. Lee o manual e testei com os possíveis código lá existente 0,1,2,3,E,K, mas só funcionou com o cod. 1, cod bar "128" e o q está no exemplo do ACBR "E30" q só imprime códigos válidos. No meu caso se o produto não tiver o cod.Barras preciso imprimir o cod. do sistema, no caso tem 5 digitos. Desde já meus agradecimentos a quem puder ajudar. 100+ ANT.CARLOS/SP

Pessoal, como IMPRIMIR um qrcode na impressora Zebra TLP2844 ou GC420T? Devo gerar o qrcode antes e salvar como imagem e depois transferir para a impressora? Alguém aqui já montou isso? Alguém aqui pode indicar um componente de Qrcode?

Boa tarde... Estou com um problema aqui... um cliente pediu para ponhar a logo da empresa na etiqueta dos produtos, me passando uma imagem jpg, para imprimir em uma impressora ZEBRA ZT230, como essa impressora só aceita imagens com formato PCX (o que o acbretq me diz)... eu o modifique para o formato mas na saída sai em branco ou simplesmente não sai a etiqueta... eu uso o codigo descrito abaixo para tentar imprimir: ACBrETQ.CarregarImagem(NOME_IMAGEM, 'imagem' ); // O NOME_IMAGEM é o caminho + o nome da imagem... ACBrETQ.ImprimirImagem(1,10,10,'imagem'); // passando x= 10 e y= 10 nas posições e o nome 'imagem' para a impressão ACBrETQ.Imprimir(1, 600 ); ACBrETQ.Desativar;

Há uns dez anos atras eu desenvolví um componente para geração de etiquetas para impressosas térmicas de código de barras compativeis com a linguagem EPL2 (Zebra, Argox, etc). Cheguei a usar num projeto, mas estou com este componente parado. Eu tenho a intenção de disponibiliza-lo para este projeto, mas antes quero saber se este componente é interessante e viável dentro dos propósitos do projeto ACBR.

Boa noite meus caros Apesar do assunto ter sido discutido aqui no fórum e outros lugares, gostaria se possível da opinião dos compaheiros. Estou em fase de implantação de sistema em um clientes que está migrando para minha empresa. Porém, a mesma tem uma Zebra TlP 2844 que usa para impressão de etiquetas 3 carreiras 2,1 x 3,3. Acontece que estou fazendo FastReport e apanhando muito para configurar e achar a posição correta para funcionar. Mesmo assim vi que alguns amigos não recomendam por conta da lentidão. Então, sugeriram usar o ACBREtq, gostaria da opinião dos amigos para avaliar o que é mais fácil pois pelo que vi no Acbr achei relativamente complexo o código de impressão e não saco nada da linguagen da impressora. obrigado a quem puder opinar. Wellington L Silva.

Olá boa tarde! Uso o AcbrEtq nas impressoras Argox e funciona normal, numa impressora IMPRESSORA ZEBRA - GC420T imprime normal, usando EPL2. Mas tenho agora uma impressora TLP 2844 (EPL) que imprime uma etiqueta e salta outra em branco. Já esgotei com todos tipos de teste para descobri qual o problema. Então pergunto, o ACBREtq suporta plenamente a linguagem EPL ? Pois ELP2 funciona normal. 100+ ANT.CARLOS/SP

Olá boa noite! Estou tentanso conectar a impressora na USB mas não funciona de jeito nenhum. Na LPT1, 2,3 ok, funciona. Nota: Antes q alguém diga para mim pesquisar, já fiz isto e já estou a uma semana fazendo isto. já lee todos os tópicos sobre a zebra e Argox. Impressora Zebra GC420t, Padrao e compartilhada como: ZDesigner1. Printer.GetPrinter(aDevice, aDriver, aPort, ahDMode); //...Pega a Impressora padrao NomComp := Nome_do_Computador; // //...Aqui com a impressora ARGOX funciona veja // If DMCONFIG.Sql_PesqConfigsisMODIMPZEBRA.AsString = 'ARGOX' Then ACBrETQ.Porta := '\\'+NomComp+'\'+aDevice; // //...Com este comando não funciona na impressora Zebra GC420t erro I/O 53 // If DMCONFIG.Sql_PesqConfigsisMODIMPZEBRA.AsString = 'ZEBRA' Then ACBrETQ.Porta := '\\quadcore\ZDesigner1'; // //...Com este comando não funciona na impressora Zebra GC420t erro I/O 53 // If DMCONFIG.Sql_PesqConfigsisMODIMPZEBRA.AsString = 'ZEBRA' Then ACBrETQ.Porta := '\\localhost\ZDesigner1'; // //...Com este comando não funciona na impressora Zebra GC420t erro I/O 53 // If DMCONFIG.Sql_PesqConfigsisMODIMPZEBRA.AsString = 'ZEBRA' Then ACBrETQ.Porta := '\\192.168.0.1\ZDesigner1'; //...IP da minha maquina // //...Com este comando não funciona na impressora Zebra GC420t erro I/O 53 // If DMCONFIG.Sql_PesqConfigsisMODIMPZEBRA.AsString = 'ZEBRA' Then ACBrETQ.Porta := '\\'+NomComp+'\'+aDevice; A quem puder ajudar desde já meus agradecimentos.