Software Developer's Kit - ChemDraw

Send comments on this topic
Geometries Property
See Also 


Member of ChemDrawControl.Objects.

Returns the geometries from the objects in the collection

Property type

Read-only property


Visual Basic
Public Property Geometries() As Geometries

Return Type


 Private Sub cmdShowNumberOfGeometries_Click() 
     Dim myGeometry1 as ChemDrawControl10Ctl.Geometry
     Dim myGeometry2 as ChemDrawControl10Ctl.Geometry 
    'Checks if at least two Geometries have been drawn
     If ctlChemDraw.Objects.Geometries.Count > 2 Then 
         Set MyGeometry1 = ChemDrawControlCtl.Objects.Geometries.Item(1)
         Set MyGeometry2 = ChemDrawControlCtl.Objects.Geometries.Item(2)
     End If
 End Sub

See Also