FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para CA-Clipper Como puedo con oPrn:say() justificar a la derecha
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Como puedo con oPrn:say() justificar a la derecha
Posted: Mon Feb 05, 2007 10:24 AM

Hola amigos:

Necesito que las columnas de un reporte queden alineadas a la derecha ya que son numeros y el tipo de letra no es monoespaciada. La impresión la hago:

PRINT
PAGE
oPrn:say(col,row,texto,oFont)
...
...
ENDPAGE
ENDPRINT

Un saludo

Carlos

Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.
Posts: 840
Joined: Thu Oct 13, 2005 07:05 PM
Como puedo con oPrn:say() justificar a la derecha
Posted: Mon Feb 05, 2007 04:39 PM

Un consejo:

No utilices oPrn:Say(), utiliza mejor oPrn:CmSay() porque enel primer caso, las coordenadas estan en puntos de la imprsora, y cuando cambies el reporte de impresora es altamente probable que el mismo reporte se vea distinto, por la resolucion.

La solucion a tu problema:

En el codigo fuente de la clase printer esta la sintaxis:

Say( nRow, nCol, cText, oFont, nWidth, nClrText, nBkMode, nPad )

El ultimo parametro (nPad) te da la alineacion 0 = Izquierda, 1 = Centro, 2= Derecha

Saludos

R.F.
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Como puedo con oPrn:say() justificar a la derecha
Posted: Wed Feb 07, 2007 09:49 AM

Hola Rene:

En primer lugar gracias por la respuesta y orientación de como resolver mi problema.

El problema de la resolución lo tengo encauzado con otra pregunta que hice y lo solucione poniendo un factor de multiplicacion en las coordenadas dependiendo de la resolucion, creo que me lo contestaste tu o Antonio Linares.

Comentarte algo sobre lo que me has escrito:

me has dicho:

Say( nRow, nCol, cText, oFont, nWidth, nClrText, nBkMode, nPad )

El ultimo parametro (nPad) te da la alineacion 0 = Izquierda, 1 = Centro, 2= Derecha

Yo lo he puesto en 2 el nPad pero no ha funcionado sin embargo lo he cambiado por 1 y lo ha clavado.

Un saludo y gracias de nuevo

Carlos

Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.

Continue the discussion