ACBrETQ pulando etiqueta em branco e posição de impressão.

[chico_lopes]

Boa tarde

 

    estou estudando sobre o componente ACBrETQ (https://acbr.sourceforge.io/ACBrLib/ACBrLibETQ.html) para impressão em zebra, porém não estou encontrando a forma de definir o tamanho da etiqueta ou o salto da impressão que a impressora irá pular para próxima etiqueta, pois estou tentando fazer um para imprimir em uma zebra tlp2844 , a etiqueta será em paisagem (23,1x10 cm) porém nos meus teste ela está imprimindo em uma etiqueta pulando outra etiqueta em branco.

   Somente para verificar se minha lógica está correta, se a orientação no comando ImprimirTexto, vai definir se as coordenadas verifical e horizontal irá começar to topo, base, direito ou esquerdo! Exemplo seu eu colocar um orientação or90 significa q meu horizontal será do topo para base e vertical será da esquerda para direita?

 aproveitando o gancho para que serve na ImprimirTexto as variáveis MultiplicadorH e MultiplicadorV que não ficou claro no manual.

 

segue o código gerado para impressora.

 

JF
R0,0
N
D10
ZB
S1
A40,1199,1,1,1,1,N,"BISCOITO MARILAN RECH 335G"
A56,1199,1,1,1,1,N,"90 90 90 90 90 90 90 90 90 90 "
P1
N

 

código usado ate o momento

  with ACBrETQ1 do
  begin
     Desativar;

     //ArqLOG :;
     Porta         := ifthen(trim(Edit1.Text) = '', 'lpt1',Edit1.text); //cbPorta.Text;
     Temperatura   := 10; //StrToInt(eTemperatura.Text);
     Velocidade    := 1; //StrToInt(eVelocidade.Text);
     //Avanco        := 0; // avanco entre etiquetas padrão 0
     MargemEsquerda:= 0 ; //padrão 0
     LimparMemoria := true; //ckMemoria.Checked;
     //Ativo         := true;
     Modelo        := etqPplb; //TACBrETQModelo(cbModelo.ItemIndex);       modelo zebra tlp2844
     Unidade       := etqMilimetros;
     BackFeed      := bfOn; //TACBrETQBackFeed(cbBackFeed.ItemIndex);
     Origem        := ogNone; //origem da impressão
     DPI           := dpi203; //  TACBrETQDPI(cbDPI.ItemIndex);

     Ativar;
     if Modelo in [etqPpla, etqPplb] then
      begin
        ImprimirTexto(or90,                               // Orientacao
                      1,                                   //Fonte
                      1,                                   //MultiplicadorH
                      1,                                   //MultiplicadorV
                      150,                                   //Vertical
                      5,                                   //Horizontal
                      'BISCOITO MARILAN RECH 335G',        //Texto
                      0,                                   //SubFonte
                      false);                               //ImprimirReverso
        ImprimirTexto(or90,                               // Orientacao
                      1,                                   //Fonte
                      1,                                   //MultiplicadorH
                      1,                                   //MultiplicadorV
                      150,                                   //Vertical
                      7,                                   //Horizontal
                      '90 90 90 90 90 90 90 90 90 90 ',        //Texto
                      0,                                   //SubFonte
                      false);                               //ImprimirReverso
      end
     else  //if Modelo = etqZPLII then
      begin
        ImprimirTexto(orNormal, '0', 60, 60, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True);
        ImprimirTexto(orNormal, '0', 60, 60, 8, 3, 'CHOC BRANCO');
        ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, '7896003701685', 10, becSIM);
        ImprimirTexto(orNormal, 'A', 100, 100, 18, 32, 'R$');
        ImprimirTexto(orNormal, 'A', 120, 120, 15, 50, '20,59');
      end;
     //FinalizarEtiqueta();
     Imprimir(1, 0);
     Desativar;
  end;

 

[Juliana Tamizou]

Boa tarde.

Você está utilizando o ACBrMonitor ou a ACBrLib? 

48 minutos atrás, chico_lopes disse:

