Ir para conteúdo
  • Cadastre-se

dev botao

Imprimir Etiquetas 3 coluna


nildglan
Ver Solução Respondido por leandroaoa,
  • Este tópico foi criado há 1582 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

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

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde

Você chegou a analisar o demo?

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

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

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


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Solution

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

  • Curtir 1
Link para o comentário
Compartilhar em outros 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

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1582 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.