^{ITools.ToolType
ITools}

<sup>property ToolType: EToolClass;

Type Library
TeeChartx

Description
The ToolType property returns the ENumber of the Tool type (tcAnnotation = 10).</sup>

^{Example [Visual Basic]}

^{Private Sub Form_Load()}

^{Dim MyAnnotationTool1 As Integer}

^{With TChart1}

^{.AddSeries scLine}

^{.Series(0).FillSampleValues 10}

^{MyAnnotationTool1 = .Tools.Add(tcAnnotate)}

^{With .Tools.Items(MyAnnotationTool1).asAnnotation}

^{.Position = ppLeftTop}

^{.Text = "Access"}

^{End With}

^{Label1.Caption = .Tools.Items(MyAnnotationTool1).Description}

^{Label2.Caption = .Tools.Items(MyAnnotationTool1).ToolType}

^{End With}

^{End Sub}