Emular un puerto LPT1 en Windows en un equipo sin puerto paralelo

Hola,

hace pocos días tuve que revisar una vieja aplicación en Delphi 7 que imprime tickets en una impresora conectada al puerto paralelo (LTP1).El problema era que lo hacía desde mi portátil que no tiene puerto paralelo y la aplicación fallaba al iniciarse ya que intenta abrir el puerto para comprobar si esta ok.

Para resolver el problema tuve que emular un puerto paralelo en el portátil conectando una impresora en red. Eso se hace mediante el comando

net  use  lpt1: \\equipo\impresora_compartida /persistent:yes

Con la opción persistent:yes hacemos que la impresora esté disponible en el siguiente reinicio del equipo.En mi caso lo que hize fue compartir la impresora virtual de pdf de otro equipo en red y conectarla contra mi portátil, así todo lo que imprimia creaba un pdf en el equipo remoto. También podemos usar nuestro propio equipo si en equipo usamos nuestra ip.

Si no vais usarla siempre, podeis crear un script

@echo off

net  use  lpt1: \\equipo\impresora_compartida

exit

Si queremos eliminarla sol otenemos que ejecutar el comando

net use /delete lpt1