Compañeros, en breve tendré un aplicativo terminado que deberá contemplar cualquier posibilidad con impresoras de tickets
Para la impresión utilizo la clase TDOSPRN y las posibilidades son:
1) Impresora de ticket conectada al puerto LPT1, LPT2, COM1, COM2
Sería una opción facil:
2) Impresora de ticket conectada al puerto USB
a) que la impresora esté compartida en RED
¿La variable vRuta se podría depurar con vRuta:=GetPrintDefault( GetActiveWindow() )
b) NO compartida en RED
¿ El código sería el mismo que en la opción anterior ?
A la espera de respuestas, saluda
LORENZO Fdez.
Cádiz, España
Para la impresión utilizo la clase TDOSPRN y las posibilidades son:
1) Impresora de ticket conectada al puerto LPT1, LPT2, COM1, COM2
Sería una opción facil:
oPrn:=TDosPrn():New("puerto_elegido")
oPrn:say(1,1,'empenzando a imprimir...')
...2) Impresora de ticket conectada al puerto USB
a) que la impresora esté compartida en RED
vRuta:=alltrim("\\rutaPC\nombreImpresora")
vPath:=NETREDIR( "LPT1",vRuta)
IF vPath=.T.
WINEXEC('NET USE LPT1: &vRuta',0)
MSGINFO("YA PUEDO IMPRIMIR CON LA TDOSPRN EN RED")
oPrn:=TDosPrn():New('LPT1')
oPrn:say(1,1,'empenzando a imprimir...')
...
ENDIF¿La variable vRuta se podría depurar con vRuta:=GetPrintDefault( GetActiveWindow() )
b) NO compartida en RED
¿ El código sería el mismo que en la opción anterior ?
A la espera de respuestas, saluda
LORENZO Fdez.
Cádiz, España
