Pesquisar na Comunidade

Primeiramente, espero que todos estejam bem e já agradeço a ajuda reportada! Estou criando um app simples, que terá como uma funcionalidade principal a leitura do código de barras de um produto e em sequencia, a impressão da etiqueta do mesmo. Para a impressão da etiqueta, utilizamos a impressora Zebra ZT230, que está compartilhada em rede '\\IPCOMPUTADOR\ZebraFilial'. Em testes realizados compilando direto no windows, consigo realizar o envio e impressão da etiqueta na impressora. Quando faço a compilação utilizando o android, abro o app e tendo fazer o envio para impressora, recebo o seguinte erro: 'PORTA NÃO DEFINIDA'. Pesquisando aqui no fórum, encontrei alguns tópicos com algumas dicas e tentei implementar, mas ainda assim o problema persiste. Tentativas de definição da propriedade PORTA do componente ETQ: 1ª: \\IPCOMPUTADOR\ZebraFilial -> Erro: 'PORTA NÃO DEFINIDA' 2ª: RAW:\\IPCOMPUTADOR\ZebraFilial -> Erro: 'PORTA NÃO ENCONTRADA' 3ª: RAW:ZebraFilial -> Erro: 'PORTA NÃO ENCONTRADA' 4ª: USB:Zebra, ZT230 -> Erro: 'NÃO IMPRIME A ETIQUETA' apesar de ativar a impressora, passar todos os parametros e finalizar a impressão. 5ª UBS:\\IPCOMPUTADOR\ZebraFilial -> Erro: 'NÃO IMPRIME A ETIQUETA' apesar de ativar a impressora, passar todos os parametros e finalizar a impressão. Alguém poderia me ajudar nessa questão? Desde já serei muito grato pelo ajuda e tempo solicito.

Estou com uma impressora Tomate MDK-006 para configurar e não estou conseguindo. Já tentei com todos os modelos disponível no componente AcbrEtq mas sem sucesso. Alguém sabe se o AcbrEtq funciona como essa impressora? Se sim, como configurar? Desde já agradeço a ajuda!

Erro ao utilizar ACBRETQ sem ribbon. Utilizei o exemplo ETQTESTE. Mesmo marcando nas configurações da impressora como "Térmica direta", quando envio a impressão ela ocorre corretamente, mas logo em seguida, retorna a configuração de fábrica para uso do ribbon: "transferência térmica", causando uma travamento na impressora, pois a mesma fica com a luz de falta do ribbon. Alguém passando por isto? Detalhe: a impressão em etiquetas térmicas e sem utilizar o ribbon reduz bastante o custo para nossos clientes.

Boa tarde Algo está acontecendo aqui e nao entendo: Faço testes e imprime beleza Depois de uns tempos, após algumas atualizações de versões para outros módulos, para de imprimir. Não atualizei o AcBr e nem alterei forms de impressao de etiquetas. O suporte reporta que no cliente via windows faz o teste na Argox, mas no sistema não imprime. Alguem consegue decifrar esse mistério? Pelo exemplo do acbr tb nãoetqlog.txt está imprimindo. Salta etiqueta em branco. Pelo windows imprime o teste. No log não registra erros.

Bom dia estou com um problema, meu cliente tem uma impressora Elgin L42 PRO onde imprimia etiquetas através de um software próprio para criar etiquetas, neste a etiqueta saia normal, mas pelo ACBr está imprimindo somente a metade esquerda da etiqueta, ele imprime tudo na ordem até em baixo mas da metade da etiqueta para direita está em branco. Vi que tinha um caso semelhante aqui em um Tópico e a orientação foi verificar o utilitário da impressora para configurar mas já verificamos todas as opções lá e creio que não seja isso pois pelo editor de etiquetas era impresso normalmente.

