Page 1 of 1
TGraph
Posted: Fri Apr 15, 2016 2:21 pm
by EBM
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
Re: TGraph
Posted: Sat Apr 16, 2016 12:26 pm
by armando.lagunas
buenas
la verdad tienes que experimentar y probar las opciones que trae, con pocas lineas de código puedes lograr mucho con esta clase, revisa tgraph.prg te darás cuenta de todo lo que puede hacer, te muestro algunas cosas que he logrado:



Code: Select all | Expand
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.
hasta se puede imprimir el gráfico

Code: Select all | Expand
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, Fon3
te animo a que pruebes y busques
saludos
Re: TGraph
Posted: Sun Apr 17, 2016 1:47 am
by EBM
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
Re: TGraph
Posted: Mon Apr 18, 2016 6:44 pm
by EBM
Ya quedó solucionado,
Baje una actualización de la clase y ahora los problemas que tenia quedaron resueltos.
Muchas Gracias!!
Re: TGraph
Posted: Wed Apr 20, 2016 12:10 pm
by armando.lagunas
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
hola, me puedes orientar, como solucionaste esto???
no he podido resolver este problema, tengo que igualar las matrices para que se vea relativamente bien.
saludos
Re: TGraph
Posted: Mon Apr 25, 2016 10:15 pm
by cnavarro
Armando, no quiero dejar pasar la oportunidad de felicitarte por el diseño ( tanto de colores como de presentacion ) de tu aplicación
Saludos
Re: TGraph
Posted: Mon May 02, 2016 4:06 pm
by EBM
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
Re: TGraph
Posted: Mon May 02, 2016 8:59 pm
by joseluisysturiz
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
Podrias comartir esas actualizaciones o la version que usas de TGraph.? gracias...saludos...

Re: TGraph
Posted: Tue May 17, 2016 3:58 pm
by EBM
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