×
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Log In

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

Activating 3D points in CATIA Drawing Document

Activating 3D points in CATIA Drawing Document

Activating 3D points in CATIA Drawing Document

(OP)
Hello Everyone,
I have a CATIA drawing document having front,back and side views.In my 3D part,I also have some 3D points.When we open Drawing document,by default these 3D Points are not visible.We need to select front view properties and tick the “3D points section”..How can we do this using VB code?..I did nt find any appropiate API for this.I am also attaching a picture below for your reference

Please help me

RE: Activating 3D points in CATIA Drawing Document

try to record a macro and see where it takes you.

RE: Activating 3D points in CATIA Drawing Document

(OP)
Hi Daniel,Thanks for your reply.I have tried recording a macro,but still I am not able to activate 3Dpoint section (tick the 3D point box)..I am able to change all other properties in the properties of front view except this..Plz help me.

RE: Activating 3D points in CATIA Drawing Document

(OP)
Hi Jenial,

I could not find it by recording Macro but I have found the API itself

drawingViewGenerativeBehavior3.PointsProjectionMode = CatPointsProjectionMode.catPointsProjectionModeOn

RE: Activating 3D points in CATIA Drawing Document

CODE --> vba

Sub CATMain()

Dim drawingDocument1 As DrawingDocument
Set drawingDocument1 = CATIA.ActiveDocument

Dim drawingSheets1 As DrawingSheets
Set drawingSheets1 = drawingDocument1.Sheets

Dim drawingSheet1 As DrawingSheet
Set drawingSheet1 = drawingSheets1.Item("Sheet.1")

Dim drawingViews1 As DrawingViews
Set drawingViews1 = drawingSheet1.Views

Dim drawingView1 As DrawingView
Set drawingView1 = drawingViews1.Item("Front view")

Dim drawingViewGenerativeBehavior1 As DrawingViewGenerativeBehavior
Set drawingViewGenerativeBehavior1 = drawingView1.GenerativeBehavior

Set drawingViewGenerativeBehavior1 = drawingView1.GenerativeBehavior

Dim MyView As DrawingView
Set MyView = drawingViews1.Item("Front view")

MyView.GenerativeBehavior.PointsProjectionMode = catPointsProjectionModeOn

drawingViewGenerativeBehavior1.ForceUpdate

End Sub 

works for me. workaround on that

RE: Activating 3D points in CATIA Drawing Document

(OP)
Hi Jenial,
Thanks a ton. That worked perfect.Can you please tell me your email Id.I will post them directly to you.

RE: Activating 3D points in CATIA Drawing Document

them who? it's forbidden to post emails on this forum. sorry

RE: Activating 3D points in CATIA Drawing Document

(OP)
Hi Jenial,
How can we turn off grid(present in the backgroud) in CATIA using CATIA VB and also CATIA CAA?

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Eng-Tips Forums free from inappropriate posts.
The Eng-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members!


Resources