ASE Home Page Products Download Purchase Support About ASE
ChartDirector Support
 Forum HomeForum Home   SearchSearch

Message ListMessage List     Post MessagePost Message

  PolarLineLayer setDataSymbol Colors
Posted by Helmut on Mar-17-2018 17:10
| Reply | Monitor
Attachments:
Hello,

I would like to display more than 2 colors with 2 arrays.
For example> 50 yellow <50 green.
Dim colors ()
colors = Array (& H5588BB, & H66BBBB, & HAA6644, & H99BB55)
Call layer1.setDataSymbol (cd.CircleSymbol, 11, colors)

That makes a mistake
Can anybody help me further?

Thanks Helmut
PolarLineLayer.jpg

  Re: PolarLineLayer setDataSymbol Colors
Posted by Peter Kwan on Mar-18-2018 17:17
| Reply | Monitor
Hi Helmut,

To display symbols with multiple colors, you need to use multiple arrays, with each array for one color. For example:

' Your data
Dim data() = Array(.....)

Dim layer
Dim myColor
For i = 0 To Ubound(data)
    If data(i) >= 50 Then
        myColor = &Hffff00
    Else
        myColor = &H00ff00
    End If

    Set layer = c.addLineLayer(Array(data(i)), myColor)
    Call layer.setLineWidth(0)
    Call layer2.setDataSymbol(cd.CircleSymbol, 13)
Next

If you also want the points to be joined by a line, you can add another layer for the line:

Set layer = c.addLineLayer(data, ....)

Hope this can help.

Regards
Peter Kwan