Olá Tudo Bem! Estou com um problema quando ligo a impressora Elgin L42, e mando imprimir uma etiqueta, pois acabo perdendo duas etiquetas(esta na imagem em anexo), imprimi os dados em boa parte de uma e quase nada na outra. Mas senão desligar a impressora todas as impressões saem corretas. No exemplo do ACBrEtq esse problema não ocorre. Estou me baseando no exemplo do ACBrEtq, não consegui descobrir se pode ser falta de alguma configuração. Essa é a primeira vez que estou usado o ACBrEtq. Trecho do código em que realizo a impressão: ACBrETQ_elgin.Ativar; with ACBrETQ_elgin do begin if(length(dmsistema.qgen4.FieldByName('ITENOME').AsString)<=40) then begin itnome1:=RemoveAcentos(dmsistema.qgen4.FieldByName('ITENOME').AsString); ImprimirTexto(orNormal, 3, 1, 2, 30, 10, itnome1); end else begin itnome1:=RemoveAcentos(copy(dmsistema.qgen4.FieldByName('ITENOME').AsString,1,40)); ImprimirTexto(orNormal, 3, 1, 2, 30, 10, itnome1); end; if(trim(dmsistema.qgen4.FieldByName('ITECODFAB').AsString)<>'') then begin vcodfab:=trim(dmsistema.qgen4.FieldByName('ITECODFAB').AsString); ImprimirTexto(orNormal, 3, 1, 2, 85, 150, vcodfab); end else if(trim(dmsistema.qgen4.FieldByName('ITECODFAB').AsString)='') then begin vcodfab:=inttostr(dmsistema.qgen4.FieldByName('ITECOD').Asinteger); ImprimirTexto(orNormal, 3, 1, 2, 85, 150, vcodfab); end; //PREÇO//////// vpreco:=formatfloat('R$ ##,##0.00',dmsistema.qgen4.FieldByName('ITEPREVEN').ascurrency); ImprimirTexto(orNormal, 3, 4, 3, 145, 100, vpreco); Imprimir(qtetq,0); ACBrETQ_elgin.Desativar; /////////////////// A configuração do componente está da seguinte forma: Backfeed = bfNone DPI = dpi203 AVANCO = 0 Margemesquerda = 10 Modelo = etqPpla Paginadecorte = pce850 Porta = RAW:BTP-L42(U) Temperatura = 10 Com essa mesma configuração no exemplo do ACBr funciona sem acontecer o problema. Mas no meu Sistema o problema ocorre! Lembrando que só ocorre quando liga a impressora depois de impressa a primeira etiqueta com esse problema todas as outras imprimem sem problemas respeitando o espaço dentro da etiqueta. A impressora está calibrada para a etiqueta em questão. Tem alguma propriedade que precisar ser setada de forma diferente? Desde já Muito Obrigado pela Atenção! Obrigado!

Olá, Estou dando uma estudada no ACBrETQ, já compilei os demos dele, mas não consigo realizar a impressão na Argox OS-214 Plus mesmo com os demos, o que pode ser? E ele não apresenta nenhum erro, e se eu rodar o teste de impressão a Argox imprime normalmente. Fico no Aguardo...

Bom dia , estou fazendo uma etiqueta simples para ser impressa em uma impressora Datamax Allegro Flex, já fiz o arquivo em linguagem DPL e está ok, mas gostaria de usar o componente do ACBR para gerar a etiqueta, vi que esta impressora aceita a linguagem PL-Z para emular a ZPL, mas não achei nada referente ao ACBREtq gerar o arquivo nessa linguagem(PL-Z), se alguém souber como gerar o arquivo em linguagem PL-Z via ACBR agradeço muito. Bom dia a todos.

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?

