Codejock Developer Community : Showing average speed

Showing average speed : WoW!I really appreciate the...

Mon, 14 Mar 2011 14:41:45 +0000

Author: bryanu
Subject: 18053
Posted: 14 March 2011 at 2:41pm

WoW!

I really appreciate the help Peter. I looked at this for way too long and couldn't see the forest for the trees. The sample was perfect and I can't tell you how much I appreciate the help.

Regards,

Showing average speed : Hi Bryan! Seems not to be too...

Mon, 14 Mar 2011 13:06:57 +0000

Author: Peter59
Subject: 18053
Posted: 14 March 2011 at 1:06pm

Hi Bryan!

Seems not to be too difficult, see ChartAxisConstantLine in help file.

But one sample is better than thousand words: uploads/3156/ChartAxisConstantLine_Demo.zip

Peter

Showing average speed : I am using the chart to show...

Mon, 14 Mar 2011 11:26:41 +0000

Author: bryanu
Subject: 18053
Posted: 14 March 2011 at 11:26am

I am using the chart to show the download speed of files beling downloaded, it show the KB or MB per second eveey 333ms, but I want to put a line that shows average speed that will move up or down.

I want the line to go all the way across the chart, simply move up or down to indicate the average speed.

Any suggestions??

Code for showing current speed:

Private Sub tmrDownloadChart_Timer()
    Dim Diagram As ChartDiagram2D
    Dim Series  As ChartSeries
    Dim Value   As Long
    
    Value = DownloadSpeed / 1024
    
    If (Value < 0) Then Value = 0
    LastValue = Value
    LastArgument = LastArgument + 1
    
    Set Series = chartDownloadSpeed.content.Series(0)
    Series.points.Add LastArgument, Value
    Set Diagram = Series.Diagram
    If (LastArgument >= 99) Then
        Series.points.DeleteAt 0
        Diagram.AxisX.Range.MaxValue = Diagram.AxisX.Range.MaxValue + 1
        Diagram.AxisX.Range.MinValue = Diagram.AxisX.Range.MinValue + 1
    End If
End Sub