Příklad iLogic kódu, kterým můžete ověřit, že aktuální dokument je plechový díl (sheet metal .IPT) a zda obsahuje nebo neobsahuje díry (jak modelované, tak v rozvinu).
Pro zjištění typu, resp. podtypu dokumentu "Sheet Metal" můžete použít jednu z těchto tří naznačených metod:
If iProperties.Value("Project", "Document SubType Name") = "Sheet Metal" Then
MsgBox("Je to plech 1")
End If
If ThisApplication.ActiveDocument.SubType = "{9C464203-9BAE-11D3-8BAD-0060B0CE6BB4}" Then
MsgBox("Je to plech 2")
End If
Dim oPDoc As PartDocument = ThisDoc.Document
If TypeOf oPDoc.ComponentDefinition Is SheetMetalComponentDefinition Then
MsgBox("Je to plech 3")
End If
Pro ověření přítomnosti děr v aktuálním plechovém dílu pak použijte tento fragment iLogic kódu:
i = 0
'folded model holes?
For Each oFeature In ThisDoc.Document.ComponentDefinition.Features
If oFeature.Type = ObjectTypeEnum.kHoleFeatureObject Then
i = i + 1
End If
Next
'flat pattern holes?
For Each oFeature In ThisDoc.Document.ComponentDefinition.FlatPattern.Features
If oFeature.Type = ObjectTypeEnum.kHoleFeatureObject Then
i= i + 1
End If
Next
If i > 0 Then
MsgBox("Obsahuje díry")
Else
MsgBox("NEobsahuje díry")
End If