Page 1 of 1

COLAS DE IMPRESION

Posted: Mon Jun 08, 2015 3:28 pm
by ozono1981
Estimados!!

Junto con saludarles, les comento que tengo un problema y ojala me puedan orientar.
Actualmente trabajo con la tDosPrn y la TXTPREV para imprimir unos ticket en mi Software pero actualmente tengo impresoras térmicas y quisiera saber que me recomiendan para poder manejarlas.. Sigo con lo que viene por defecto o hay algo mas para poder manejar las impresoras en una cola de impresión?

DESDE YA MUCHAS GRACIAS MUCHACHOS!!!

Re: COLAS DE IMPRESION

Posted: Mon Jun 08, 2015 3:39 pm
by karinha

Code: Select all

USB com TDOSPRN.PRG


Enla cabecera de mi rutina de impresión hice esto:

cPorta := PrnGetPort()

cPrinter := PrinterPortToName( cPorta )

if empty(cPrinter)
   cPrinter := PrinterPortToName( "USB002" )
   if empty(cPrinter)
      cPrinter := PrinterPortToName( "USB001" )
   endif
endif
 

Despues empiezo la impresión, preo creando un archivo:


oPrin := TDosPrn():New("minuta.txt")
oPrin:StartPage()
...
...
 

Y en el fin de la rutina hago esto:


...
...
oPrin:EndPage()
oPrin:End()


PrintFileRaw( cPrinter, TrueName("MINUTA.TXT"), "Impresion de Ventas" )
 

Re: COLAS DE IMPRESION

Posted: Wed Jun 10, 2015 5:31 pm
by ozono1981
Muchas Gracias Estimado!!!

Lo voy a probar y te comento.

Saludos!!!