boa noite Daniel
estou com um problema parecido aqui tambem
eu ja tinha implementado para impressora zebra só nao lembro se era a TLP2844, porem estou conseguindo enviar para a impressora atraves do acbretiq, mas a descricao do produto enviado nao esta saindo na mesma linha toda vez que faz a impressao, ja tentei ver os parametros e resetei a impressora e continua, voce ja viu algo assim, sera que é a impressora ou alguma coisa no comanda sendo enviado que seria este:
procedure TFrm_Etiquetas.AtivarACBrETQ ;
begin
with ACBrETQ do
begin
DPI := dpi203;
Modelo := etqEpl2;
PORTA := Frm_login.sPortaEtiq;
LimparMemoria := ckMemoria.Checked ;
Temperatura := 10;
Avanco := 0;
Ativar ;
end ;
end ;
Ds_etiq.First;
while not Ds_etiq.Eof do
begin
v_codigo := PAnsiChar(Ds_etiqCODIGO.AsString);
v_descricao:= PAnsiChar(Ds_etiqDESCRICAO.AsString);
v_valor := PAnsiChar('$ '+formatCurr('###0.00',Strtocurr(Ds_etiqVALOR.AsString)));
v_data := PAnsiChar(Ds_etiqDATA.AsString);
v_empresa := PAnsiChar(Dm_BD.Ds_EmpresaFANTASIA.AsString);
Ds_etiq.Next;
AtivarACBrETQ;
with ACBrETQ do
begin
if Modelo = etqPpla then
begin
//55,345
//LINHA,COLUNA
ImprimirTexto(orNormal, 2, 1, 2, 180, 15, 'BISCOITO REC 335G');
ImprimirTexto(orNormal, 2, 1, 1, 140, 15, 'CHOC BRANCO');
ImprimirBarras(orNormal, 'F', '2', '2', 20, 10, '7896003701685', 70);
end else
begin
IniciarEtiqueta;
Imprimirtexto(orNormal, 2, 1, 1, 70, 140, 'ricardo teste');
ImprimirTexto(orNormal, 5, 1, 2, 15, 645, '1,99');
// ImprimirBarras(orNormal, '1C', '2', '2', 3, 82, v_codigo, 060, becNAO);
// ImprimirTexto(orNormal, 2, 1, 1, 2, 25, v_descricao);
FinalizarEtiqueta(1,0);
end;
Imprimir;
Desativar;
end;
end;
sera que tem algo errado? voce pode me dar uma luz
obrigado