FiveTech Support Forums

Pedro,

En lo personal uso esta funcion y va bien , expresadas las cooredenadas en centimetros :

//=========================================================
Static FUNCTION LINEA(nArriba,nIzq,nAbajo,nDerecha,oPrn,oPen)
//=========================================================

Local xCor := {} , yCor := {}
xCor := oPrn:Cmtr2Pix(nArriba,nIzq)
yCor := oPrn:Cmtr2Pix(nAbajo,nDerecha)
oPrn:Line(xCor[1],xCor[2],yCor[1],yCor[2],oPen)
return NIL

Ejemplo :

LINEA(2.8,1,2.8,21,oPrn)

Saludes desde Managua, Nicaragua

Ramon Paredes

Hola Ramón
Precisamente es lo que he tenido que hacer, usar el oPrn:Cmtr2Pix, para sacar la línea. Mis preguntas eran porque cuando tu pones un oPrn:CmSay(......texto) tu lo expresas en cms, y el método se encarga de utilizar oPrn:Cmtr2Pix para calcular las coordenadas de la columna, que en caso de textos va de maravilla, pero en caso de números alineados a la derecha, ufffffff el calculo de la línea se complica.
Pensaba que el método Line ya hacía lo mismo, pero no es asi, y cuando tienes que poner muchas lineas, es un verdadero peñazo tener que estar resolviendo con otra función.
En fin tendrá que ser así.
Gracias de todas formas