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:

Image

Image

Image

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

Image

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... :shock:

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