---

Guten Morgen zusammen,

gibt es eine Möglichkeit den Schwerpunkt in einer Ableitung darzustellen? In einer BG kann ich diesen darstellen, bräuchte ihn aber auch in der Ableitung um so die Position bemaßen zu können.

Gruß,

Oli.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Das ist eine gute Frage, ich habe das auch schon mal gewollt und nicht so recht hingekriegt.

Einziger Vorschlag:

Die Koordinaten des SP aus den iProperties herauslesen und dann über Arbeitsebenen, die mit den herausgelesenen Abständen zu den Ursprungsebnenen konstruiert werden einen Arbeitspunkt setzen.
Und dort dann irgendwie mit einer Skizze ein infinitesimales Kreiselement zeichnen und extrudieren oder so...was besseres wüsste ich auch nicht und gibt die Hilfe auch nicht her...

Grüsse Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Oli,
Im Prinzip so wie Mario es beschreibt(bist zum Arbeitspunkt).
In der idw, in der Ansicht Arbeitselemente einblenden. Dann sollte dort der Arbeitpunkt, der ja im Schwerpunkt liegt, sichtbar sein

------------------
mfg Robert

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ha dann habe ich ja gerade auch wieder was gelernt :-)

Habe nicht gewusst (und muss zu meiner SChande gestehn auch nie probiert) Arbeitspunkte in der idw darzustellen.

Danke und Gruss

Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

... und mit der iPropertyCollection von Patrick de Stobbeleir lässt sich der Arbeitspunkt im Schwerpunkt automatisch erzeugen.

------------------
Michael Puschner
Autodesk Inventor Certified Expert
Scholle und Partner GmbH

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

und dann gibt es ja auch die Makros, mit denen man den Workpoint ganz komfortabel erzeugen kann:

Public Sub Workpointatmasscenter()
 
    Dim oApp As Inventor.Application
    Set oApp = ThisApplication
 
    If oApp.ActiveDocumentType <> kPartDocumentObject And oApp.ActiveDocumentType <> kAssemblyDocumentObject Then
        MsgBox "Ppart- oder Assembly-Document muss aktiv sein", 16, "Falscher Fehler"
        Exit Sub
    End If

    Dim oDoc As Document
    Set oDoc = ThisApplication.ActiveDocument

    Dim oCenterOfMass As point
    Set oCenterOfMass = oDoc.ComponentDefinition.MassProperties.CenterOfMass

    On Error Resume Next
    Dim oWorkPoint As WorkPoint
    Set oWorkPoint = oDoc.ComponentDefinition.WorkPoints.Item("Center Of Mass")
 
    If Err.Number = 0 Then
        Dim oFixedDef As FixedWorkPointDef
        Set oFixedDef = oWorkPoint.Definition
     
        oFixedDef.point = oCenterOfMass
        oDoc.Update
    Else
     
        Set oWorkPoint = oDoc.ComponentDefinition.WorkPoints.AddFixed(oCenterOfMass)
        oWorkPoint.Name = "Center Of Mass"
     
    End If
 
End Sub

-------------------------------

Das Ding muß mann eben immer dann noch einmal laufen lassen, wenn man am Teil etwas geändert hat.

------------------
Gruß Lothar

---------------------------------------------------

Während man es aufschiebt, verrinnt das Leben.
—Lucius Annaeus Seneca (ca. 4 v. Chr - 65 n. Chr.)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo!

Danke für die rasche Hilfe. Mit dem Arbeitspunkt manuell in der BG erstellen ist so eine Sache - der Mensch ist ja schließlich faul.

Da gefällt mir das Macro natürlich viel besser. Aber die Punkte gibts für alle!!!

Schönes WE,

Oli.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Oli,

ich habe hier ein weiteres Tool beschrieben inkl. einblenden von Arbeitselemente. Bilder dazu dort

------------------
Grüsse
Jürgen
www.inventor-faq.de
Autodesk Inventor Certified Expert

[Diese Nachricht wurde von invhp am 16. Apr. 2005 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP