Buenas tardes.
Genero un archivo pdf con Tprinter , en mi impresora a tinta funciona bien pero donde un cliente
que tiene una matricial lx-300 el pdf se genera con todas las letras distorcionadas.
Alguna idea de que puede ser.
Muchas gracias
#Define PAD_LEFT 0
#Define PAD_RIGHT 1
#Define PAD_CENTER 2
FUNCTION..
LOCAL oPrn, ResLinha. ResColuna, nPagina, nFila, nColumDere
PRINT oPrn FILE cNombrePdf PREVIEW
DEFINE FONT oFont1 NAME "Courier New" SIZE 0, -12 OF oPrn
oPrn:SetPage( 9 ) ; oPrn:SetPortrait() //-> Vertical(Retrato)
// Como Imprimir em Centimetros sem errar e em qualquer Impressora
ResLinha := oPrn:nLogPixely()/2.54
ResColuna := oPrn:nLogPixelx()/2.54
nPagina := 1
PAGE // 1
// oPrn:CmSay( nFila, nColumDere,'AMBIENTE : '+cAmbiente , oFont1 )
// cambie asi y listo:
oPrn:Say( nFila * ResLinha, nColumDere * ResColuna, ;
+ "AMBIENTE : ", oFontRua, , CLR_BLACK, , PAD_CENTER )
nFila := nFila += 0.50
nColumDere := 6.20
oPrn:Say( nFila * ResLinha, nColumDere * ResColuna, ;
+ cAmbiente, oFont1, , CLR_BLACK, , PAD_CENTER )
... // continue...
RETURN NIL
// FIN / END
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Google [Bot] and 46 guests