Pomocí jednoduchého makra v iLogic, resp. ve VBA, můžete přepnout či nastavit aktuální Styl zobrazení a Styl osvětlení v otevřeném dokumentu součásti (IPT) nebo sestavy (IAM).
Pro nastavení použijte tento předpis - požadovaný režim zobrazení zvolte z výčtového seznamu DisplayModeEnum, název režimu osvětlení pak z lokalizovaného názvu v nabídce ribbonu Vzhled v Inventoru:
' Display style/mode:
Dim oView As View = ThisApplication.ActiveView
oView.DisplayMode = DisplayModeEnum.kTechnicalIllustrationRendering
' kShadedWithEdgesRendering, kWatercolorRendering, etc.
oView.Update
' Lighting style:
newLighting = "Mřížkované světlo" ' Alpy, Dvě světla, Fotokabina, Starý sklad, etc.
Dim oDoc As Document = ThisApplication.ActiveDocument
If oDoc.DocumentType = DocumentTypeEnum.kAssemblyDocumentObject Then
Dim oAssy As AssemblyDocument = oDoc
oAssy.ActiveLightingStyle = oAssy.LightingStyles.Item(newLighting)
Else If oDoc.DocumentType = DocumentTypeEnum.kPartDocumentObject Then
Dim oPart As PartDocument = oDoc
oPart.ActiveLightingStyle = oPart.LightingStyles.Item(newLighting)
End If
![Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk
- od firmy Arkance Systems [www.cadforum.cz slaví 20 let]](/common/cf-top-logo.png "Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk
- od firmy Arkance Systems [www.cadforum.cz slaví 20 let]"){kind=logo}
AutoCAD a LT
Inventor
Revit
Civil 3D
Fusion 360
CAD tip # 12519:
Inventor
Inventor
