Pregunta: | 2619 - IMPRESION WINDOWS-MSDOS |
Autor: | Carlos Vega |
Como puedo hacer que un programa realizado en clipper se pueda imprimir bajowindows. Actualmente no puedo imprimir nada, tan solo sale por la impresora una pagina en blanco pero de informe nada. Gracias |
Respuesta: | Gerardo A. Mendoza |
Debes configurar tu impresora (en propiedades) verifica que detalles en configuración del puerto tengas seleccionada la opcion de impresion en cola de MS-DOS y que esté apuntando al puerto en el que quieres imprimir. Uso una rutina así como esta para controlar la impresíon. Procedure Impresion(lModo,nMargen,cLPTNo) Local nImpresora := 1 Static cDirTemp If lModo cDirTemp := Set(_DIRECTORIO, "C:\") Set Printer to (cLPTNo) Set Device to Printer Set Margin to nMargen Else Set Printer to Set Device to Screen Set( _DIRECTORIO, (cDirTemp) ) EndIf Por ejemplo: ... Impresion(.t., 5, "LPT1") // activo el puerto @ nFila, 0 Say " .... " ... Eject Impresion(.f.) // fin impresion |