topic Re: Create ILogic constraints between parts based on 3 planes chosen by the user in Inventor Programming Forum

Create ILogic constraints between parts based on 3 planes chosen by the user

haphanthanhtam.work — Sat, 15 Jul 2023 07:57:33 GMT

i want to create mate for 3 face of part in assembly to quickly do my work
i have below code but it is not working

Dim asmDoc As AssemblyDocument asmDoc = ThisApplication.ActiveDocument Dim part1 As ComponentOccurrence part1 = asmDoc.ComponentDefinition.Occurrences.Item(1) Dim part2 As ComponentOccurrence part2 = asmDoc.ComponentDefinition.Occurrences.Item(2) Dim selectedPlane1 As WorkPlane selectedPlane1 = ThisApplication.CommandManager.Pick(kWorkPlaneFilter, "Select the first plane") Dim selectedPlane2 As WorkPlane selectedPlane2 = ThisApplication.CommandManager.Pick(kWorkPlaneFilter, "Select the second plane") Dim selectedPlane3 As WorkPlane selectedPlane3 = ThisApplication.CommandManager.Pick(kWorkPlaneFilter, "Select the third plane") Dim constraintGroup As GeometricConstraintGroup constraintGroup = asmDoc.ComponentDefinition.Constraints.AddMateConstraint(part1, part2, kFlushMate, selectedPlane1, selectedPlane2, selectedPlane3)

Select face

affter

Re: Create ILogic constraints between parts based on 3 planes chosen by the user

A.Acheson — Sat, 15 Jul 2023 19:27:53 GMT

Hi @haphanthanhtam.work

I noticed a few mistakes you have,

You were picking workplanes and not faces
You were picking occurrences which is not required.
GeometricConstraintGroup is not an object within the API

Here is a method that allows multiple constraints.

Dim asmDoc As AssemblyDocument = ThisApplication.ActiveDocument Dim face1 As Face Dim face2 As Face Dim mate1 As MateConstraint While True face1 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the first face") ' Exit loop if nothing selected If face1 Is Nothing Then Exit While face2 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the second face") ' Create the insert constraint between the parts. mate1 = asmDoc.ComponentDefinition.Constraints.AddMateConstraint(face1, face2, 0) End While

Re: Create ILogic constraints between parts based on 3 planes chosen by the user

haphanthanhtam.work — Sat, 15 Jul 2023 19:56:35 GMT

Hi @A.Acheson
it's almost exact. I edited the code to suit me

Dim asmDoc As AssemblyDocument = ThisApplication.ActiveDocument Dim face1 As Face Dim face2 As Face Dim mate1 As MateConstraint face1 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the first face") ' Exit loop if nothing selected face2 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the second face") ' Create the insert constraint between the parts. mate1 = asmDoc.ComponentDefinition.Constraints.AddMateConstraint(face1, face2, 0) face3 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the 3 face") ' Exit loop if nothing selected face4 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the 4 face") ' Create the insert constraint between the parts. mate2 = asmDoc.ComponentDefinition.Constraints.AddMateConstraint(face3, face4, 0) face5 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the 5 face") ' Exit loop if nothing selected face6 = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartFaceFilter, "Select the 6 face") ' Create the insert constraint between the parts. mate3 = asmDoc.ComponentDefinition.Constraints.AddPlushConstraint(face5, face6, 0)

I need to edit this line to look like image
Can you helpe me!!

mate3 = asmDoc.ComponentDefinition.Constraints.AddPlushConstraint(face5, face6, 0)

Re: Create ILogic constraints between parts based on 3 planes chosen by the user

A.Acheson — Sat, 15 Jul 2023 22:07:43 GMT

You have a spelling mistake here

mate3 = asmDoc.ComponentDefinition.Constraints.AddPlushConstraint(face5, face6, 0)

see API Help here

AssemblyConstraints.AddFlushConstraint( EntityOne As Object, EntityTwo As Object, Offset As Variant, [BiasPointOne] As Variant, [BiasPointTwo] As Variant ) As FlushConstrain

Re: Create ILogic constraints between parts based on 3 planes chosen by the user

haphanthanhtam.work — Sun, 16 Jul 2023 03:08:14 GMT

hi @A.Acheson
how do you fix it

mate3 = asmDoc.ComponentDefinition.Constraints.AddPlushConstraint(face5, face6, 0)

it's worst

Re: Create ILogic constraints between parts based on 3 planes chosen by the user

A.Acheson — Sun, 16 Jul 2023 03:34:41 GMT

If you replace the letter "P" with "F" this should fix that method. The error message states you have the wrong method.

Fixed:

mate3 = asmDoc.ComponentDefinition.Constraints.AddFlushConstraint(face5, face6, 0)

Re: Create ILogic constraints between parts based on 3 planes chosen by the user

haphanthanhtam.work — Sun, 16 Jul 2023 03:53:20 GMT

thank you !!!😅