FiveTech Software tech support forums

hola , yo lo hago de esta forma: PRINTER oPrn NAME "Guia Despacho" TO "nombre impresora conectada a LPT1"  // renombro la impresora EJ: IBMXL en windows   DEFINE FONT Fon1 NAME "Arial Narrow" SIZE 0,-12 OF oPrn   PAGE  ...

Toma en cuanta con que Windows de 32 bits, no controla al LPTx, Prueba asi: LOCAL oPrnIF !IsPrint("LPT1")        // sin los dos puntos RETURN nilENDIFoPrn := TDosPrn():New("LPT1")oPrn:StartPage()oPrn:say(10,10,"Prueba ...

... ayuda por favor utilizo la clase Tdosprn de fwh 14.12 con Harbour 3.2, pero no me manda la impresión. Que podría ser? LOCAL oPrn IF !IsPrint("LPT1:") RETURN nil ENDIF oPrn := TDosPrn():New("LPT1") oPrn:StartPage() oPrn:say(10,10,"Prueba de Impresión") oPrn:EndPage() ...

Gracias João, pero sigue sin ser la solución.
Necesitaria la vieja funcion ISPRINTER() de clipper, que detectaba si la impresora estaba en linea en el puerto LPT1. Este o no instalada en Windows

Hola Karhina!
Segui el link que me enviaste, pero no tiene la referencia a las solución que busco, que basicamente es tener una función que valide que el puerto LPT1 tenga una impresora ONLINE, mas allá de que la misma esté instalada o no.
Gracias por tu tiempo.

Gracias por responder Karinha, pero no me funciona!
La impresora está lista en el puerto LPT1 pero la función que me pasaste siempre me devuelve el Status 4096.
La impresora no está instalada (de hecho no es necesario instalarla, porque imprime directo en LPT1)
Gracias igual

Estimados: Quiero controlar, antes de mandar a imprimir con TDosPrn a una tiqueadora Epson TM-U220 conectada al puerto LPT1, si la misma se encuentra ONLINE. Uso la función IsPrinter("LPT1") y la misma siempre me devuelve .f. Si utilizo la función IsPrinter(1), siempre me ...

Hola Juan, crea un archivo .bat y lo ejecutas con el WINEXEC, en el .bat puedes usar Copy Mensaje.txt :lpt1
Espero que te sirva de algo
Saludos

Emmort

Hi,

1. I need informations how much is FiveLinux compatible with FiveWin
2. What i need to migrate application from fivewin to fivelinux.
3. Is Managing printers easy ... example is it possiblo something like "copy test.txt lpt1:"

Best regards,

Alfredo Arteaga, Compila la aplicacion con xHarbour y Harbour. Casi se compila todo. Con minimas modificciones podras usar los compiladores que conocemos con FWH y podras usar PrintFileRaw( <cPrinterName>, ;              <cFileName>   , ; ...

Yo en estos casos siempre uso la solución de acuellar. Compartir la impresora y un NET USE. Funciona a las mil maravillas.

La idea de ACUELLAR es muy viable, asi lo hago con unas printer de un cliente pero a partir de LPT2 ya que el 1 es fisico y los demas son virtuales y funciona sin problema, a menos que compres el cable adaptador de LPT a USB, saludos...

Gracias familia!, seguiré sus sugerencias.

El cliente me visitará la siguiente semana con uno de sus equipos haré las pruebas y les comentaré que sucede.

Alfredo

Intenta asi:
- Compartir la impresora Ej: LX300
- Colocar en el C:\WINDOWS\SYSTEM32\autoexec.nt Net use LPT1: \\NOMBRE DE PC\LX300 /persistent:yes //Para que la active al iniciar
- En un .BAT poner COPY %1 LPT1 el cual ejecutar desde el programa

Saludos,

Adhemar

Hola:
PrtWin de http://www.araisa.com funciona muy bien.

Saludos.

Ricardo Patón