Create shrinwrap with an second inventor instance

Create shrinwrap with an second inventor instance

SevInventor
Advocate Advocate
368 Views
3 Replies
Message 1 of 4

Create shrinwrap with an second inventor instance

SevInventor
Advocate
Advocate

Hello Experts,

is possible to launch a second Inventor from an external rule?

I want to start a second inventor instance to create shrinkwraps of the active document (assembly)

I think the following code is works in other Applications but not in an external rule.

Dim _invApp1 As Inventor.Application
Dim _invApp2 As Inventor.Application

Dim invAppType As Type = GetTypeFromProgID("Inventor.Application")

_invApp1 = CreateInstance(invAppType)
_invApp2 = CreateInstance(invAppType)

_invApp1.Visible = True
_invApp2.Visible = True

How can i run it in ilogic?

0 Likes
Accepted solutions (1)
369 Views
3 Replies
Replies (3)
Message 2 of 4

bradeneuropeArthur
Mentor
Mentor
Accepted solution

Try this:

Dim a As Inventor.Application = CreateObject("inventor.application")
'Test if Inventor is running
msgbox (a.UserName)

Regards,

 

Arthur Knoors

Regards,

Arthur Knoors

Autodesk Affiliations & Links:
blue LinkedIn LogoSquare Youtube Logo Isolated on White Background


Autodesk Software:Inventor Professional 2025 | Vault Professional 2024 | Autocad Mechanical 2024
Programming Skills:Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Programming Examples:
Drawing List!|
Toggle Drawing Sheet!|
Workplane Resize!|
Drawing View Locker!|
Multi Sheet to Mono Sheet!|
Drawing Weld Symbols!|
Drawing View Label Align!|
Open From Balloon!|
Model State Lock!
Posts and Ideas:
My Ideas|
Dimension Component!|
Partlist Export!|
Derive I-properties!|
Vault Prompts Via API!|
Vault Handbook/Manual!|
Drawing Toggle Sheets!|
Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !


 


EESignature

Message 3 of 4

SevInventor
Advocate
Advocate

Thank you very much Arthur...perfect.

Dim a As Inventor.Application = CreateObject("inventor.application")
'Test if Inventor is running
MsgBox(a.UserName)
a.Visible = True
MsgBox("Inventor 2 is visible now")
a.Visible = False
MsgBox("Inventor 2 is invisible now")

 

 

0 Likes
Message 4 of 4

Cadkunde.nl
Collaborator
Collaborator

If your reason to start a 2nd instance for shrinkwrap is to have that one going on the background doing a big task while the engineer can still work on the first instance. That is not the case. It's single threaded.

 

If you want that, you need to create an external program, not running within an Inventor instance.

 

Anyone correct me if I'm wrong.

0 Likes