Gauge Item - How to configure default scale and add custom ranges

thanks… scales show for little time, 1sec, while I scroll gauges down… if I only keep looking screen, not show scales!
Only if I move gauges in scroll, show for 1sec or 2…

run for you see…

thanks…

Would you please demonstrate how the problem appears. I have attached a sample screencast demonstrating how this project functions on my side: all ranges and scales are displayed correctly.

I have prepared a sample project demonstrating this approach. You will find it in the attachment.

follow my sample, only run…

thanks!

Hi Aljr,

To resolve this issue, add the DashboardItemControlUpdated event handler and modify the runtime Gauge layout initialization procedure as follows (see the increased Range values and method signatures):

Visual Basic
Private Sub Dash1_DashboardItemControlUpdated(sender As Object, e As DevExpress.DashboardWin.DashboardItemControlEventArgs) Handles Dash1.DashboardItemControlUpdated  
    If InStr(LCase(e.DashboardItemName), "gaugedash") > 0 Then  
        Dim gauge As GaugeControl = TryCast(e.GaugeControl, GaugeControl)  
        UpdateGauge(gauge)  
    End If  
End Sub  

Private Shared Sub UpdateGauge(ByVal gaugeControl As GaugeControl)  
    For Each gauge As CircularGauge In gaugeControl.Gauges  
        gauge.Scales(0).MajorTickCount = 6  
        gauge.Scales(0).Ranges.Add(CreateNewRange(0, 200000, Color.Red))  
        gauge.Scales(0).Ranges.Add(CreateNewRange(200000, 600000, Color.Yellow))  
    Next gauge  
End Sub  

Private Shared Function CreateNewRange(ByVal startValue As Integer, ByVal endValue As Integer, ByVal color As Color) As IRange  
    Dim result As IRange = New ArcScaleRange()  
    result.AppearanceRange.ContentBrush = New SolidBrushObject(color)  
    result.StartValue = startValue  
    result.EndValue = endValue  
    result.StartThickness = 10.0F  
    result.EndThickness = 10.0F  
    Return result  
End Function  

great! Works fine…

Now, and about styles?
I can use "stylechooser", save… and use the selected style in gauges?

thanks!

Hello,

I've created a separate ticket on your behalf (T497300: Gauge Item - Is it possible to use the StyleChooser to apply, save and load gauge styles.). It has been placed in our processing queue and will be answered shortly.

thanks…
and arcscale for web? is the same?

Hello,

I've created a separate ticket on your behalf (T497886: Gauge Item - How to configure default scale and add custom ranges.). It has been placed in our processing queue and will be answered shortly.

Constant, two questions…
- where is the: result.StartPercent ? I need percent too, but doesn't found…

- I can change the value, this way…
circularGauge.Scales(0).Value = 999

but, How I can change the "objective" and "goal" value?

thanks!

Hi… I found percent…

only "objective" I don't know if is maxvalue… endvalue…

The actual value is linked to the gauge needle element, while the target value is visualized using the marker element. I hope this helps.

Visual Basic
Private Shared Sub UpdateGauge(ByVal gaugeControl As GaugeControl)  
    For Each gauge As CircularGauge In gaugeControl.Gauges  
        gauge.Markers(0).Value = ..  
        gauge.Needles(0).Value = ...  

great!! thanks…

and, how I can display my label in center, and not the automatic label… is tried this…

gauge.Labels(0).Text = "xx.x…"

but not display… I need activate some?

thanks!

Hi…
only one problem… I tried changed the gauge.scales(0).maxvalue…
but, in first time when open Project, not change… but if I reload, change ok… some problem? look, I used this code in controlcreated and controlupdate events…

If InStr(LCase(e.DashboardItemName), "gaugedash") > 0 Then
            Dim gauge As GaugeControl = TryCast(e.GaugeControl, GaugeControl)
            UpdateGauge(Gauge, e.DashboardItemName)
        End If

For Each gauge As CircularGauge In GaugeControl.Gauges
            'GaugeControl.RestoreLayoutFromXml(System.Windows.Forms.Application.StartupPath & "\Templates_modelo\circulartemplate2.xml")
            Dim atual As Double = 0
            Dim meta As Double = 0
            Dim max As Double = 0
            Dim maxx As Double = 0
            If gauge.Markers.Count > 0 Then meta = gauge.Markers(0).Value
            If gauge.Needles.Count > 0 Then atual = gauge.Needles(0).Value
            If meta > atual Then maxx = meta Else maxx = atual
            If gauge.Scales.Count > 0 Then
                max = gauge.Scales(0).MaxValue
                If max > maxx Then gauge.Scales(0).MaxValue = maxx <<— THIS CODE ALWAYS RUN, first time too, but not change in screen… here in code, change…
            End If

look a little vídeo…
- first time, not change… only second time…

thanks…!

Special thanks for uploading your sample screencast. Although there is no special option to refresh the GaugeControl layout in this scenario, you can reload the DashboardViewer to force the layout update.

Visual Basic
Dash1.AllowPrintDashboardItems = True  
Dash1.AllowPrintDashboard = True  
Dash1.ReloadData()  

As for modifying the gauge label shown in the center, you will need to access the second Label element (gauge.Labels(1) ). Let me know if you need further assistance.

humm… but in this case, keep in LOOPING!!
after reloadData, controlupdated and crontrolcreated was fired again, and "updategauge" fire again, and e.reloaddata run again… …

humm… forgot…

I change and put after "allwprint", and Works, not looping more…

but… not Works… keep samething… not change em first time…

Attached is an updated sample project used in my tests. Please test it on your side and let me know how it works for you.

humm… but not change in your sample…
look 2o gauge, attach… maximum keep in 1500000 but value will be 1348000…

Aljr,

It turns out that this custom gauge scale modification procedure does not override the Gauge Dashboard Item behavior and the original scale is restored when the viewer is updated. I am afraid there is currently no workaround to overcome this issue. I will discuss this scenario with our R&D team, so that we can check whether it is possible to address it in future Dashboard updates.