secuencias de escape de impresion por TPRINTER?

secuencias de escape de impresion por TPRINTER?

Postby alex_cyr » Wed Feb 27, 2008 1:51 am

que tal, con una pregunta que se me viene debido a que en una computadora aislada de un entorno de red no puedo capturar el puerto de impresion hacia mi impresora de "tickets" USB por medio de la TDOSPRN. el caso es que ya intente a traves de la Generic/Text de windows pero no logro que me funcionen la secuencias de escape para abrir cajon, cortar ticket, impresion en rojo, etc.

intente con la TPRINTER pero no logro nada a parte de la impresion...

si alguien me pueda orientar ya sea en como "burlar" la restriccion de windows de tener una conexion de red o bien un ejemplo de como enviar caracteres a la Generic/Text de windows, el sistema operativo es XP pro...

saludos y gracias de antemano
Alex.
alex_cyr
 
Posts: 77
Joined: Wed Jun 28, 2006 6:38 pm
Location: Chihuahua

Postby MauroArevalo » Wed Feb 27, 2008 7:21 pm

Alex:

Yo utilizo la Tdosprn y para imprimir en RED hice lo siguiente:

vRuta:="\\PCservidor\EPSON"

vPath:=NETREDIR( "LPT1",vRuta)

IF vPath=.T.
WINEXEC('NET USE LPT1: &vRuta',0)
MSGINFO("YA PUEDO IMPRIMIR CONLA TDOSPRN EN RED")
ENDIF

Cuando vi tu post, me dio por hacer estas pruebas sobre la tdosprn y me funciono, tienes que enlazar la libreria CT.LIB de Xharbour.

Faltaría optimizar la variable vRuta para no escribirla manual, cuando tenga tiempito seguire probando, espero te sirva en algo..

Saludos
Edgar Mauricio Arévalo Mogollón.
Bogotá DC. Colombia
FWH FTDN, xHarbour 1.2.1, Pelles C, Fivedit, Visual Studio Code, Borland 7.30, Mysql, Dbfs
http://www.hymplus.com http://www.hymlyma.com
Tratando de retomar la programación....
User avatar
MauroArevalo
 
Posts: 107
Joined: Thu Jan 19, 2006 11:47 pm
Location: Bogota DC. Colombia


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 77 guests