topic-30858

Board index FiveWin para Harbour/xHarbour COLAS DE IMPRESION

ozono1981

Posts: 39

Joined: Tue Mar 26, 2013 02:09 PM

COLAS DE IMPRESION
Posted: Mon Jun 08, 2015 03:28 PM

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!!!

karinha

Posts: 8523

Joined: Tue Dec 20, 2005 07:36 PM

Re: COLAS DE IMPRESION
Posted: Mon Jun 08, 2015 03:39 PM

Code (fw): Select all Collapse

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" )

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

ozono1981

Posts: 39

Joined: Tue Mar 26, 2013 02:09 PM

Re: COLAS DE IMPRESION
Posted: Wed Jun 10, 2015 05:31 PM

Muchas Gracias Estimado!!!

Lo voy a probar y te comento.

Saludos!!!

FiveTech Support Forums

Continue the discussion