Page 1 of 1
TPrinter
Posted: Mon Nov 21, 2005 5:27 pm
by AngelSalom
Hola foro. Me estoy volviendo gilipollas o es que ya no se usar el objeto TPrinter ... me explico
Function Prueba()
Local oPrn, oFont
PRINT oPrn PREVIEW
PAGE
DEFINE FONT oFont NAME "Courier New" SIZE 0,-12 OF oPrn
oPrn:cmSay (1,1,"HOLA MACARENA",oFont)
oFont:End()
ENDPAGE
ENDPRINT
Return (nil)
... pues esto me imprime el HOLA MACARENA pero super-comprimido y unas letras encima de otras.
He probado combinaciones con el SIZE pero nada.
¿¿¿¿ que ocurre ????
Gracias.
Posted: Mon Nov 21, 2005 6:08 pm
by AngelSalom
No hace falta mirar nada.
El problema era del easypreview que por lo visto no se adapta bien al harbour+fwh (supongo que será por las emf).
El printer si PREVIEW va perfecto.
Posted: Mon Nov 21, 2005 6:09 pm
by Julio Cepeda
Yo he tenido los mismos problemas con impresoras HP de las nuevas, y además me sacaba varias páginas sin saber por que.
La impresora estaba conectada por USB, ( que supongo que no tendrá nada que ver ).
Me entretuve poco a poco comentando líneas de código y cambiando cosas hasta que lo arreglé como pude.
Un saludo.
Ayuda para checar estado de impresora Laser
Posted: Tue Apr 24, 2012 4:55 pm
by Yessica
Que comando usar para saber que la impresora lasser que esta por default esta en linea ? ya que si no esta lista manda un error y me saca de la aplicacion.
Ojala y me puedan ayudar con esto.
Gracias Yessi.
Fivewin 2,4 xharbour
Julio Cepeda wrote:Yo he tenido los mismos problemas con impresoras HP de las nuevas, y además me sacaba varias páginas sin saber por que.
La impresora estaba conectada por USB, ( que supongo que no tendrá nada que ver ).
Me entretuve poco a poco comentando líneas de código y cambiando cosas hasta que lo arreglé como pude.
Un saludo.
Re: TPrinter
Posted: Tue Apr 24, 2012 8:47 pm
by horacio
No lo he probado pero se me ocurre que definas la fuente antes de generar la página. Yo nunca he tenido problemas con las fuentes pero siempre las defino antes de crear la página. Espero te sirva. Saludos
Re: TPrinter
Posted: Wed Apr 25, 2012 3:46 am
by jll-fwh
Yessica:
Code: Select all
aPrinters := aGetPrinters() // ARRAY que contiene las impresoras instaladas
cPrinter := PrnGetName() // Impresora por Defecto
Un saludo
JLL
Re: TPrinter
Posted: Wed Apr 25, 2012 8:56 pm
by Yessica
Mi Estimado JLL:
Agradezco tu informacion, pero sabes no precisamente es saber que impresoras estan instaladas, si no mas bien como saber que esa impresora que seleccionan esta en linea, antes de mandar a imprimir, puesto que si no esta lista la impresora, pues la aplicacacion se cae porque manda un error. Me explique?
Espero me puedas ayudar de antemano gracias.
Yessi.
jll-fwh wrote:Yessica:
Code: Select all
aPrinters := aGetPrinters() // ARRAY que contiene las impresoras instaladas
cPrinter := PrnGetName() // Impresora por Defecto
Un saludo
JLL