Method: Select for Circle

Method: Select for Circle

Selects a circle in DIAdem REPORT.

Object.Select()

The following example generates a circle in the current worksheet, selects this circle, and then displays whether the circle is selected:

Dim oMyCircle
Call Report.NewLayout
Set oMyCircle = Report.ActiveSheet.Objects.Add(eReportObjectCircle,"MyCircle")
Call oMyCircle.Select()
Call MsgBoxDisp(oMyCircle.IsSelected)

dd.Report.NewLayout() 
oMyCircle = dd.Report.ActiveSheet.Objects.Add(dd.eReportObjectCircle,"MyCircle") 
oMyCircle.Select() 
dd.MsgBoxDisp(oMyCircle.IsSelected)