TGRAPH

[MarcoBoschi]

Hi,
I have to scale a linear TGRAPH

For example

Code: Select all  Expand view

#Include "FiveWin.Ch"

Function Main()
   LOCAL aMisura := {}
   LOCAL aOra    := {}
   LOCAL oWnd , oGraph

   aMisura := { 136.08, 136.08, 136.05, 136.10, 136.10, 137.10, 136.70, 136.70, 137.11, 137.90, 137.60 }

   DEFINE WINDOW oWnd FROM 1, 1 TO 20, 80 TITLE "Misure"

   oGraph:=TGraph():New( 0 , 0 , oWnd ,oWnd:nWidth()-8 , oWnd:nHeight()-40 )
   oGraph:SetYVals( aOra )
   oGraph:cTitX   := "Misura"
   oGraph:cTitY   := "Ora"
   oGraph:lYVal   :=.T.
   oGraph:lLegends:=.T.
   oGraph:nType   := 2

   oGraph:AddSerie( aMisura , "MISURE" , RGB( 128 , 128 ,255 ) )

   ACTIVATE WINDOW oWnd ;
      ON PAINT ( oGraph:nWidth :=  oWnd:nWidth  - 8 , ;
                 oGraph:nHeight := oWnd:nHeight -40 , ;
                 oGraph:Refresh(.f.))


RETURN (NIL)

This is graph.

I want this
I want set min and max in Y Axes



This is created by excel



many thanks
marco

[Marcelo Via Giglio]

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=22687#p139284

[MarcoBoschi]

Hi Marcelo,
sorry but I can not get it to work!

[Marcelo Via Giglio]

Marco,

sorry, you are right, this modification worked with old version of tGraph, let me time to see if I found an old modified version of tGraph

regards

Marcelo

[MarcoBoschi]

Marcelo,
I have FWH dated 26 october 2009

Many thanks
Marco

[James Bott]

Marco,

I don't know if this will work, but try setting oGraph:nMinVal to whatever you want. Let us know if that works.

Regards,
James

[James Bott]

OK, I tested it an setting nMinVal doesn't work. Sorry.

Regards,
James

[James Bott]

Well I did find that you can adjust the number of increments for the labels on the Y axis.

oGraph:nXRanges:= 5

nXRanges defaults to 4. Note that it is actually named incorrectly since these are the Y axis ranges so it should be nYRanges. I would be nice if there was also a similar setting for the X-axis.

I still have not been able to find class vars for the Y axis minimum and maximum values. I don't think they exist.

Regards,
James

[James Bott]

OK, I have spent about an hour looking for a var for the Y-axis minimum and I don't see one. I fear that zero is being used so it may be impossible to set the min y-axis value without some major modifications to TGraph.

James

[Silvio.Falconi]

I spend this afternoon.. and then I asked help to Alfredo...but he not sent any messages until now