Color change using i logic

[justin.johnsonQLTK2]

Hi All,

I am new to ilogic. I would like to use part color based on different material and processes, I am using manual appearance change now. Is it possible to automate the processes?

The processes flow will be.

Open part > Select part > Click the I logic button Change color (Run the script)

Open and select part or surface will be manual.

Is it possible to add RGB in I logic instead of color name like read, green ec..?

Thanks in Advance,

Justin

[Stakin]

There many threads for change color

like:

change-part-colour-using-quot-rgb-quot-values：
https://forums.autodesk.com/t5/inventor-ilogic-api-vba-forum/change-part-colour-using-quot-rgb-quot-...
face-color-change-random-inventor：
https://forums.autodesk.com/t5/inventor-ilogic-api-vba-forum/face-color-change-random-inventor/m-p/1...
appearance-asset-setcolor-method：
https://forums.autodesk.com/t5/inventor-ilogic-api-vba-forum/appearance-asset-setcolor-method/m-p/73...

I believe them can help you.

best regards

[JMGunnar]

Check

@ClintBrown3D

 https://clintbrown.co.uk/2019/05/04/ilogic-set-every-part-to-a-different-colour/

Johan G

[JelteDeJong]

If you want a bit more information out of the colouring of your parts (then the rule that Clint wrote) have a look at this post: "Set different colour for each component of Assembly based on the PN." Here the colours are based on the part number.

[justin.johnsonQLTK2]

Thanks all for your help..

[justin.johnsonQLTK2 · Accepted solution]

Dim oDoc As PartDocument = ThisDoc.Document
Dim oRenderStyles As RenderStyles = oDoc.RenderStyles
Dim oName As String = "ALUMINIUM_MACHINING"
Dim styleExists As Boolean = False
Dim myStyle As RenderStyle
For Each oRenderStyle As RenderStyle In oRenderStyles
 If oRenderStyle.Name = oName
  styleExists = True
  myStyle = oRenderStyle
  Exit For
 End If
Next
If Not styleExists
 myStyle = oRenderStyles.Add(oName)
 myStyle.SetAmbientColor(255, 190, 190)
 myStyle.SetDiffuseColor(255, 190, 190)
End If

For Each oSurfBod As SurfaceBody In oDoc.ComponentDefinition.SurfaceBodies
 For Each oFace As Face In oSurfBod.Faces
  oFace.SetRenderStyle(37123, myStyle)
 Next
Next


I found this helpful