Problema raro con impresion TdosPrn()

Problema raro con impresion TdosPrn()

Postby ralph » Wed May 17, 2006 4:06 am

Amigos:

Dos clientes me han reportado un problema raro que solo aparece con mi aplicacion con FWH 2.7+xHb 0995.

Normalmente imprimo facturas sin problemas desde mi aplicacion al puerto LPT1 con una impresora local Epson LX300+ , pero desde que migre la aplicacion a xHb el puerto falla luego de imprimir 7 u 8 facturas.
Es como si el puerto se desactivara, ya no se puede enviar nada a imprimir ( solo en modo DOS, porque las aplicaciones windows imprimen normal)
Tengo que salir de la aplicacion y volver a entrar para poder seguir imprimiendo, y el problema se repite nuevamente.

Aqui es donde falla la aplicacion:

Code: Select all  Expand view  RUN
    ::cDevice := "LPT1:"
    .......
    if ( ::hDC := fCreate(::cDevice) ) < 0          // <----------Aqui falla
       ::nLastError := fError()
       MsgInfo( "Error [" + str(::nLastError) + "] : Impresion Cancelada"+;
                "No se pudo crear "+ ::cDevice, "Error" )
    endif


Con mi aplicacion en Clipper + FW no sucede este problema. La PC es un P4 con Windows 2000 Prof y 256MB de RAM.

A alguien le pasa lo mismo ?

Ralph
User avatar
ralph
 
Posts: 79
Joined: Fri Nov 18, 2005 11:15 pm
Location: Lima - PERU

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 38 guests