| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für NX |
| | |
 | Solid Edge 2025 First Look Online-Event 14.11.2025, eine Pressemitteilung
|
|
Autor
|
Thema: RGB Farben direct ansprechen (3117 mal gelesen)
|
uwe.a
Ehrenmitglied
maschbau-ing.
   Beiträge: 1939
Registriert: 20.12.2000 Windows7/64Pro
Vmware7.1 UG11-Nx9
|
erstellt am: 26. Nov. 2005 13:42  <-- editieren / zitieren -->   Unities abgeben:          
Aus verschieden Gründen (mehrer CDF Configs) möchte möchte ich Geometriefarben direkt über die RGB Farben bestimmen. In Grip gibt da ein Beispiel für die Backgroundcolor. Funktioniert es auch mit normaler Geometrie? Von Journaling hab ich noch keine Ahnung  . Würde aber gerne Wissen ob diese Funktion bereits unterstützt wird. (... Code Beispiele wären nett) mfg uwe.a Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
stefan.f
Mitglied
Beiträge: 126
Registriert: 03.09.2002
|
erstellt am: 28. Nov. 2005 07:17 <-- editieren / zitieren --> Unities abgeben: Nur für uwe.a 
|
uwe.a
Ehrenmitglied
maschbau-ing.
Beiträge: 1939
Registriert: 20.12.2000 Windows7/64Pro
Vmware7.1 UG11-Nx9
|
erstellt am: 05. Dez. 2005 09:45 <-- editieren / zitieren --> Unities abgeben:
|
stefan.f
Mitglied
Beiträge: 126
Registriert: 03.09.2002
|
erstellt am: 05. Dez. 2005 15:21 <-- editieren / zitieren --> Unities abgeben: Nur für uwe.a
Das ist eigentlich der Aufruf aus UGOpen. Aber im Journaling heissen die Routinen fast genau so. Hier noch ein BSP fürs Journaling:
Es werden die RGB Werte für die Körper im Part ausgegeben. Imports System
Imports NXOpen
Imports NXOpen.UF Module NXJournal Sub Main Dim s As Session = Session.GetSession()
Dim ufs As UFSession = UFSession.GetUFSession()
Dim b As Body
Dim clr_name As String
Dim clr_values As Double() = {255,255,255}
Dim text As String
If Not s.Parts.Work Is Nothing Then
For Each b In s.Parts.Work.Bodies
ufs.Disp.AskColor(b.Color,0,clr_name,clr_values)
s.ListingWindow.Open() text = CType(255 * clr_values(0), String) + " " + CType(255 * clr_values(1), String) + " " + CType(255 * clr_values(2), String)
s.ListingWindow.WriteLine(text)
s.ListingWindow.WriteLine(clr_name)
Next
End If
End Sub
End Module Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
met
Mitglied
CAD-Admin / Konstrukteur
Beiträge: 142
Registriert: 23.07.2004 Solidworks 2017
TCE 9.1.3
NX 5
3ds max 2017/2019
CorelDraw 12
|
erstellt am: 01. Jul. 2008 15:20 <-- editieren / zitieren --> Unities abgeben: Nur für uwe.a
|
| |
mseufert
Moderator
Freiberuflicher CAD/CAM Ingenieur
    
Beiträge: 2723
Registriert: 18.10.2005 HP Z420
WIN7 64 Win 10
UG NX6-2306
3D Printer Prusa MK2 S
|
erstellt am: 01. Jul. 2008 16:06 <-- editieren / zitieren --> Unities abgeben: Nur für uwe.a
Hallo met, Farbe lesen oder setzen geht über das Property color, das alle "displayable Objects" haben. Also: body_as_object.color = int. Der Integer ist im Bereich von 0 bis 216. Falls Du RGB- Werte brauchst, schau' mal in UFDisp. Gruß, Michael Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
