Jump to content

Promoção de Natal SAC Mensal

Contrate e ganhe 1 Kit agenda + Caneta
Saiba mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

nildglan

ANSWERED Imprimir Etiquetas 3 coluna

Recommended Posts

Pessoa estou tendo dificuldade em imprimir etiqueta em 3 coluna com o componente ACBrETQ eu configurei conforme o código que peguei do modelo do acbr dessa forma

   ImprimirTexto(orNormal, 2, 1, 2, 2, 3, 'BISCOITO REC 33G');
        ImprimirTexto(orNormal, 2, 1, 1, 6, 3, 'CHOC BRANCO');
        ImprimirBarras(orNormal, barEAN13, 2, 2, 8, 3, '7896003701685', 10);

        ImprimirTexto(orNormal, 2, 1, 2, 2, 28, 'BISCOITO RECH 33G');
        ImprimirTexto(orNormal, 2, 1, 1, 6, 28, 'CHOC BRANCO');
        ImprimirBarras(orNormal, barEAN13, 2, 2, 8, 28, '7896003701685', 10);

        ImprimirTexto(orNormal, 2, 1, 2, 2, 53, 'BISCOITO RECH 33G');
        ImprimirTexto(orNormal, 2, 1, 1, 6, 53, 'CHOC BRANCO');
        ImprimirBarras(orNormal, barEAN13, 2, 2, 8, 53, '7896003701685', 10);
 

só que claro informando meus campos como vou mostrar na imagem Config, só que não sai em 3 colunas só sai em 1 coluna e sai grande ainda estou apanhando pra caramba 

a impressora é a que ta na foto config  uma Elgin L42Pro

já tentei de várias formas mais não imprimi as 3 coluna,  a etiqueta é 33x22 mim as dimensões  e queria imprimir nelas vou postar a foto dela se alguem puder me ajudar 

 

Etiqueta.jpg

Config.jpg

ModeloEtiquetas.jpg

Share this post


Link to post
Share on other sites

Boa tarde

Você chegou a analisar o demo?

Att.


Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites

tarde ta ai :

 

             with ACBrETQ do
              begin
               Desativar;

               Modelo       := TACBrETQModelo(strtoint(covalor(FormConfig.edit79.text))) ;
               Porta        := trim(FormConfig.edit38.text);
               Unidade      := etqMilimetros;

               Ativar ;

                             ImprimirTexto(orNormal, 2, 1, 1, 2, 1, clientdataset2.fieldbyname('desc1').asstring);
                             ImprimirTexto(orNormal, 2, 1, 1, 5, 1, clientdataset2.fieldbyname('tam').asstring);
                             ImprimirTexto(orNormal, 2, 1, 2, 8, 1, 'REF '+xValor);
                             ImprimirBarras(orNormal, barCODE128, 2, 2, 12, 1, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                             ImprimirTexto(orNormal, 2, 1, 2, 18, 1, trim(clientdataset2.fieldbyname('barra').asstring));
                             ImprimirTexto(or90, 1, 1, 1, 2, 26, trim(FormConfig.Edit2.Text));
                             ImprimirTexto(or90, 2, 1, 1, 1, 29, trim(FormConfig.Edit8.Text));


                             ImprimirTexto(orNormal, 2, 1, 1, 2, 37, clientdataset2.fieldbyname('desc1').asstring);
                             ImprimirTexto(orNormal, 2, 1, 1, 5, 37, clientdataset2.fieldbyname('tam').asstring);
                             ImprimirTexto(orNormal, 2, 1, 2, 8, 37, 'REF '+xValor);
                             ImprimirBarras(orNormal, barCODE128, 2, 2, 12, 37, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                             ImprimirTexto(orNormal, 2, 1, 2, 18, 37, trim(clientdataset2.fieldbyname('barra').asstring));
                             ImprimirTexto(or90, 1, 1, 1, 2, 62, trim(FormConfig.Edit2.Text));
                             ImprimirTexto(or90, 2, 1, 1, 1, 65, trim(FormConfig.Edit8.Text));


                             ImprimirTexto(orNormal, 2, 1, 1, 2, 73, clientdataset2.fieldbyname('desc1').asstring);
                             ImprimirTexto(orNormal, 2, 1, 1, 5, 73, clientdataset2.fieldbyname('tam').asstring);
                             ImprimirTexto(orNormal, 2, 1, 2, 8, 73, 'REF '+xValor);
                             ImprimirBarras(orNormal, barCODE128, 2, 2, 12, 73, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                             ImprimirTexto(orNormal, 2, 1, 2, 18, 73, trim(clientdataset2.fieldbyname('barra').asstring));
                             ImprimirTexto(or90, 1, 1, 1, 2, 98, trim(FormConfig.Edit2.Text));
                             ImprimirTexto(or90, 2, 1, 1, 1, 101, trim(FormConfig.Edit8.Text));

                             Imprimir(1, StrToInt(covalor(FormConfig.edit80.text)));
              end;    

 

IMG_ETQ.png

  • Like 1

Share this post


Link to post
Share on other sites

fiz da forma que vc fez e não deu certo veja as configuração

 

e veja como saiu na outra imagem

 

Config.jpg

Etiqueta.jpg

só sai em uma e ainda errado to quase desistindo

Share this post


Link to post
Share on other sites

tarde e que usei ali modelo pplb a unica diferenca e como abaixo

                             ImprimirTexto(orNormal, 2, 1, 1, 18, 1, clientdataset2.fieldbyname('desc1').asstring);
                             ImprimirTexto(orNormal, 2, 1, 1, 15, 1, clientdataset2.fieldbyname('tam').asstring);
                             ImprimirTexto(orNormal, 2, 1, 2, 12, 1, 'REF '+xValor);
                             ImprimirBarras(orNormal, barCODE128, 2, 2, 9, 1, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                             ImprimirTexto(orNormal, 2, 1, 2, 2, 1, trim(clientdataset2.fieldbyname('barra').asstring));
                             ImprimirTexto(or90, 1, 1, 1, 18, 26, trim(FormConfig.Edit2.Text));
                             ImprimirTexto(or90, 2, 1, 1, 18, 29, trim(FormConfig.Edit8.Text));

 

basta voce altera os valores do vertical que inverte um comeca de cima pra baixo e o outro de baixo pra cima ajusta os valores ai que vai de boa estou sem impressora com ppla aqui

  • Like 1

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...