Ricardo - UltraSeven

bom dia daniel por favor estou tentando resolver um problema com o mesmo componente minha etiqueta é para bijouteria ou seja ela e pequena, eu ja consegui fazer a impressao, porem se solicitar uma etiqueta ou duas entre uma e outra acaba saindo uma etiqueta em branco eu ja tentei varias coisa e nao coisas e nao consegui e estou precisando com muita URGENCIA e ja te enviei um post ontem mas nao resolveu, voce tem alguma ideia onde o componente faz esse avanco pois ja tentei de tudo e nao consigo resolver

Com o demo funciona mas com a minha rotina nao onde será meu erro

bom dia amigos novo aqui no projetoacbr e gostaria de parabelinzar pelo trabalho que voces vem fazendo. mas gostaria de aproveitar o topico e pedir ajudar com URGENCIA, estou trabalhando com impressora ZEBRA TL2844 e depois de muito tempo e custo consegui fazer a comunicacao e a impressao da etiqueta atraves do componente acbr, porem ainda estou com um problema que nao envio a impressao de dois produtos ela imprime uma etiqueta e da salto de outra em branco, ja tentei verificar o driver da impressora e a rotina de programacao e ate agora nada, o pior que fiquei de entregar a impressora e as etiquetas na semana passada alguem consegue me dar uma luz segue minha rotina: Ds_etiq.First; while not Ds_etiq.Eof do begin cod:= PAnsiChar(Ds_etiqCODIGO.AsString); descricao:=PAnsiChar(copy(Ds_etiqDESCRICAO.AsString,1,18)); valor:= PAnsiChar('$ '+formatCurr('###0.00',Strtocurr(Ds_etiqVALOR.AsString))); AtivarACBrETQ; with ACBrETQ do begin if Modelo = etqEpl2 then begin ImprimirBarras(orNormal, '1C', '2', '2', 125, 75, COD, 60, becPadrao); // saiu e deu leitura para 10 digitos ImprimirTexto(orNormal, 2, 1, 2, 155, 345, VALOR); ImprimirTexto(orNormal, 2, 1, 1, 190, 155, cod); end; Imprimir; Ds_etiq.Next; end; cod:=''; descricao:=''; valor:=''; qtde:=''; end; ACBrETQ.Desativar; SHOWMESSAGE('FIM DA IMPRESSÃO'); end; e tambem a procedure da etiqacbr procedure TEtiq_Argox.AtivarACBrETQ ; begin with ACBrETQ do begin DPI := dpi203; Modelo := etqEpl2; Porta := Frm_login.sPortaEtiq; LimparMemoria := ckMemoria.Checked ; Temperatura := 10; Ativar ; end ; end ; por favor alguem pode ajudar, OBRIGADO