Writing material to iProperties

[Anonymous]

Good day everyone,
I have a rule .... iProperties.PartColor, and thanks to it, my color is automatically written to iProperties. I can't figure out what to replace .PartColor, I was writing material. Thanks

[JhoelForshav]

Hi @Anonymous 

Part document objects have the property ActiveMaterial.

Try this ilogic rule in a part document to get the name of the material.

I assume you already know how to create and add values to properties? 🙂

Dim oDoc As PartDocument = ThisDoc.Document
Dim oMaterialName As String = oDoc.ActiveMaterial.DisplayName
MsgBox(oMaterialName)

[Anonymous]

I need the material to be written to my iProperties. The whole rule for color is this: 

iProperties.Value("Custom","Povrchová úprava/Dekor")=iProperties.PartColor

[JhoelForshav · Accepted solution]

Dim oDoc As PartDocument = ThisDoc.Document
iProperties.Value("Custom", "Material") = oDoc.ActiveMaterial.DisplayName

[Anonymous]

Thank you very much. You helped me a lot.