iLogic: Aus dem Modell eine Regel in der Zeichnung aufrufen

Oder allgemeiner: Aus einer Datei eine Regel in der einer anderen Datei aufrufen. Hier der Quellcode mit Kommentaren zur Erklärung.

==>

Die ilogic Regel Regel_IDW in der IAM soll die Regel Meldung_IDW in der zugehörigen gleichnamigen Zeichnung ausführen.

'Extension zu Zeichnung und Regelname in der Zeichnung anpassen
Dim Ext As String = "dwg"
Dim Regelname As String = "Meldung_IDW"
'---------------------------------
'Hier wird der Pfad der Zeichnung erzeugt aus dem Dateipfad des aktuellen Modells zzgl. 
'der Dateiendung im der Var. Ext
'Der Pfad kann auch absolut angegeben werden, wenn er nicht ais dem Pfad des aktuellen
'Dokuments zusammengesetzt werden kann.
'Bsp: Dim DWGPfad As String = "c:\Zeichnungen\xyz.ipt"
Dim DWGPfad As String = ThisDoc.PathAndFileName(False) & "." & Ext
'Die Var. geladen wird benötigt, um die Zeichung ggf. zu laden, falls sie nicht schon
'geladen ist.
Dim geladen As Boolean = False
Dim iLogicAuto = iLogicVb.Automation
Dim Doc As Document
For Each Doc In ThisApplication.Documents.VisibleDocuments
	If Doc.FullFileName = DWGPfad Then
		oDoc = Doc	
		geladen = True
		Exit For
	End If
Next
If gelanden = False Then oDoc = ThisApplication.Documents.Open(DWGPfad)
iLogicAuto.RunRule(oDoc, Regelname)

Video, das die Funktion zeigt: