| View previous topic :: View next topic |
| Author |
Message |
MindYerBeak
Joined: 22 Jun 2007
Posts: 21
Location: Swansea Jack
|
 Posted: Tue Jul 03, 2007 10:01 pm Post subject: Graph Colours |
 |
|
What would be a nice option would be to be able to change the background colour of the graph, as well as the trendlines for the various staking plans. Some are difficult to see and you could colour your trendlines as to the most profitable to be easily seen better. I personally prefer a black background to make it easier to view.
Also the ability to thicken the lines and maximise the graph would be useful.
_________________
Mr. MindYerBeak, at your service |
|
| Back to top |
|
 |
DeepJoy
Joined: 20 Jun 2007
Posts: 65
|
| Posted: Sun Jul 08, 2007 11:15 am Post subject: |
|
|
| Good suggestions [if I have a lot of plans displayed I find myself peering at the colour legend trying to make out what's what]. |
|
| Back to top |
|
|
win2win
Joined: 30 Jul 2007
Posts: 7
|
| Posted: Fri Aug 10, 2007 11:12 am Post subject: |
|
|
Not a big problem, but for the posh sods amongst us with 21" 1600x1400 monitors  , the coloured line that relates to each staking plan above the graph are the width smaller than a hair, so it is not possible to differentiate between a few of them. If possible, make then a bit thicker, but not as thick as a local counsellor!! 
The graph itself is fine. |
|
| Back to top |
|
|
DeepJoy
Joined: 20 Jun 2007
Posts: 65
|
| Posted: Fri Aug 10, 2007 12:45 pm Post subject: |
|
|
| win2win wrote: | If possible, make then a bit thicker
|
Agreed, (I'm using an ordinary laptop btw). No biggie, should be easy to fix.
Also, one idea that occurs to me is: would it be possible for a 3d type graph option? That way, you'd be able to distinguish the different lines more easily. Perhaps you could have a small 2d graph on the main page and a 3d one in the graph page? |
|
| Back to top |
|
|
support
Site Admin
Joined: 20 Jun 2007
Posts: 382
Location: London
|
| Posted: Fri Aug 10, 2007 5:55 pm Post subject: |
|
|
The graph feature in TSM uses something called ZedGraph, which i believe currently only allows 2D charts. I must admit i have not looked at the documentation for a good few months.
A quick look back at the ZedGraph site shows that on their latest update they added this
* The color of individual symbols & bars can be controlled by a new ColorValue property of the PointPair
I may be able to use this to help make distinguishing between graph lines.
The main problem with the graph feature i feel is that there simply is not 15 different colours that can be used. Hence the ability to pick and choose what staking plan results to show. In the coming month i will be doing what i can to fix this !
Cheers |
|
| Back to top |
|
|
DeepJoy
Joined: 20 Jun 2007
Posts: 65
|
| Posted: Sat Aug 11, 2007 4:45 pm Post subject: |
|
|
| Cheers - yes I can see that with a multitude of staking plans it's hard to represent all the results in one graph - much appreciate the energy being applied to enhance things! |
|
| Back to top |
|
|
DeepJoy
Joined: 20 Jun 2007
Posts: 65
|
|
| Back to top |
|
|
win2win
Joined: 30 Jul 2007
Posts: 7
|
| Posted: Sun Aug 12, 2007 1:00 pm Post subject: |
|
|
...and in VB.NET that would translate by magic;
| Code: |
Private Sub CreateGraph_ThreeVerticalPanes(ByVal z1 As ZedGraphControl)
Dim master As MasterPane = z1.MasterPane
' Fill the background
master.Fill = New Fill(Color.White, Color.FromArgb(220, 220, 255), 45F)
' Clear out the initial GraphPane
master.PaneList.Clear()
' Show the masterpane title
master.Title.IsVisible = True
master.Title.Text = "Synchronized Graph Demo"
' Leave a margin around the masterpane, but only a small gap between panes
master.Margin.All = 10
master.InnerPaneGap = 5
' The titles for the individual GraphPanes
Dim yLabels As String() = {"Rate, m/s", "Pressure, dynes/cm", "Count, units/hr"}
Dim rotator As New ColorSymbolRotator()
For j As Integer = 0 To 2
' Create a new graph -- dimensions to be set later by MasterPane Layout
Dim myPaneT As New GraphPane(New Rectangle(10, 10, 10, 10), "", "Time, Days", yLabels(j))
'myPaneT.Fill = new Fill( Color.FromArgb( 230, 230, 255 ) );
myPaneT.Fill.IsVisible = False
' Fill the Chart background
myPaneT.Chart.Fill = New Fill(Color.White, Color.LightYellow, 45F)
' Set the BaseDimension, so fonts are scale a little bigger
myPaneT.BaseDimension = 3F
' Hide the XAxis scale and title
myPaneT.XAxis.Title.IsVisible = False
myPaneT.XAxis.Scale.IsVisible = False
' Hide the legend, border, and GraphPane title
myPaneT.Legend.IsVisible = False
myPaneT.Border.IsVisible = False
myPaneT.Title.IsVisible = False
' Get rid of the tics that are outside the chart rect
myPaneT.XAxis.MajorTic.IsOutside = False
myPaneT.XAxis.MinorTic.IsOutside = False
' Show the X grids
myPaneT.XAxis.MajorGrid.IsVisible = True
myPaneT.XAxis.MinorGrid.IsVisible = True
' Remove all margins
myPaneT.Margin.All = 0
' Except, leave some top margin on the first GraphPane
If j = 0 Then
myPaneT.Margin.Top = 20
End If
' And some bottom margin on the last GraphPane
' Also, show the X title and scale on the last GraphPane only
If j = 2 Then
myPaneT.XAxis.Title.IsVisible = True
myPaneT.XAxis.Scale.IsVisible = True
myPaneT.Margin.Bottom = 10
End If
If j > 0 Then
myPaneT.YAxis.Scale.IsSkipLastLabel = True
End If
' This sets the minimum amount of space for the left and right side, respectively
' The reason for this is so that the ChartRect's all end up being the same size.
myPaneT.YAxis.MinSpace = 80
myPaneT.Y2Axis.MinSpace = 20
' Make up some data arrays based on the Sine function
Dim list As New PointPairList()
For i As Integer = 0 To 35
Dim x As Double = CDbl(i) + 5 + j * 3
Dim y As Double = (j + 1) * (j + 1) * 10 * (1.5 + Math.Sin(CDbl(i) * 0.2 + CDbl(j)))
list.Add(x, y)
Next
' Create a curve
Dim myCurve As LineItem = myPaneT.AddCurve("Type " + j.ToString(), list, rotator.NextColor, rotator.NextSymbol)
' Fill the curve symbols with white
myCurve.Symbol.Fill = New Fill(Color.White)
' Add the GraphPane to the MasterPane.PaneList
master.Add(myPaneT)
Next
Using g As Graphics = Me.CreateGraphics()
' Align the GraphPanes vertically
master.SetLayout(g, PaneLayout.SingleColumn)
master.AxisChange(g)
End Using
End Sub
|
|
|
| Back to top |
|
|
support
Site Admin
Joined: 20 Jun 2007
Posts: 382
Location: London
|
| Posted: Sun Aug 12, 2007 1:32 pm Post subject: |
|
|
Cheers guys for all your help. Its obviously something your keen for me to fix  |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
