All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown
|
+---IDispatch
|
+---CATBaseUnknown
|
+---CATBaseDispatch
|
+---Collection
|
+---DrawingPictures
| o Func Add( | CATBSTR | iDrawingPicturePath, |
| double | iPositionX, | |
| double | iPositionY) As CATIADrawingPicture |
Dim MySheet As DrawingSheet
Set MySheet = CATIA.ActiveDocument.Sheets.ActiveSheet
Dim MyView As DrawingView
Set MyView = MySheet.Views.ActiveView
Dim MyDrawingPicture1 As DrawingPicture
Set MyDrawingPicture1 = MyView.Pictures.Add("C:\tmp\ball.bmp", 100., 50.)
| o Func Item( | CATVariant | iIndex) As CATIADrawingPicture |
Dim MySheet As DrawingSheet Set MySheet = CATIA.ActiveDocument.Sheets.ActiveSheet Dim MyView As DrawingView Set MyView = MySheet.Views.ActiveView Dim ThisDrawingPicture As DrawingPicture Set ThisDrawingPicture = MyView.Pictures.Item(2)
| o Sub Remove( | CATVariant | iIndex) |
Dim MyView As DrawingView Set MyView = MySheet.Views.ActiveView MyView.Pictures.Remove(3)
Copyright © 2003, Dassault Systèmes. All rights reserved.