Buen día Compañeros,
Alguien de ustedes tendrá un buen ejemplo de el uso de TGraph, el que viene con FW esta muy simple y no muestra todas las características de la clase, necesito generar grafica de Pie, Lineas y de Velas Japonesas, no se si este ultimo lo pueda generar TGraph, pero con las otras dos salgo adelante con el proyecto.
Cualquier ayuda es bienvenida,
Saludos !!
LCP Eduardo Borondón Muñiz
REDEFINE GRAPH oGraph ID 21 OF xDlg TYPE 3
oGraph:cTitY := "PERIODOS"
oGraph:cTitX := "VALORES"
oGraph:cPicture := "@E 999,999"
oGraph:lxGrid := .T.
oGraph:lyVal := .T.
oGraph:lDegrade := .T.
oGraph:lLegends := .T.
oGraph:lBordLeg := .F.
oGraph:lxVal := .T.
oGraph:lBarFull := .F.
oGraph:nPoint := 4
oGraph:lDefault := .F.
oGraph:nPenWidth := 1.7
oGraph:lDegrade := .F.
aPos:=oPrn:Cmtr2Pix(1.0,12.5)
aSiz:=oPrn:Cmtr2Pix(9.0, 5.0)
REPORT oRpt TITLE " "," "," "," "," ","REGISTRO DE MICROBIOLOG......
HEADER oGraph:Print(oPrn,aPos[1],aPos[2],aSiz[1],aSiz[2]),
FOOTER ALLTRIM(oApp:cSigEmp)+" "+oApp:cRut+" Página Nro : "
FONT Fon1, Fon2, Fon3Gracias Armando,
Ya he estado haciendo algunas pruebas como me sugeriste, tengo una duda que no he podido resolver a ver si puedes ayudarme, necesito realizar una grafica de líneas, pero una línea tiene menos valores que la segunda línea, o sea, una se corta antes que la segunda, y necesito que se corte y no que me mande valores a cero, esto es posible? Si pongo menos valores a una línea que a la otra me da error.
Alguna sugerencia?
Saludos !!
LCP Eduardo Borondón Muñiz
Ya quedó solucionado,
Baje una actualización de la clase y ahora los problemas que tenia quedaron resueltos.
Muchas Gracias!!
EBM wrote:Gracias Armando,
Ya he estado haciendo algunas pruebas como me sugeriste, tengo una duda que no he podido resolver a ver si puedes ayudarme, necesito realizar una grafica de líneas, pero una línea tiene menos valores que la segunda línea, o sea, una se corta antes que la segunda, y necesito que se corte y no que me mande valores a cero, esto es posible? Si pongo menos valores a una línea que a la otra me da error.
Alguna sugerencia?
Saludos !!
LCP Eduardo Borondón Muñiz
Armando, no quiero dejar pasar la oportunidad de felicitarte por el diseño ( tanto de colores como de presentacion ) de tu aplicación
Saludos
Hola Armando:
Te comento, encontré aquí en el foro una actualización a la TGraph que realizó RSU, y simplemente con agregar con oGraph:AddSerie( ... ) una nueva serie con un numero menor o mayor de elementos, la TGraph te ajusta la grafica y no te manda la que tenga menos valores a cero. Igual tiene corregido el tema de el grosor del Pen y le agrego algunas cositas extras, lo único que me hace falta es poder generar graficas tipo vela japonesa, tienes alguna idea de como puedo hacerlo?
Saludos !!
LCP Eduardo Borondón Muñiz
EBM wrote:Hola Armando:
Te comento, encontré aquí en el foro una actualización a la TGraph que realizó RSU, y simplemente con agregar con oGraph:AddSerie( ... ) una nueva serie con un numero menor o mayor de elementos, la TGraph te ajusta la grafica y no te manda la que tenga menos valores a cero. Igual tiene corregido el tema de el grosor del Pen y le agrego algunas cositas extras, lo único que me hace falta es poder generar graficas tipo vela japonesa, tienes alguna idea de como puedo hacerlo?
Saludos !!
LCP Eduardo Borondón Muñiz
Hola José Luis
La TGraph que utilizo es una que modificó RSU, al parecer van a incluir en FW las correcciones hechas a la clase, dame tu correo y con gusto te la hago llegar.
Saludos !!
LCP Eduardo Borondón Muñiz