Olá ! Gostaria de saber se alguém já esta usando a impressora de etiquetas Taca TLP-400 com o ACbrETQ, ou se com as descrições técnicas abaixo é possível saber se ela é compatível com o componente: Velocidade de Impressão: 127 mm/s Resolução: 203dpi Largura de Impressão: 104mm Diâmetro Interno Ribbon: 25,4mm Comprimento do Ribbon 300m Interface: Ehternet / Serial / USB Drivers Plataforma Windows Software Gratuito Criação de Etiquetas Linguagem de Comunicação: TSPL e ZPL Sensores Etiquetas: Sensor de GAP e Marca Negra Sensores Mecanismo Cabeça Aberta e Final de Ribbon Dimensões: 165 x 220 x 285 mm (AxLxP) Peso: 2,340 kg Garantia 1 ano []´s

O ACBr suporta impressoras USB ? Durante muito tempo, a resposta a essa pergunta foi: NÃO, você precisa usar a Porta COM, Spool do Windows (RAW), Compartilhamento de Rede ou algum outro método... Porém agora isso mudou... Agora componentes que usam o ACBrDevice, como por exemplo o ACBrPosPrinter (para Impressoras Não Fiscais) e o ACBrETQ (para Impressoras de Etiquetas), possuem suporte a portas USB de maneira nativo do Windows... Ou seja, sem a necessidade de DLLs externas... Isso significa que caso o seu equipamento esteja conectado ao PC, por uma Porta USB... Você poderá conectar os componentes do ACBr, simplesmente definindo na Propriedade Porta algo como "USB" Exemplos de uso: ACBrPosPrinter1.Porta := 'USB' - Tenta descobrir qual é a Primeira Impressora de Bobinas plugada na USB e faz uso dela, se encontrar.. ACBrPosPrinter1.Porta := 'USB:Elgin' - Tenta conexão em alguma Impressora USB, listada como sendo do Fabricante 'Elgin' ACBrPosPrinter1.Porta := 'USB:Sweda, SI-300S' - Tenta conexão na Impressora USB, do Fabricante "Sweda" e do Modelo "SI-300S". ACBrETQ1.Porta := 'USB' - Tenta descobrir qual é a Primeira Impressora de Etiquetas plugada na USB e faz uso dela, se encontrar.. ACBrETQ1.Porta := 'USB:Zebra, GC420t' - Tenta conexão com a Impressora USB do Fabricante "Zebra", e modelo "GC420t" Observe que essa nova implementação é totalmente diferente do método de Hook, onde usávamos a DLL do Fabricante, como túnel USB... Nesse novo cenário a comunicação USB é feita diretamente usando a API do Windows, ou seja, sem necessidade de DLLs externas. Para compreender um pouco mais, sobre esse método veja esse artigo O método de Hook ainda está disponível, usando o prefixo de porta, 'DLL:' Como os Equipamentos são identificados ? Todo Equipamento USB, possui um código de identificação do Fabricante, chamado de Vendor ID (VID), e também do Produto chamado de Product ID (PID). Essa numeração é controlada pela USB.ORG, e você pode encontras uma lista de Todos os "Vendors ID", nesse link A classe TACBrUSBIDDataBase, mantêm um Banco de Dados interno, chamado ACBrUSBID.ini, com o mapeamento dos principais Equipamentos do Mercado Brasileiro.. Esse Banco de Dados é um simples Arquivo do tipo INI, que é compilado como resource e adicionado ao componente... Clique aqui para ver o layout do Banco de Dados no Formato INI, observe os comentários no inicio do arquivo, com algumas instruções de como inserir novos equipamentos nele. Se você distribuir o arquivo ACBrUSBID.ini, na mesma pasta do Executável da sua aplicação, a classe TACBrUSBIDDataBase fará uso desse arquivo, ao invéz de usar o resource interno... Isso pode ser muito útil para atualizar a lista de Dispositivos conhecidos, sem necessitar compilar uma nova versão do programa, apenas atualizando o ACBrUSBID.ini Como posso listar os equipamentos identificados pelo ACBr ? Use a Força, leia os fontes... Vamos ver trechos de código, do Demo PosPrinterTeste {$IfDef MSWINDOWS} // Os métodos abaixo, somente estão disponíveis para compilação em Windows // Carrega a lista de Impressoras detectadas em: ACBrPosPrinter1.Device.WinUSB.DeviceList ACBrPosPrinter1.Device.WinUSB.FindUSBPrinters(); // Varre a lista de Impressoras USB detectadas, e adiciona as mesmas, nas opções de Porta for K := 0 to ACBrPosPrinter1.Device.WinUSB.DeviceList.Count-1 do cbxPorta.Items.Add('USB:'+ACBrPosPrinter1.Device.WinUSB.DeviceList.Items[K].DeviceName); {$EndIf} Como o ACBr nomeia os dispositivos ? O "DeviceName" será calculado, de acordo com as informações disponíveis no banco de Dados... Primeiro o ACBr usa a API do Windows para captura informações do VID (Vendor ID ou Fabricante) e o PID (Product ID ou Modelo), dos Equipamentos listados... Se o ACBr falhar nessa tarefa, o equipamento será ignorado (não será listado) Se for capturado com sucesso a descrição em FriendlyName, então ela será usada.. Caso contrário, o ACBr tentará compor o nome, baseado no VID e PID Se o VID do Fabricante for encontrado na sessão [Vendors] de ACBrUSBID.ini, então o VID será substituído pela Descrição do Fabricante... Observe que na sessão [Vendors], temos vários fabricantes que não são conhecidos no mercado Brasileiro, mas são de equipamentos OEM, de Empresas nacionais... Nós procuramos manter o nome Original do Fabricante, de acordo com a tabelas de VID da OSB.ORG Se o VID não tiver equivalência na relação de [Vendors] de ACBrUSBID.ini, então ele será listado com o próprio número VID, que são 4 algarismos em Hexadecimal... Exemplo: "0b1b" Procuramos pelo PID do Equipamento, na sessão específica do Fabricante. Se não houver uma chave com o PID, então o ACBr usará o próprio número PID, para Nomear o Modelo. O PID também é composto do 4 algarismos em Hexadecimal... Exemplo: "0001" Se encontrar uma entrada com o PID, dentro da sessão do Fabricante, então o ACBr usará a Descrição do Modelo, e poderá desprezar a descrição do Fabricante, se a Descrição do modelo possuir uma vírgula, Exemplo: 7008=Elgin, I9;1;1... Nesse caso será desprezada a descrição do Fabricante "20d1-Dascom" e será usada apenas a descrição do Modelo, "Elgin, I9". Detecção automática de Porta e Protocolo Como agora temos um Banco de Dados, que informa além da Descrição do equipamento, qual é o Tipo do mesmo e qual o protocolo que ele usa, então os componentes ACBrPosPrinter e ACBrETQ, podem fazer uso dessas informações... Ou seja, se o equipamento for detectado com sucesso, no momento da Ativação da Porta (durante a chamada ao método "Ativar"), será usado o Protocolo Definido no Banco de Dados. Se for detectado que o equipamento USB é na verdade uma porta COM virtual, então o ACBr irá preferir fazer uso da Porta COM virtual, chaveando para mesma, de forma transparente... Pois dessa forma ele tem um melhor suporte a leitura de informações do equipamento. Se for detectado que a porta USB possui um equipamento incompatível com o componente em questão, isso também será alertado... Exemplo, você tentar conectar em uma porta 'USB:Zebra, GC420t' no componente TACBrPosPrinter, então um erro será emitido, pois esse equipamento não é uma impressora de Bobinas Como a mágica funciona ? Reparem que foi adicionado ao repositório a Unit ACBrWinUSBDevice.pas, essa Unit implementa chamadas a SetupAPI do Windows, para detectar os Dispositivos USB que estão listados em uma determinada Classe de Equipamentos (Class GUID)... O estudo desse artigo, foi fundamental, para a criação dessa Unit. Uma vez capturada o nome da Interface do Equipamento USB (em TACBrUSBWinDevice.DeviceInterface), podemos acessá-lo usando funções de manipulação Arquivos da API do Windows, como: CreateFile, WriteFile, ReadFile. Nem todos os dispositivos USB implementam suporte aos métodos ReadFile ou WriteFile... ou seja, pode não funcionar em alguns dispositivos.. Se você souber qual é o nome da Interface USB do equipamento, poderá informar ela diretamente na propriedade "Porta" dos componentes... Exemplo: ACBrPosPrinter1.Porta := '\\?\usb#vid_1c8a&pid_3002#0000000000022#{28d78fad-5a12-11d1-ae5b-0000f803a8c2}'; Para dúvidas, suporte ou correções, por favor crie um novo tópico, clicando aqui Para testar, baixe uma nova versão do PosPrinterTeste.exe

