PDF distorcionado con Tprinter en Matricial

[EASYSOFT]

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

[nageswaragunupudi]

With dot-matrix printers, please use simple text only

[EASYSOFT]

Buenos días

Gracias por la respuesta Mr. Rao disculpe el desconicimiento pero no entiendo

defino asi
PRINT oPrn FILE cNombrePdf PREVIEW

oPrn:CmSay( nFila, nColumDere,'AMBIENTE : '+cAmbiente , oFont1 )


Muchas gracias

[Enrico Maria Giordano]

It could be a problem with the printer driver, if it is too old.

[nageswaragunupudi]

We need to use tdosprn.prg not printer.prg

[Enrico Maria Giordano]

Not necessarily. If the printer has a Windows driver, it is seen by the applications as any other printer.

[karinha]

Simples,

Code: Select all  Expand view  RUN

#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
 

Regards, saludos.