problemas impresion en laser

[diegopolverelli]

Hola. Tengo un programa donde hago un grafico con GRAPH, y luego trato de imprimirlo con: odlg:print() o con odlg:hardcopy(3)
si la impresora por defecto es una deskjet, funciona, pero si la impresora es una laser, imprime una hoja en blanco. ¿alguna idea de que puede ser?
Gracias. Atte.

[karinha]

INTENTE DESINSTALAR Y REINSTALAR EL DRIVE DE LA IMPRESORA. PUEDE SEER ESTO.

MIRA TAMBIÉN SE NO TIENE UN LOOPING EN EL RELATORIO SIN EL SYSREFRESH()

Saludos.

[diegopolverelli]

hola. reinstale y sigue funcionando mal; me imprime la pagina en blanco; y probe el mismo programa con otras 2 laser diferentes, y en todas se da el mismo sintoma; con deskjet, funciona, pero no con laser. Si alguien sabe que puede ser. Gracias. Atte.

[karinha]

hola. reinstale y sigue funcionando mal; me imprime la pagina en blanco; y probe el mismo programa con otras 2 laser diferentes, y en todas se da el mismo sintoma; con deskjet, funciona, pero no con laser. Si alguien sabe que puede ser. Gracias. Atte.

PUEDE SEER QUE TENGAS QUE ATUALIZAR EL DRIVE DE LA IMPRESORA.

OTRA: ESTAIS USANDO CMSAY() Ó CHARSAY()??

MEJOR CMSAY(). HAGA UN TESTE CON CMSAY().

Saludos.

[karinha]

Como Imprimir em Centimetros sem errar e em qualquer Impressora

Code: Select all

FUNCTION IMPRIME()

LOCAL ResColuna, ResLinha, oPrinter, oFont1

PRINTER oPrinter NAME "Teste de Impressão " PREVIEW
DEFINE FONT oFont1 NAME "Times" SIZE 0, -9 BOLD OF oPrinter
CursorWait()
oPrinter:SetLandScape()

rescoluna:=oPrinter:nlogpixelx()/2.54
reslinha:=oPrinter:nlogpixely()/2.54

PAGE

oPrinter:say(3*reslinha,5*rescoluna,"Teste de Impressão em Posição de Centímetros")

oPrinter:SayBitmap(5*resColuna,205*ResLinha,"logo.bmp",10*ResColuna,11*ResLi
nha,2 )

ENDPAGE
ENDPRINTER

[diegopolverelli]

Probe con eso, imprimiendo con un odlg:print(oprn,50,50,3.16), siendo oprn un objeto PRINT, y si imprimo seleccionando una impresora deskjet, sale bien, pero si imprimo en una laser, sale una hoja en blanco.