| |
![](https://ww3.cad.de/php/image.php?resolution=width:20050) | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für NX |
Autor
|
Thema: Radius von Fläche (1872 mal gelesen)
|
met Mitglied CAD-Admin / Konstrukteur
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für met](/foren/ubb/pmimages/gbu.gif) Beiträge: 137 Registriert: 23.07.2004 Solidworks 2017 TCE 9.1.3 NX 5 3ds max 2017/2019 CorelDraw 12
|
erstellt am: 17. Mrz. 2011 10:05 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo, hat jemand ne Ahnung, wie die den Radius von SurfaceOfRevolution und Cylindrical auslesen kann? Wenn man eine Fläche auswählt und Informationen-->Objekt.. klickt, wird der Radius im ListingWindow ausgegeben. Code:
Imports System Imports NXOpenModule Module1 Dim theSession As NXOpen.Session = Session.GetSession() Sub Main() Ausgabe(Now) Dim workPart As Part = theSession.Parts.Work 'Flächen im workPart For Each aktBody As Body In workPart.Bodies Ausgabe(aktBody.JournalIdentifier & " - " & aktBody.GetFaces.Length) For Each aktFace As Face In aktBody.GetFaces Ausgabe(aktFace.SolidFaceType.ToString) aktFace.Unhighlight() Select Case aktFace.SolidFaceType Case Face.FaceType.SurfaceOfRevolution, Face.FaceType.Cylindrical aktFace.Highlight() End Select Next Next End Sub Sub Ausgabe(ByVal sText As String) theSession.ListingWindow.Open() theSession.ListingWindow.WriteLine(sText) End Sub End Module
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
met Mitglied CAD-Admin / Konstrukteur
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für met](/foren/ubb/pmimages/gbu.gif) Beiträge: 137 Registriert: 23.07.2004
|
erstellt am: 17. Mrz. 2011 11:30 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo, für Cylindrical habe ich es hinbekommen. Aber wie bekomme ich den Radius von SurfaceOfRevolution? Code:
Imports System Imports NXOpenModule Module1 Dim theSession As NXOpen.Session = Session.GetSession() Sub Main() Ausgabe(Now) Dim workPart As Part = theSession.Parts.Work For Each aktAttribut As NXObject.AttributeInformation In workPart.GetAttributeTitlesByType(NXObject.AttributeType.Any) Ausgabe(aktAttribut.ToString) Next 'Flächen im workPart For Each aktBody As Body In workPart.Bodies Ausgabe(aktBody.JournalIdentifier & " - " & aktBody.GetFaces.Length) For Each aktFace As Face In aktBody.GetFaces aktFace.Unhighlight() Select Case aktFace.SolidFaceType Case Face.FaceType.Cylindrical Dim mr As MeasureDistance = workPart.MeasureManager.NewDistance(Nothing, aktFace) Ausgabe(mr.Value) 'aktFace.Highlight() Case Face.FaceType.SurfaceOfRevolution End Select Next Next End Sub Sub Ausgabe(ByVal sText As String) theSession.ListingWindow.Open() theSession.ListingWindow.WriteLine(sText) End Sub End Module
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Jan Boettcher Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Jan Boettcher](/foren/ubb/pmimages/gbu.gif) Beiträge: 183 Registriert: 22.06.2005 NX 7.5 - NX 2007 SolidWorks 2006 - 2021 Win 10
|
erstellt am: 17. Mrz. 2011 12:15 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für met
Hallo met, Was ist denn der Radius von einer SurfaceOfRevolution? Im Sinne des Radius einer Cylindrical Face wie ihn Dein Programm ermittelt, hat eine SurfaceOfRevolution unendlich viele Radien. Viele Grüße Jan ------------------ Jan Böttcher www.ib-boettcher.de
[Diese Nachricht wurde von Jan Boettcher am 17. Mrz. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
met Mitglied CAD-Admin / Konstrukteur
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für met](/foren/ubb/pmimages/gbu.gif) Beiträge: 137 Registriert: 23.07.2004
|
erstellt am: 17. Mrz. 2011 14:29 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo, hier ein Auszug aus Info. Ich hätte gerne den Innenradius Code:
Informationen über Objekt # 1 Besitzendes Teil D:\EXPORT_NX\P20046XXYY_V-01.00.prt Layer 1 Typ Fläche Farbe [von Körper] 87 (Hellgrau) Font SOLID Breite Normal Geänderte Version 198 11 Nov 2010 11:44 (durch Anwender rogner) Erzeugte Version 166 17 Feb 2010 18:55 (durch Anwender rogner) Inform.-Einheit mm Flächentyp Torusförmig Mitte XC = 371.982392380 X = 371.982392380 YC = 815.845012523 Y = 815.845012523 ZC = 5.000000000 Z = 5.000000000 Achse - Absolut I = 0.000000000 J = 0.000000000 K = 1.000000000 Achse - WCS I = 0.000000000 J = 0.000000000 K = 1.000000000 Hauptradius = 463.394052068 Innenradius = 5.000000000
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
![](https://ww4.cad.de/Ads/adview.php?what=zone:16178&n=aee1ae73)
| Projektingenieur HVAC & Utility / Technische Gebäudeausrüstung (m/w/d) | PASSION FOR PHARMA ENGINEERING: Dafür steht PHARMAPLAN. Als führender Engineering-Partner in Europa planen und realisieren wir für unsere industriellen Kunden integrierte und ganzheitliche pharmazeutische Produktionsanlagen und bieten zukunftssichere Lösungen. Als Teil der TTP GROUP mit über 1.100 Mitarbeitenden und 29 Standorten in 6 Ländern legen wir großen Wert auf persönliche Entwicklung durch individuelle Karriereplanung.... | Anzeige ansehen | Projektmanagement |
|
mseufert Moderator Freiberuflicher CAD/CAM Ingenieur
![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif) ![](/foren/ubb/Admin4.gif) ![](/foren/ubb/Admin5.gif) ![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif)
![Schreiben Sie einen Gästebucheintrag für mseufert](/foren/ubb/pmimages/gbu.gif) Beiträge: 2624 Registriert: 18.10.2005 HP Z420 WIN7 64 Win 10 UG NX6-1980 3D Printer Prusa MK2 S
|
erstellt am: 17. Mrz. 2011 15:15 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für met
Met, Du hast hier einen TORUS am Wickel, keine SurfaceOfRevolution. Die hat, wie Dir Jan schon versucht hat klarzumachen, keinen eideutigen Radius. Da es den Radius also geometrisch nicht gibt, kann Über die API auch keiner ausgelesen werden. Mögliche Alternative: Über Geometric Properties die Hauptkrümmungen an einer bestimmten Stelle der Fläche abfragen. Gruß, Michael Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |