Impresion directo al puerto (en red)

[ctronx]

Saludos, ojala alguien pueda ayudarme con este gran reto.

Yo mando a imprimir directo al puerto de la siguiente manera:


AssignFile(impresora,'lpt1');
try
rewrite( impresora );
writeln(impresora, 'texto a imprimir');
finally
CloseFile( impresora );


funciona bien ya que son ticket de venta, pero resulta que necesito funcione en red y mandar a imprimir al puerto paralelo pero de otra maquina de la red y no necesariamente desde la maquina que manda a imprimir.

Es que conecte varias maquinas en red, pero solo una tiene impresora, como habia trabajado con una maquina no habia tenido problema con la impresion, pero ahora "Necesito mandarlo directo al puerto de otra maquina de la red".

Espero me puedan ayudar, y gracias de antemano.

[delphi.com.ar]

Puedes hacerlo igual que en un puerto local, si capturas el puerto de la impresora en red. Busca esta funcionalidad en la configuración de la impresora.

Saludos!

[ctronx]

Gracias y disculpa mi ignorancia pero no entiendo bien que debo de hacer, asi como estoy imprimiendo no tengo instalada ninguna impresora (pero uso una de matriz de punto) lo manda directo al puerto y funciona ahunque no este instalada ninguna impresora.

Lo que me dices es que tendria que estar instalada y compartida ó algo asi.
Me podrias explicar mejor "Por favor".

[marcoszorrilla]

Yo en Clipper redireccionaba las impresoras así:
Si usas la ruta de la impresora en la red te tiene que funcionar:

FUNCTION REDIRLPT()
IF NETNAME() = "PUESTO1" .OR. NETNAME() = "PUESTO2" .OR. NETNAME() ="DIRECCION"
SET PRINTER TO \\FACTURACION\epson\LPT1
END
RETURN(nil)


Un Saludo.

[ctronx]

Gracias, voy a probar redireccionandolo a la ruta completa de una impresora compartida en la red, a ver que pasa, y les informo el resultado.