Imprimir en Impresora Epson TM U220D

[mtirado]

Entonces los parametros que le tendria que pasar al procedimiento del tramanno del papel seria 7500 y 7500.
Eso esta bien (en caso de que funcione claro).
Pero como es que le paso al canvas lo que deseo imprimir, en mi caso lo que debo hacer es canvas.textout(x,...), pero en que coordenada deberia empezar, como puedo jugar con las dimensiones del papel y el largo de la cadena que quiero imprimir??? No se si me entiendan?
Muchas gracias.

Empezado por marcoszorrilla

En tu ejemplo 75 x 75 sería: 7500 x 7500 ya que la medida es en mm por 1000

Un Saludo.

[marcoszorrilla]

Le tienes que pasar los parámetros que te indico, pero claro según colijo tu estás hablando de longitud variable del ticket por lo tanto la altura no la conoces de antemano, aunque supongo que al llegar a los 29,7 Cm. del A4, dará un salto.

Para ceñirnos a lo que dices sería preciso calcular la relación líneas de ticket ->cms. de esta manera antes de pasarle el tamaño lo calcularíamos.

Un Saludo.

[mtirado]

Ok, entiendo lo que dices, imagina que le paso un tamanno por defecto de largo, pero el tamanno de ancho si tiene que ser de 75 mm. Pero a la hora pasarle el texto al canvas que cooredenadas debor tomar? Esa es mi prgunta.
Gracias.

Empezado por marcoszorrilla

Le tienes que pasar los parámetros que te indico, pero claro según colijo tu estás hablando de longitud variable del ticket por lo tanto la altura no la conoces de antemano, aunque supongo que al llegar a los 29,7 Cm. del A4, dará un salto.

Para ceñirnos a lo que dices sería preciso calcular la relación líneas de ticket ->cms. de esta manera antes de pasarle el tamaño lo calcularíamos.

Un Saludo.

[marcoszorrilla]

Las coordenadasson desde lo márgenes superior e izquierdo del ticket, cuando llegas al final del ticket:

Printer.Canvas.NewPage;

así saltas a la siguiente página.
y las coordenadas vuelve a comenzar de nuevo por el principio.

Aquí te pego un fragmento de código que yo utilizo y funciona correctamente.

Código Delphi [-]
      While Not DmXX.LinAlba.Eof do
      begin
      nLin:=nLin + 1;
      
        if nLin > DmXX.ImpresoraLineasDetalle.Value then
        begin
        Printer.NewPage;
        nLin:=1;
        Imprimir_Cabecera(1);
        nSaltoLin:=DmPan.ImpresorafDetalle.Value;
        end;

      nSaltoLin:=nSaltoLin +  DmPan.ImpresoraSaltoFila.Value;
      Printer.Canvas.TextOut(DmPan.ImpresoraCProducto.Value , nSaltoLin, DmPan.LinAlbaProducto.Value);
      cNumText:=FormatFloat(',0.00',DmPan.LinAlbaCantidad.Value);
      Printer.Canvas.TextOut(DmPan.ImpresoraCdCantidad.Value   - Printer.Canvas.TextWidth(cNumText), nSaltoLin, cNumText);
        if DmPan.AlbaContado.Value = True then
        begin
        cNumText:=FormatFloat(',0.00',DmPan.LinAlbaPrecio.Value);
        Printer.Canvas.TextOut(DmPan.ImpresoraCdPrecio.Value - Printer.Canvas.TextWidth(cNumText), nSaltoLin, cNumText);
        cNumText:=FormatFloat(',0.00',DmPan.LinAlbaTotal.Value);
        Printer.Canvas.TextOut(DmPan.ImpresoraCdEuros.Value - Printer.Canvas.TextWidth(cNumText),nSaltoLin,cNumText );
        end;
      DmXX.LinAlba.Next;
      end;

Un Saludo.

Nota: Yo las coordenadas las guardo en una tabla, para así en un momento dado cambiar la ubicación de cualquiera de los objetos sin tener que tocar el código.