×
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

parenthesis on ref dimension

parenthesis on ref dimension

parenthesis on ref dimension

(OP)
Hi all, I am noew to Catia I have use NX most of the time till now.

I am using V5 R21 CATIA.

Is there an easy way to put parenthesis around a reference dimentions? Or mabe a settings that by default perenthasis will be added? I am puting alot of reference dimensions and and it istime consuming (and annoying)to press so many bottons just to place parenthesis around a value. Currently I am just typing them in the 'text before' and 'text after. fields.

Yes in NX its one click and paranthesis are applied...

Thank you.

RE: parenthesis on ref dimension

Copy Object Format (paint brush in the Graphic Properties toolbar) will apply the text from a selected object to a desired target.

Alternatively, multi-select the target dimensions, go to the properties window and add them under the Dimension Texts tab.

RE: parenthesis on ref dimension

Here is a macro catscript that I found a few years ago, exactly what you want.
You can add the macro to a toolbar, then it would be one-click operation.
I have used it on V5R18 many times , haven't tried it on V5R21. (I assume that it will work on 21).
You can multi select dimensions that are even in different views, run the macro and you should have () on them all.

Copy and paste the following to a macro catscript:

Sub CATMain()

Dim MySel As Selection
Set MySel = CATIA.ActiveDocument.Selection

Dim MyDim As DrawingDimension
Dim Array1 As String
Dim Array2 As String
Dim Array3 As String
Dim Array4 As String
For i = 1 To MySel.Count
If TypeName(MySel.Item(i).Value) = "DrawingDimension" Then
Set MyDim = MySel.Item(i).Value
MyDim.GetValue.GetBaultText 1,Array1,Array2,Array3,Array4
MyDim.GetValue.SetBaultText 1, "(", ")",Array3,Array4
End If
Next

End Sub

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