porém não estou encontrando a forma de definir o tamanho da etiqueta ou o salto da impressão que a impressora irá pular para próxima etiqueta

Essas impressoras costumam ter um sensor para detectar o gap da etiqueta, verifique se a etiqueta que está utilizando possui o corte do gap..

Temos uma situação parecida com a sua neste tópico, porém a impressora  era Argox

 

45 minutos atrás, chico_lopes disse:

Somente para verificar se minha lógica está correta, se a orientação no comando ImprimirTexto, vai definir se as coordenadas verifical e horizontal irá começar to topo, base, direito ou esquerdo! Exemplo seu eu colocar um orientação or90 significa q meu horizontal será do topo para base e vertical será da esquerda para direita?

O ideal é vc testar para ver como fica...

 

49 minutos atrás, chico_lopes disse:

aproveitando o gancho para que serve na ImprimirTexto as variáveis MultiplicadorH e MultiplicadorV que não ficou claro no manual.

Essas medidas se referem a fonte do texto.

Att.

[chico_lopes]

@Juliana Tamizou estou utilizando o ACBrLib + delphi7, o gap que vc diz é o espaço entre uma etiqueta é a outra? 

 

a bobina que estou utilizando é parecida com essa, no caso da argox pelo que eu li seria o tipo do papel, podem eu fiz um teste com o zebra design e funcionou corretamente. Na segunda eu vou analisar o sensor da zebra aonde fica para ver se está pegando corretamente a distancia entre as etiquetas, dai eu posto novamente aqui.

 

por enquanto obrigado.

Editado 13 Março, 2020 por chico_lopes

[chico_lopes]

Bom dia 

 

    fiz teste nesta manhã, na linguagem etqPplb, porém percebemos que a zebra TLP2844 utiliza a ligagem EPL

conforme o site http://zebramaster.blogspot.com/2013/04/linguagem-de-programacao-zebra-epl.html

 

   nos teste usando a etqEpl2 vimos que exemplo que está no ACBRSerial está com erro na passagem dos parametros  mutiplicadorH e V, abaixo segue o código corrigido, se puderem upar  no servidor. 

 

    Porém mesmo assim, esta saindo um pagina em branco porém agora no incio , Por usarmos a linguagem EPL2 pode ser o motivo da EPL estar saltando? Mas vamos continuar mais teste assim q conseguir achar mais alguma coisa irei reportando. 

 

 

 

  with ACBrETQ do
  begin
     if Modelo in [etqPpla, etqPplb] then
      begin
        ImprimirTexto(orNormal, 2, 2, 2, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True);
        ImprimirTexto(orNormal, 2, 2, 1, 8, 3, 'CHOC BRANCO');
        ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, '7896003701685', 10, becSIM);
        ImprimirTexto(orNormal, 3, 3, 2, 18, 32, 'R$');
        ImprimirTexto(orNormal, 3, 4, 4, 15, 50, '20,59');
      end
     else  //if Modelo = etqZPLII then
      begin
        ImprimirTexto(orNormal, '0', 1, 1, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True);
        ImprimirTexto(orNormal, '0', 1, 1, 8, 3, 'CHOC BRANCO');
        ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, '7896003701685', 10, becSIM);
        ImprimirTexto(orNormal, 'A', 1, 1, 18, 32, 'R$');
        ImprimirTexto(orNormal, 'A', 1, 1, 15, 50, '20,59');
      end;

 

[chico_lopes]

Bom dia Pessoal, 

 

     conseguir resolver o problemas, segue as soluções:

    - o primeiro caso foi que a linguagem da zebra TLP 2844 deve ser etqEpl2 

    - e segundo a Origem tive que deixar como ogTop, e após isso fazer as rotações necessárias 

    - sobre o tamanho da etiqueta, pelo que eu entendi, ele vai pegar a horizontal, do ponto zero definido pela origem acima até o máximo da etiqueta, e a vertical vai pegar do ponto zero ate o gap(que eu entendi é o final da etiqueta) , se for superior a isso a impressora nem aceita o comando do texto.

[Juliana Tamizou]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.