iLogic - Need to run CenterText twice to Center Dimensions

[Anonymous]

Hello,

I am having an interesting issue when it comes to automating my Center Dimension Texts on my drawings. Right now I am trying to incorporate this line of code into my iLogic rules:

   Dim oDrawDoc As DrawingDocument
   Dim oSheet As Sheet = oDrawDoc.ActiveSheet
   Dim oDrawingDim As DrawingDimension
   For Each oDrawingDim In oSheet.DrawingDimensions
        If TypeOf oDrawingDim Is LinearGeneralDimension Or _
           TypeOf oDrawingDim Is AngularGeneralDimension Then
            Call oDrawingDim.CenterText
        End If
    Next

Here is a screenshot of what it looks like after I have run the rule.

I do not get any errors with this, but it just doesn't exactly center it, I can tell it semi works, because I have moved dimensions crazily and run the rule and it pushes it to this location. The weird thing is that we have a plug-in that does this using this code:

            Dim oDoc As Inventor.DrawingDocument = Nothing
            oDoc = g_inventorApplication.ActiveDocument
            Dim oDrawingView As Inventor.DrawingView = Nothing
            Dim oSheet As Inventor.Sheet
            oSheet = oDoc.ActiveSheet

            For Each oDrawingDim In oSheet.DrawingDimensions
                If TypeOf oDrawingDim Is LinearGeneralDimension Or TypeOf oDrawingDim Is AngularGeneralDimension Then
                    Call oDrawingDim.CenterText
                End If
            Next

Now when I click this button once, it does nothing. However, if I click it TWICE it works:

It is kind of peculiar why I have to run this button twice to get it to work. But, I thought maybe if I just placed the code twice in the iLogic rule, maybe it would simulate the same thing. It did not end up working that way. Does anyone have any suggestions? Or maybe there is another way to code this same function that I can try.

[chandra.shekar.g]

@Anonymous,

Can you please provide reproducible steps and Inventor files to investigate? please make sure that files are non confidential.

Thanks and regards,

[bradeneuropeArthur · Accepted solution]

Hi,

I have seen this as normal behavior since inventor 2012.

So I think this is a smaller inventor API bug.

solution:

For Each oDrawingDim In oSheet.DrawingDimensions
                If TypeOf oDrawingDim Is LinearGeneralDimension Or TypeOf oDrawingDim Is AngularGeneralDimension Then
                    	Call oDrawingDim.CenterText ' 1x
			Call oDrawingDim.CenterText ' 2x
                End If
            Next

[rayessle · Accepted solution]

I was having the same problem. See this post here

https://forums.autodesk.com/t5/inventor-customization/why-does-this-rule-only-work-the-second-time-y...

I think it has to do with the fact that inventor has not updated the document prior to you trying to centre the text so it doesn't know the dimensions are off centre. when you run the rule the first time it updates the document so the second time it knows the dimensions are off centre.

[Anonymous]

Thanks for the response. This ultimately is what I did to get it to work.

For whatever reason it still doesn't work without the two executes, but it doesn't work at all if this code runs before the update. Here is what I needed to adjust:

    oDrawDoc.Update

   For Each oDrawingDim In oSheet.DrawingDimensions
        If TypeOf oDrawingDim Is LinearGeneralDimension Or _
           TypeOf oDrawingDim Is AngularGeneralDimension Then
            Call oDrawingDim.CenterText
            Call oDrawingDim.CenterText
        End If
    Next

[filippo.costantin3HZMT]

Hi, 

I have similar problem with manage dimension with ilogic. 

I use a rule like yours, but if I have the configuration o drawing like:

When I run the rules, the dimensions are overlapping.

How can resolve it?

[insomnix]

I had to have two update's, one placed between the two center text lines, for it to work properly in my code. For anyone else who is still having issues after trying the above code:

   oDrawDoc.Update
   For Each oDrawingDim In oSheet.DrawingDimensions
        If TypeOf oDrawingDim Is LinearGeneralDimension Or _
           TypeOf oDrawingDim Is AngularGeneralDimension Then
            Call oDrawingDim.CenterText
            oDrawDoc.Update
            Call oDrawingDim.CenterText
        End If
    Next

 Thanks to those responding on this thread, you pointed me in the right direction.