Inventor - Nenalezení iLogic pravidla

Nenalezení iLogic pravidla

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: Inventor
Popis fóra: Otázky k programům Autodesk Inventor Professional, Product Design & Manufacturing Collection, Factory Design; digitální prototypy
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=29181
Datum vytištění: 09.srp.2026 v 09:06

Téma: Nenalezení iLogic pravidla

Odeslal: vasekkazda
Předmět: Nenalezení iLogic pravidla
Datum odeslání: 25.čvc.2019 v 14:08

Zdravím

mám napsáno externí pravidlo pro převod aktivního dokumentu na jiný formát. Přes makro toto pravidlo spouštím.

Všechno funguje jak má, kromě prvního spuštění tohoto makra. Inventor 2019 vyhodí zprávu:

Když spustím iLogic pravidlo ručně tak potom už makro funguje.

Prosím o pomoc, programovat moc neumím.

Makro zde:

Public Sub STEP_a_STL_convert()

Dim addIn As ApplicationAddIn

Dim addIns As ApplicationAddIns

Set addIns = ThisApplication.ApplicationAddIns

For Each addIn In addIns

If InStr(addIn.DisplayName, "iLogic") > 0 Then

addIn.Activate

Dim iLogicAuto As Object

Set iLogicAuto = addIn.Automation

Exit For

End If

Debug.Print addIn.DisplayName

Dim rule As String

EXTERNALrule = "STEPaSTL"

Dim oDoc As Document

Set oDoc = ThisApplication.ActiveEditDocument

If oDoc Is Nothing Then

MsgBox "Missing Inventor Document"

Exit Sub

End If

iLogicAuto.RunExternalRule oDoc, EXTERNALrule

End Sub

Odpovědi:

Odeslal: issin
Datum odeslání: 01.srp.2019 v 10:36

Budu spekulovat. Prověřte v Inventoru záložka Nástroje: Možnosti (kliknout na šipku - rozbalit): iLogic-konfigurace. Otevře se okno ve kterém je možno definovat cestu k externím pravidlům. Tady bych asi začal. Z vlastní zkušenosti u mne nejčastěji byl problém v tom že nebyla cesta definována nebo byla chybná.

Odeslal: vasekkazda
Datum odeslání: 05.srp.2019 v 12:14

Děkuji,
kód už je opravený, místo hledání mezi přidanými externími pravidly, je nadefinována cesta kde jsou uloženy.
tedy:
Dim ExternalRuleFile As String
ExternalRuleFile = "C:\Users\vaclav.kazda\Documents\iLogic\STEPaSTL.iLogicVB"