Bom dia pessoal tenho um programa de controle de eventos que vendi pra um cliente meu que imprimia codigos de barra atraves do report builder ai eles compraram uma impressora argox 214tt para imprimir os codigos de barras mais nao estou sabendo configurar ela vejam só o componente acbr tem um demo de impressao ppla que imprime normal na impressora ai tentei imprementar no meu sistema mais nao deu certo o codigo é esse
esse é do exemplo do acbr procedure TFPrincipal.bEtqSimplesClick(Sender: TObject); begin with ACBrETQ do begin Modelo := TACBrETQModelo(cbModelo.ItemIndex); Porta := cbPorta.Text; Ativar; ImprimirTexto(orNormal, 2, '2', '2', 190, 5, 'BISCOITO MARILAN RECH 335G'); ImprimirTexto(orNormal, 2, '2', '1', 158, 5, 'CHOC BRANCO'); ImprimirBarras(orNormal, 'F', '2', '2', 32, 0, '7896003701685', 90); ImprimirTexto(orNormal, 3, '3', '2', 15, 300, 'R$'); ImprimirTexto(orNormal, 3, '4', '4', 15, 450, '20.59'); Imprimir(StrToInt(eCopias.Text), StrToInt(eAvanco.Text)); Desativar; end; end; esse é o meu codigo , as linhas em azul foi onde alterei, na impressao sai o nome mais nao sai o codigo de barras alguem teria uma ideia do que pode esta acontencendo desde ja agradeço a aiuda de todos procedure TFrmEtiquetas.Button1Click(Sender: TObject); begin with ACBrETQ do begin Modelo := TACBrETQModelo(cbModelo.ItemIndex); Porta := cbPorta.Text; Ativar; ImprimirTexto(orNormal, 2, '2', '1', 158, 5, dm.ADOPartCracha.Value); ImprimirBarras(orNormal, 'F', '2', '2', 32, 0, dm.ADOPartCodBarra.value, 90); Imprimir(StrToInt(eCopias.Text), StrToInt(eAvanco.Text)); Desativar; end; end ; [As partes desta mensagem que não continham texto foram removidas]