^{ILevelSegment
Hierarchy Properties}

<sup>Type Library
TeeChartx

Description
This record contains an array of TLevelPoint variables.</sup>

^{This record is used by IContourLevel in Segments property.}

^{See also:}

^{IContourLevel.Segments}

^{Example [Visual Basic]:}

^{Private Sub TChart1_OnAfterDraw()}

^{Dim tmpLevel As Integer, tmpSegment As Integer, tmp As Integer}

^{Dim x As Double, y As Double}

^{If Check3.Value = 1 Then}

^{' Draw small points at contour level segment lines...}

^{TChart1.Canvas.Brush.Color = vbBlack}

^{TChart1.Canvas.Pen.Color = RGB(0, 127, 0)}

^{With TChart1.Series(0).asContour}

^{For tmpLevel = 0 To .NumLevels - 1 ' for each level..}

^{With .Levels.Items(tmpLevel)}

^{For tmpSegment = 0 To .NumSegments - 1 ' for each segment in level...}

^{With .Segments(tmpSegment)}

^{For tmp = 0 To .NumPoints ' for each point in segment...}

^{' Convert to screen coordinates...}

^{x = TChart1.Series(0).CalcXPosValue(.Points(tmp).x)}

^{y = TChart1.Series(0).CalcYPosValue(.Points(tmp).y)}

^{' Draw point...}

^{TChart1.Canvas.Rectangle x - 2, y - 2, x + 2, y + 2}

^{Next tmp}

^{End With}

^{Next tmpSegment}

^{End With}

^{Next tmpLevel}

^{End With}

^{End If}

^{End Sub}