Boa tarde, Um de meus clientes resolveu por conta propria colocar mais um digito no codigo de barras por conta propria ficando o codigo com 14 digitos (ele criou tipo kits de promoção com varios produtos ) ai na hora de imprimir a etiqueta o codigo de barras numerico esta saindo errado no final quando é com 14 digitos. Com 13 sai certinho estou usando o a codificação abaixo ImprimirBarras(orNormal, barEAN13, 2, 2, 16, 5, EdtCodBarra.text, 8, becSIM); Ex de como ele fez : codigo normal de 13 digitos 7896755443215 e o que ele criou com 14 digitos ele acrescentou um 9 ficando assim 97896755443215 ai esse de 14 na hora que imprime a etiqueta sai mais ou menos assim 97896755443587 mudando os ultimos digitos. tem como resolver essa questão para a etiqueta sair com a codigo numerico com 14 correto ?????

Bom dia. Criei no sistema uma impressão de etiquetas usando ACBrETQ na ELGIN L42PRO. Em produção, já no computador do cliente está acontecendo de alguns números serem impressos com desenho falhado (impressão em anexo). Não estou afirmando que é um problema do componente. Apenas busco uma solução pois é algo incomum. Anexei uma foto para facilitar entendimento.

ACBrLibETQ Visulizar Arquivo ACBrLibETQ - Biblioteca para impressão de Etiquetas Faça Download pelo SVN, dos Demos de uso da ACBrLibETQ em diversas linguagens, usando o endereço: http://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/ Manual On-Line: https://acbr.sourceforge.io/ACBrLib/ACBrLib.html Autor Daniel Simoes Enviado 08-09-2019 Categoria ACBrLib - PRO  

