FiveTech Support Forums

Muy buenas Foro, voy directamente al grano, tengo un programa de facturación y necesito para las impresoras matriciales cambiar el Tamaño del papel que tiene asignada esa impresora, es decir, cada vez que inicio el programa e imprimo una factura tengo que elegir manualmente el Tamaño de papel en preferencias de impresion de la impresora, si me salgo del programa y vuelvo a entrar se cambia dicho Tamaño de papel a A4 y tengo que cambiarlo otra vez manual, y me gustaría poder elegir por CODIGO el tamaño de papel para así no tener que elegirlo manualmente, ¿tenéis algo de esto por ahí?

Un Saludo.

Softruz, prueba con esto. (TPRINTER)

local nAnchPapel := val(getPvProfString( "Coord", "AnchPapel" , "2100" , cIniFile ) )
local nAltoPapel := val(getPvProfString( "Coord", "AltoPapel" , "2790" , cIniFile ) )

PrnSetSize( nAnchPapel, nAltoPapel )

PRINT oPrn NAME "Factura"  
  oPrn:SetPortrait()
  DEFINE FONT oFont NAME "Arial" SIZE 0, -10 OF oPrn
  nRowStep := oPrn:nVertRes() / nLinHoja  //60    // LINEAS
  nColStep := oPrn:nHorzRes() / 70    // COLUMNAS

Saludos

Lo podés hacer con la codificación de tu programa fijate en el manual de tu impresora, nosotros con epson lx-300 utilizo el siguiente comando

oPrn:=TDosPrn():New(cImpdos)
oPrn:command("27,67,51") el 51 es el que da el largo del corte de la factura (en este caso son 21cm) no recuerdo como lo calcule pero vas probando, lo uso para remitos y facturas y cuando usas otro papel va por defecto el de la impresora
Creo que lo que hice fue multiplicar los cm del largo del remito lo multiplique x 2.54 (pulgadas) y fui ajustando

Luis