En primera instancia, intente con un reporte y quedo bien pero configurando al tamaño exacto de la etiqueta, me tira un error la impresora (se cuelga con luz roja).
Voy a tomar el otro camino, que es configurar en el lenguaje de la impresora (EPL).
(esto seria armar un txt con los datos necesarios y mandar a imprimir).
strHora, strFecha,cadena : string; txt: TextFile; L,Q1,A,A1,B,C,D,E:String ; Begin L:=chr(13)+Chr(10); Q1:='q500'+L; A1:='A220,10,0,1,1,1,N,"PRODUCTO :"'+'"'+JfEdit1.Value+'"'+L ; B:='B220,30,0,E30,2,20,100,B,'+'"'+JfEdit3.Value+'"'+L ; C:='A440,50,0,3,1,1,N,"P.V.P"'+L; D:='A440,70,0,3,1,1,N,'+'"'+FormatFloat('0.00',JfEdit2.Value)+'"'+L; E:='A210,20,1,1,1,1,N,'+'"'+DateToStr(date)+'"'+L; AssignFile(Txt, 'LPT1'); Rewrite(Txt); for X:= 1 TO JfEdit4.Value DO Writeln(Txt, L+'N'+L+'O'+L+'S2'+L+'D7'+L+'ZT'+L+'Q250,10'+Q1+A+A1+B+C+D+E+'P1'); CloseFile(Txt); End ;
encontré ese código y a simple vista, tengo que cambiar el tema del puerto.
¿alguien imprimió de esta manera?
gracias!