CRIAR ETIQUETA COM QRCODE

[igmaster2000]

Boa tarde, alguem sabe como criar etiquetas com Qrcod e codigo de barras juntos na mesma etiqueta.

[Daniel Simoes]

o componente ACBrETQ, que comando para gerar QRCode..  Veja o Demo do ACBrETQ

[igmaster2000]

ok obrigado...

 

[[email protected]]

Bom dia, como imprimir qrcode + textos na mesma etiqueta, testei aqui, mas, fica saindo em etiquetas diferentes

[Daniel Simoes]

Isso é demonstrado no Projeto Demo do ACBrETQ... na pasta

ACBr\Exemplos\ACBrSerial\ACBrETQ\Delphi

[[email protected]]

Bom dia, 

Primeiramente muito obrigado pelo retorno, no demo só vi a opção de emitir qrcode, eu queria por o qrcode de lado e do outro as informações do produto

 

Desde já agradeço

[Juliomar Marchetti]

Acho que não vai ser possível. talvez montar uma imagem com o qrcode e texto e enviar pode ser que funcione

[[email protected]]

Boa tarde a todos, Juliomar, conseguir fazer impressão sem necessidade montar uma imagem, segue como fiz:

AtivarACBrETQ;
  with ACBrETQ do
  begin
    //ImprimirQRCode( 70, 25, 'Luciano Alves da Silva', 5);
    ImprimirTexto(orNormal, 2, 1, 1, 15, 37, 'COD: '+'1234567'+' BON '+FloatToStr(10));
    ImprimirTexto(orNormal, 2, 1, 1, 12, 37, 'REF: '+'RefPrd');
    ImprimirTexto(orNormal, 2, 1, 1, 09, 37, 'TAM: '+'TamPrd'+' LJ: 00');
    ImprimirTexto(orNormal, 2, 1, 1, 06, 37, 'COR: '+'CorPrd');
    ImprimirTexto(orNormal, 3, 1, 1, 01, 37, 'R$: '+FormatFloat('#,##0.00', 10000));
    ImprimirQRCode( 2, 27, '|CODIGO|TAMANHO|COR|DESCRICAO DO PRODUTO|100.00|500,00|', 4);

    FinalizarEtiqueta;
    ImprimirEtiquetaComCopiasEAvanco;
    Desativar;
  end;

Ficou show, agradeço  ao pessoal do ACBr

[Juliomar Marchetti]

Obrigado por reportar vai ficar de ajuda a quem precisar.

Parabéns usou a força e leu o código.

[Juliomar Marchetti]

Obrigado por reportar.

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