---

Hallo

Ich habe ein Problem mit dem Scipt, es soll mir in der IDW eine Textbox erstellen und die Masse in kg anzeigen,
das funktioniert auch soweit, aber die Masse wir in Gramm dargestellt und in der Textbox ist irgend ein Fehler!

Hat jemand eine Idee wie ich die Masse in kg angezeigt bekomme und auf 0 Stellen gerundet?

Erstelle eine IDW positioniere eine Erstansicht mit einem Bauteil mit gültigen Masseeigenschaften und führe das Script aus!

Code:

---

Public Sub IDW_Textbox_mit_Masse()
 
    Masse_Text = "Gewicht: <Property Document='Model' PropertySet='Design Tracking Properties' Property='Mass' ></Property> kg"
   
    Set oGeneralNotes = ThisApplication.ActiveDocument.ActiveSheet.DrawingNotes.GeneralNotes
    Set oTG = ThisApplication.TransientGeometry
    Set oGeneralNote = oGeneralNotes.AddFitted(oTG.CreatePoint2d(25, 14), Masse_Text)
    oGeneralNotes.Item(oGeneralNotes.Count()).TextStyle.FontSize = 3 * 0.254
    oGeneralNotes.Item(oGeneralNotes.Count()).TextStyle.Rotation = pi / 2
   
End Sub

---

Gruß
Berno

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

---

Hallo

Ich habe es selber hingebogen

Themea erledigt

Closed

Bye
Berno

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

---

Und was ist die Lösung? So nutzt der Thread ja nicht wirklich was...

------------------
Grüsse
Jürgen
Über 1400 Tipps in der Inventor FAQ
Inventor Schulungsvideos und eBook zum runterladen
Die besten Tipps und Tricks für Einsteiger | für erfahrene Anwender | bei Inventor Abstürzen | die Simulation

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

---

Hallo

Hier ist die Lösung!

Code:

---

Masse_Text = "Gewicht <PhysicalProperty PhysicalPropertyID='72449' Precision='1'>MASSE</PhysicalProperty>"

---

Viel Spaß mit dem der es brauchen kann

Gruß
Berno

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