Etiqueta exemplo

[jorge andrade]

Pessoal boa tarde

Alquém tem um exemplo de emissão de etiqueta utilizando em etiquetas paralelas 40 x 25 x 2, conforme imagem:

[]s

[antonio.carlos]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[jorge andrade]

Em 08/10/2020 at 16:18, jorge andrade disse:

Pessoal boa tarde

Alquém tem um exemplo de emissão de etiqueta utilizando em etiquetas paralelas 40 x 25 x 2, conforme imagem:

[]s

Nenhum exemplo simples? Nada? Será quem ninguém usa a etiqueta d o ACBR via monitor? Puxa! Estou frustado.

[José M. S. Junior]

Bom dia Jorge,

O formato de passagem dos comandos é o mesmo, o que muda é a orientação da posição que vai imprimir em cada etiqueta, via parametros em cada método

https://acbr.sourceforge.io/ACBrMonitor/ImprimirTexto.html

ex:

ETQ.Ativar()

ETQ.IniciarEtiqueta()

ETQ.ImprimirTexto(0, 2, 1, 2, 2, 3, "BISCOITO REC 33G");
ETQ.ImprimirTexto(0, 2, 1, 1, 6, 3, "CHOC BRANCO");
ETQ.ImprimirBarras(0, 0, 2, 2, 8, 3, "7896003701685", 10);

ETQ.ImprimirTexto(0, 2, 1, 2, 2, 32, "BISCOITO RECH 33G");
ETQ.ImprimirTexto(0, 2, 1, 1, 6, 32, "CHOC BRANCO");
ETQ.ImprimirBarras(0, 0, 2, 2, 8, 32, "7896003701685", 10);

ETQ.FinalizarEtiqueta(1,0)

ETQ.Imprimir()

ETQ.Desativar()

precisa testar até identificar a posição ideal para a etiqueta da coluna.

[jorge andrade]

Júnior boa tarde e obrigado pela resposta.

Neste caso, devo mesmo usar o velho esquema de ajuste in loco, com tentativas e erros, até achar o formato adequado de acordo com a impressora,  modelo, fonte (A qual ainda não sei como determinar, bem provável pelo manual da impressora)  escolhido. Acredito que o teste abaixo deva deixar claro isso, onde utilizei uma etiqueta qualquer e a minha intenção era somente tentar imprimir uma linha em cada etiqueta e as coordenadas devem ter truncado, pois deve ter emitido na coordenada especificada, mas em etiquetas diferentes e bem provável tb pelo tamanho do texto

Segue comando utilizado, talvez com excesso de informações  e aimagem.

ETQ.Ativar()
ETQ.IniciarEtiqueta()
ETQ.Velocidade()
ETQ.Modelo(4)
ETQ.ModeloStr()
ETQ.Temperatura()
ETQ.SetUnidade(0)
ETQ.DPI()
ETQ.SetDPI(0)
ETQ.MargemEsquerda() #AQUI DEVO DETERMINAR A MARGEM ESQUEDA INICIAL DA PRIMEIRA ETIQUETA?

ETQ.ImprimirTexto(0, 3, 1, 1, 11, 11, "ETQPPLB-11" )

ETQ.Ativar()
ETQ.IniciarEtiqueta()
ETQ.Velocidade()
ETQ.Modelo(4)
ETQ.ModeloStr()
ETQ.Temperatura()
ETQ.SetUnidade(0)
ETQ.DPI()
ETQ.SetDPI(0)
ETQ.MargemEsquerda() #AQUI DEVO DETERMINAR A MARGEM ESQUEDA INICIAL DA SEGUNDA ETIQUETA?

ETQ.ImprimirTexto(0, 3, 1, 1, 46, 46, "ETQPPLB-46" )

ETQ.Ativar()
ETQ.IniciarEtiqueta()
ETQ.Velocidade()
ETQ.Modelo(4)
ETQ.ModeloStr()
ETQ.Temperatura()
ETQ.SetUnidade(0)
ETQ.DPI()
ETQ.SetDPI(0)
ETQ.MargemEsquerda() #AQUI DEVO DETERMINAR A MARGEM ESQUEDA INICIAL DA TERCEIRA ETIQUETA

ETQ.ImprimirTexto(0, 3, 1, 1, 77, 77, "ETQPPLB-77" )

ETQ.Imprimir(1,0)
ETQ.Desativar()

 

[José M. S. Junior]

No caso, para as etiquetas de mesma linha deve passar a informação no mesmo bloco, conforme mostrei acima... É como se estivesse imprimindo na mesma linha, apenas avançando a orientação vertical...

ex:

ETQ.Ativar()

ETQ.IniciarEtiqueta()

ETQ.ImprimirTexto(0, 3, 1, 1, 11, 11, "ETQPPLB-11" )
ETQ.ImprimirTexto(0, 3, 1, 1, 11, 46, "ETQPPLB-46" )
ETQ.ImprimirTexto(0, 3, 1, 1, 11, 77, "ETQPPLB-77" )

ETQ.FinalizarEtiqueta(1,0)

ETQ.Imprimir()

ETQ.Desativar()

Obs: As configuração não precisa passar em cad bloco de impressão, basta configurar uma unica vez, se preferir pode configurar em tela e gravar

Em cada bloco onde inicializa etiqueta e finaliza etiqueta passe apenas os comandos que geram o conteúdo de impressão de cada coluna.

[jorge andrade]

16 minutos atrás, José M. S. Junior disse:

No caso, para as etiquetas de mesma linha deve passar a informação no mesmo bloco, conforme mostrei acima... É como se estivesse imprimindo na mesma linha, apenas avançando a orientação vertical...

ex:

ETQ.Ativar()

ETQ.IniciarEtiqueta()

ETQ.ImprimirTexto(0, 3, 1, 1, 11, 11, "ETQPPLB-11" )
ETQ.ImprimirTexto(0, 3, 1, 1, 11, 46, "ETQPPLB-46" )
ETQ.ImprimirTexto(0, 3, 1, 1, 11, 77, "ETQPPLB-77" )

ETQ.FinalizarEtiqueta(1,0)

ETQ.Imprimir()

ETQ.Desativar()

Obs: As configuração não precisa passar em cad bloco de impressão, basta configurar uma unica vez, se preferir pode configurar em tela e gravar

Em cada bloco onde inicializa etiqueta e finaliza etiqueta passe apenas os comandos que geram o conteúdo de impressão de cada coluna.

Isso eu entendi e salientei que havia excessos de comandos desnecessários, sobre gravar em tela, vc diz no próprio monitor correto.

 

Obrigado

[José M. S. Junior]

Sim, as configurações pode deixar fixo em tela: