-
1
- #1
Letourneau
Marine/Ocean
I looked around for this code for a few days and just found it in the CAA V5 Visual Basic help file. This code in a macro will insert a graphic image into a drawing format. Simply change c:\tmp\ball.bmp to the path of your image. Works with any image format supported by CATIA. The 100., 50. is x & y placement.
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.)
Enjoy,
Steve
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.)
Enjoy,
Steve
