| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY GeForce RTX® 4090, RTX® 4080 16GB, und RTX® 4080 12GB; PNY stellt die neue Generation der NVIDIA GeForce RTX 40 GPUs vor |
Autor
|
Thema: Kontur messen in 3D-Skizzen (4406 mal gelesen)
|
sanvoss Mitglied
Beiträge: 29 Registriert: 29.09.2008 IV 2010, SP2
|
erstellt am: 17. Jun. 2009 10:01 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, gibt es eine schnelle Möglichkeit ("zu Summierung hinzufügen" ist echt umständlich!)die Länge der angehägten Kontur zu messen. Entstanden ist die 3D-Skizze durch eine auf eine Fläche projizierte 2D-Skizze.... Im Forum habe ich nichts Ähnliches gefunden. Gruß, Sandra Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fyodor Ehrenmitglied V.I.P. h.c. Dipl.-Ing.(FH) Maschinenbau
Beiträge: 2667 Registriert: 15.03.2005 DELL Precision 7740 Intel Core i9-9980HK 32 GB RAM NVISIA Quadro RTX4000 Windows 10 Enterprise<P>SolidWorks 2019 SP3.0
|
erstellt am: 17. Jun. 2009 10:08 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
Eine schnellere Möglichkeit, um in der 3D-Skizze zu messen kenne ich nicht. Aber Sweepings lassen sich mit diesem Makro messen: Code: Sub Sweeplaenge() If ThisApplication.ActiveDocumentType <> kPartDocumentObject Then MsgBox "Das geöffnete Dokument ist kein Bauteil!", 0, "Fehler" Exit Sub End If On Error Resume Next Dim oParams As Parameters Set oParams = ThisApplication.ActiveDocument.ComponentDefinition.Parameters Dim oParam As Parameter Set oParam = oParams.UserParameters("SweepLength") Dim dLength As Double dLength = Round(ThisApplication.MeasureTools.GetLoopLength(ThisApplication.ActiveDocument.ComponentDefinition.Features.SweepFeatures(1).Path.Item(1).SketchEntity), 2) If oParam Is Nothing Then Set oParam = oParams.UserParameters.AddByValue("SweepLength", dLength, Inventor.UnitsTypeEnum.kCentimeterLengthUnits) Else Set oParam = oParams.UserParameters("SweepLength") oParam.Value = dLength End If oParam.ExposedAsProperty = True MsgBox "Parameter SweepLength: " & oParam.Expression End Sub
Die zugehörigen Icons für die Werkzeugleiste findest Du im angehängten ZIP-file P.S.: Das Macro habe ich nicht selbst geschrieben, sondern hier aus dem Forum, weiß aber nicht mehr von wem.
------------------ Cheers, Jochen [Diese Nachricht wurde von Fyodor am 17. Jun. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
sanvoss Mitglied
Beiträge: 29 Registriert: 29.09.2008 IV 2010, SP2
|
erstellt am: 17. Jun. 2009 10:29 <-- editieren / zitieren --> Unities abgeben:
|
Fyodor Ehrenmitglied V.I.P. h.c. Dipl.-Ing.(FH) Maschinenbau
Beiträge: 2667 Registriert: 15.03.2005 DELL Precision 7740 Intel Core i9-9980HK 32 GB RAM NVISIA Quadro RTX4000 Windows 10 Enterprise<P>SolidWorks 2019 SP3.0
|
erstellt am: 17. Jun. 2009 10:41 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
Vielleicht gibt es etwas einfacherers... vielleicht kann man mit etwas Programmierkenntnis das Macro auch entsprechende umschreiben. Ich kann es leider nicht. ------------------ Cheers, Jochen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 17. Jun. 2009 11:18 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 17. Jun. 2009 11:21 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
Fyodor Ehrenmitglied V.I.P. h.c. Dipl.-Ing.(FH) Maschinenbau
Beiträge: 2667 Registriert: 15.03.2005 DELL Precision 7740 Intel Core i9-9980HK 32 GB RAM NVISIA Quadro RTX4000 Windows 10 Enterprise<P>SolidWorks 2019 SP3.0
|
erstellt am: 17. Jun. 2009 11:25 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
Das soll ein Rollmaßband sein... ist aber nur in der großen Version halbwegs erkennbar. Ich bin halt Ingenieur und kein Grafiker ;-). Wichtig ist mir vor allem die schnelle Unterscheidbarkeit der einzelnen Knöpfe. ------------------ Cheers, Jochen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Big-Biker Ehrenmitglied V.I.P. h.c. Konstrukteur Sondermaschinen
Beiträge: 2588 Registriert: 14.10.2004 INV Prof. 2018 Fujitsu Celsius, 32 Gb Ram AMD Fire Pro W5100 SpaceNavigator, HP ZBook G3
|
erstellt am: 17. Jun. 2009 11:25 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 17. Jun. 2009 11:28 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
sanvoss Mitglied
Beiträge: 29 Registriert: 29.09.2008 IV 2010, SP2
|
erstellt am: 17. Jun. 2009 12:10 <-- editieren / zitieren --> Unities abgeben:
Ich kann immer noch nicht alles auf einmal messen. Vielleicht sieht man es in der Datei nicht richtig: Die Skizze ist eine 3D-Skizze. Sie ist das Resultat der Kopie einer 2D-Skizze auf einen Volumenkörper (Skizze projizieren) und stellt die Mittellinie für Fräsungen dar. Ich habe den Befehl "Anordnen" probiert - allerdings komme ich damit genauso weit wie mit "Kontur messen". Es kann nur eine Linie gemessen werden... Ich möchte nicht jedes Liniensegment einzeln messen, sondern die komplette Kontur. Gruß, Sandra
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Big-Biker Ehrenmitglied V.I.P. h.c. Konstrukteur Sondermaschinen
Beiträge: 2588 Registriert: 14.10.2004 INV Prof. 2018 Fujitsu Celsius, 32 Gb Ram AMD Fire Pro W5100 SpaceNavigator, HP ZBook G3
|
erstellt am: 17. Jun. 2009 12:16 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
sanvoss Mitglied
Beiträge: 29 Registriert: 29.09.2008 IV 2010, SP2
|
erstellt am: 17. Jun. 2009 12:59 <-- editieren / zitieren --> Unities abgeben:
|
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 17. Jun. 2009 13:35 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
Tja, in meiner Testdatei hat es funktioniert, und bei Deiner Datei gehen beide meiner Vorschläge auch bei mir nicht. Kann sein, dass es bei so vielen Linien nicht mehr geht. Alternative (nicht so schön, aber immer noch besser als alle einzeln zählen): AK, Sweeping an dem Pfad mit 1mm² Querschnitt (d=(4oE/PI)^0,5oE*1mm), Volumen messen. Hab ich auch gleich probiert. leider muss man auch dann an der 3D-Skizze6 in dieser Datei sämtliche Segmente einzeln anklicken. Dieses Vehalten kenne ich nur, wenn die Übergänge nicht richtig tangential sind. Wo kommt das Modell der Bank her? Möglicherweise entsprechen die Übergänge der Rundungen dort nicht den Genaugkeitskriterien von Inventor. ------------------ Roland www.Das-Entwicklungsbuero.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 17. Jun. 2009 13:46 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
sanvoss Mitglied
Beiträge: 29 Registriert: 29.09.2008 IV 2010, SP2
|
erstellt am: 17. Jun. 2009 13:48 <-- editieren / zitieren --> Unities abgeben:
In der 2D-Skizze sind alle Bögen tangential. Die Rundungen im Modell wurden mit dem Befehl "Rundung" erstellt - demnach sollten sie auch Tangential sein.... Die 3D-Skizze ist durch die verschiedenen Flächen ziemlich hügelig - das wird wohl der Knackpunkt sein! Gruß, Sandra Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Doc Snyder Moderator Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen
Beiträge: 13310 Registriert: 02.04.2004 IV 2019 + 2020 + 2021 W7pro64 F-Secure-Safe Dell-M4600 2,13GHz 12GB Quadro2000M 15,4"1920x1080 MS-IntelliMouse-Optical SpacePilotClassic
|
erstellt am: 17. Jun. 2009 15:57 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
|
sanvoss Mitglied
Beiträge: 29 Registriert: 29.09.2008 IV 2010, SP2
|
erstellt am: 17. Jun. 2009 16:08 <-- editieren / zitieren --> Unities abgeben:
Bin gerade wieder am Rumprobieren. Bei einfachen Konstruktionen klappt das Messen über "Anordnung". Wenn aber die Kontur auf unebeneren Flächen projiziert wird, werden nur ein paar Linien ausgewählt... Ich werden mich mal so langsam rantasten und die Sitzbank kontrollieren. Vielleicht sitzt da ja der Wurm drin... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ivpi Mitglied
Beiträge: 157 Registriert: 28.04.2016 Invetor 2018
|
erstellt am: 25. Nov. 2016 11:45 <-- editieren / zitieren --> Unities abgeben: Nur für sanvoss
Hallo Kollegen! Kann jemand eine ähnliche Sache auf für eine Konturmessung generieren. Ich will dann die Messung als Parameter abspeichern können um den Wert davon zu benutzen. Es sollte etwa so ablaufen: Macro aktivieren, Abfrage für "Kantenkontur, Kurve, Kurvenzug wählen), dann soll der Wert in als Parameter rausgeschrieben werden. Danke euch!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |