Page 1 of 1

Una Impresion desde aplicaciòn de Consola (D.O.S)

Posted: Fri Apr 23, 2010 1:56 am
by danielmaximiliano
Hola a Todos:
desde mi aplicaciòn de consola antes dirigia la impresora hacia un fichero Impresion:= "cobros.txt"
Set Printer TO &impresion

al terminar la impresion o/u hoja Set Printer TO
EXECUTE file impresion

se abre el notepad con el fichero en cuestion y ahi elegia que impresora usar de esa forma los problemas de impresion que tardaban mucho en Xp.
ahora intento usar cPrinter := GetPrinter()
cuando ejecuto la aplicacion me da error "Main Window Not DEfined"
tengo que guardar la impresora en un array y despues elegirlas mediante un Achoice? o hay alguna manera mas simple
les recuerdo que mi aplicacion es de consola y tengo definida la configuracion del proyecto Console Mode : .T.
Gracias de Antemano

Re: Una Impresion desde aplicaciòn de Consola (D.O.S)

Posted: Fri Apr 23, 2010 5:18 am
by mol
You must create your own GetPrinter function.
You can use GetPrinterList to obtain array of installed printer, or simply, use GetDefaultPrinter to print on default printer.
PrintRaw() function can be used for placing file to printer queue...

Re: Una Impresion desde aplicaciòn de Consola (D.O.S)

Posted: Fri Apr 23, 2010 7:33 pm
by mustafa
Hello danielmaximiliano
Mirate this routine that speaks of Notepad, you can have if interested.
*-----------------------*
Hola danielmaximiliano
Mirate esta rutina que habla de Notepad ,haber si te puede interesar.
Saludos
Mustafa

Re: Una Impresion desde aplicaciòn de Consola (D.O.S)

Posted: Sun Apr 25, 2010 5:50 am
by byrpa
Hola, para empezar es cPrinter:=Getprinters() que es nativo de harbour, abajo te pongo un link en donde hay una rutina completa de impresion, ademas puedes usar:

set printer to (GetDefaultPrinter())

y Listo, ademas en modo consola.

Harbour Vive.

http://harbour.foroslatinos.net/impreso ... on-t60.htm