Sr(s)e Sra(s), Boa tarde. Estou com problema para imprimir etiqueta usando ACBREtq junto com a ELGIN L42 Pro. Peguei o exemplo que está no help do acbr, utilizando xHarbour + minigui, já uso para emissão de NF-e, CF-e e MDF-e. No exemplo que segue abaixo faz o avanço correto das etiquetas mas não imprime: delete file("c:\monitor\temp.txt") set defa to "c:\monitor" set printer to temp.txt set print on set console off ? 'ETQ.SetLimparMemoria("True")' ? 'ETQ.Ativar()' ? 'ETQ.IniciarEtiqueta()' ? 'ETQ.ImprimirTexto( 0, 2, 2, 2, 3 , 3 , "BISCOITO MARILAN RECH 335G")' ? 'ETQ.ImprimirTexto( 0, 2, 2, 1, 8, 3, "CHOC BRANCO")' ? 'ETQ.Imprimir( "1", "0" )' ? 'ETQ.FinalizarEtiqueta()' ? 'ETQ.Desativar()' set print off set printer to set console on set cursor on set defa to delete file("c:\monitor\sai.txt") delete file("c:\monitor\ent.txt") SET SAFETY OFF INKEY(1) && era inkey(5) COPY FILE C:\monitor\TEMP.TXT TO C:\Monitor\ENT.TXT nConta := 0 while !file("c:\monitor\sai.txt") ++nConta if nConta == 190000 .and. !file("c:\monitor\sai.txt") if msgyesno('Nfe sem resposta !!! Tenta de Novo <S/N> ?','Tentar de novo') nConta := 0 else exit endif endif inkey(1) enddo if !file("c:\monitor\sai.txt") msgexclamation('Erro ao Imprimir Etiqueta !!!','Atenção') endif No arquivo LOG traz a resposta: 20/08/2019 16:04:25 - ETQ.SetLimparMemoria("True") 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.Ativar() 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.IniciarEtiqueta() 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.ImprimirTexto( 0, 2, 2, 2, 3 , 3 , "BISCOITO MARILAN RECH 335G") 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.ImprimirTexto( 0, 2, 2, 1, 8, 3, "CHOC BRANCO") 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.Imprimir( "1", "0" ) 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.FinalizarEtiqueta() 20/08/2019 16:04:25 - OK: 20/08/2019 16:04:25 - ETQ.Desativar() 20/08/2019 16:04:25 - OK: Dando a entender que está correto. A configuração do AcbrMonitorPlus está da seguinte maneira: Não encontrei o problema. Agradeço a 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

Bom dia! Estou usando a impressora Argox OS-2014 pela porta lpt1, não tem entrada usb. Não está imprimindo caracter especial (ç, acentuação), já utilizo o aplicativo para outras etiquetas que não precisavam desses caracteres. Tem alguma maneira de mudar a fonte? Grato Guilherme

Sobre problemas da Impressora Argox, não Imprimir com o Aplicativo ACBRETQ Eu tenho uma Impressora Argox OS-214 plus, já Resetei ela e Calibrei também e nada de Imprimir pelo aplicativo ACBRETQ... e pelo Word ou pelo Bloco de Notas Imprime sem Problemas... Já Compartilhei e até já fiz um NET USE pelo Dos e nada... Meu Cabo é um USB nas duas pontas... se eu Comprar um Cabo Serial/USB será que pode adiantar? Com o Aplicativo ACBRETQ, a Impressão para um arquivo TXT vai sem problemas, mas para outras portas não... até pensei em Imprimir direto em PDF e mandar este PDF para Impressora, mas também não consigo imprimir direto em PDF... O que mais posso testar? O Que sugerem? Roberto Krug

Boa tarde, Pessoal estou precisando de um help, pois eu consegui configurar o ACBREtq para emitir etiquetas na impressora Zebra DA402, ZPL2, porém preciso colocar uma logo (imagem) na etiqueta e estou testando de varias formas no DEMO e já joguei também na minha aplicação mas não consigo, tentei até com a logo que tem no demo para ver se não tinha convertido errado, mas tá em formato bmp, monocromatico como é exigido. estou anexando a imagem e o log. imagem.pcx Untitled-1.bmp etq1.txt

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.

Bom dia. Estou tentando imprimir uma imagem no demo do ACBrEtq mas não estou conseguindo. A etiqueta sai em branco. Tentei com a imagem pcx e a imagem bmp do demo e nada... Minha impressora é uma Elgin L-42, estou trabalhando com o modelo PPLB. Alguém já usou essa impressora e teve problemas? Vi vários outras postagens aqui no fórum sobre problemas com impressão de imagem na etiqueta, mas nenhuma solução proposta resolveu meu problema. Obs: através do software do fabricante consigo imprimir imagens normalmente. Testei uma no formato bmp e deu certo. De acordo com o manual, a impressora suporta os formatos HEX, PCX, BMP e IMG.

Boa tarde, gostaria de saber como funciona o ACBrEQT. Notei que existem duas funções do ImprimirTexto. ImprimirTexto(orNormal, 2, 2, 2, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True); ImprimirTexto(orNormal, '1', 2, 2, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True); Uma delas o imprimir texto o tipo Fonte é String, e o outro é Integer. Qual a diferença entre os dois? Consegue me explicar como funciona os MultiplicadoH, MultiplicadorV, Vertical, Horizontal, pra que servem? Qual as medidas utilizadas?