Software Developer's Kit - ChemDraw

Send comments on this topic
Pictures Property
See Also 

Description

Member of ChemDraw Control.Group.

Returns the pictures collection of this group.

Property type

Read-only property

Syntax

Visual Basic
Public Property Pictures() As Pictures

Return Type

Pictures

Remarks

The Pictures property refers to the collection of Pictures which is within this Group. The properties associated with the collection are the following:

myGroup.Pictures.Application      returns the application associated with the Pictures collection
myGroup.Pictures.Count             returns the number of Pictures in the collection
myGroup.Pictures.Item(i)           returns one picture from the collection 
myGroup.Pictures.Parent            returns the parent of the Pictures collection

With Group.Pictures.Item(i) all the graphic properties are enabled for graphic(i). This index starts with 1.

Example

'Returns number of pictures in this group
 Private Sub ctlChemDraw_SelectionChanged(ByVal selection As ChemDrawControl10Ctl.IChemDrawSelection)
     Set MyGroup = ctlChemDraw.MakeGroup()
     For x = 1 To selection.Objects.Count - 1 'Groups the objects, without including the actual group
          Selection.Objects.Item(x).Group = MyGroup
     Next x
     Label1.Caption = "AltGroups: " & MyGroup.AltGroups.Count
     Label2.Caption = "Bonds: " & MyGroup.Bonds.Application
     Label3.Caption = "Captions: " & MyGroup.Captions.Item(1).Text
     Label4.Caption = "Atoms: " & MyGroup.Atoms.Parent.ID
     Label5.Caption = "Constraints: " & MyGroup.Constraints.Count
     Label6.Caption = "Geometries: " & MyGroup.Geometries.Count
     Label7.Caption = "Objects: " & MyGroup.Objects.Count
     Label8.Caption = "Pictures: " & MyGroup.Pictures.Count
     Label9.Caption = "Splines: " & MyGroup.Splines.Count
     Label10.Caption = "StoichiometryGrids: " & MyGroup.StoichiometryGrids.Count
     Label11.Caption = "Tables: " & MyGroup.Tables.Count
     Label12.Caption = "TLCPlates: " & MyGroup.TLCPlates.Count
 End Sub

See Also