---

Hallo zusammen

Ich möchte gerne den Wert einer Bemassung auslesen und habe mal wie folgt angefangen:

Set DrwDocument = CATIA.ActiveDocument

Set DrwSheets = DrwDocument.Sheets
Set Drwsheet = DrwSheets.ActiveSheet
Set Drwviews = Drwsheet.Views
Set View = Drwviews.Item("Front view")
Set Dimensions = View.Dimensions
Set Dimension = Dimensions.Item("Dimension.1")

Set MyDimValue = Dimension.DrawingDimValue.Value

Ich habe nun Probleme mit dem vorerst letzten Schritt. Hierbei möchte ich die Eigenschaft "Value" des Objektes "Dimension.1" erhalten. Catia gibt hier die Meldung "Object doesn't support this property or method".

Vielleicht kann mir jemand helfen

Im vorraus Vielen Dank für eure Bemühungen

Martin

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

---

Hi Martin,

das liegt daran, dass es keine Value Eigenschaft gibt.
Benutze statt dessen ValueAsString2.

Zitat:

---

Original erstellt von mkna:
...
' Statt
' Set MyDimValue =Dimension.DrawingDimValue.Value
' benutze
  Set MyDimValue = Dimension.ValueAsString2
...

---

Aufruf laut Catia V5Automation:

  ValueAsString2( long  iNbDecimals,
                  boolean  iShowTrailingZeros) As CATBSTR 

Gets the value of the parameter as a string, with a given precision.

Parameters:
  iNbDecimals
    the maximum number of decimal places to use to generate the string
    (minimum 0, maximum 9)
  iShowTrailingZeros
    this argument says if trailing zeros have to be shown

  Example:
    This example gets the value of the existing dimension parameter
    and shows it in a message box
Dim str
str = dimension.ValueAsString;
MessageBox str

Hoffe es hilft dir weiter

Mfg
Proofin

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

---

Hallo Proofin

Vielen Dank für deinen Antwort

Wenn ich das richtig verstanden habe gehört die Eigenschaft ValueAsString2 zu dem Objektklasse Part. Ich möchte aber die Dimension aus einer Zeichnung ablesen. In der Hilfe finden sich ein entsprechendes Objekt in der Klasse der DrawingDocument.

Bis zum Objekt "DrawingDimension" bekomme ich das auch richtig deklariert. Aber ich habe Probleme mit der Unterklasse DrawingDim Value.

Martin

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

---

Sorry du hast recht das Objekt was du suchts ist das DrawingDimension, wenn ich das jetzt richtig verstanden habe.

Dafür gibt es wiederum die Funktion GetValue(), damit solltest du dann den Wert erhalten.

Proofin

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

---

Hallo

Hab es herausgefunden. Über die Methode "Getvalue" konnte ich die Dimension ansprechen. Damit der Code wie folgt aus:

Set DrwDocument = CATIA.ActiveDocument

Set DrwSheets = DrwDocument.Sheets
Set Drwsheet = DrwSheets.ActiveSheet
Set Drwviews = Drwsheet.Views
Set View = Drwviews.Item("Front view")
Set Dimensions = View.Dimensions
Set Dimension = Dimensions.Item("Dimension.4")

Set MyDimValue = Dimension.GetValue

Martin

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

---

Hallo zusammen,

ich habe auch eine Frage dazu:

Mit diesem Programm bekomme ich den exakten Wert heraus.
Wie kann ich mir denn nur die angezeigten Werte auslesen ?
Also bsp. die Fake- Dimensions und gerundeten Werte ?

Gruß,
shorty

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

---

Hallo Shorty,

versuche es mal mit:
der Unterfunktion 'GetFakeDimValue'.
Über die V5Automation.chm findest du sicherlich noch weitere interessante Funktionen für DrawingDimValues.

Grüsse Dominik

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

---

Hallo Dominik,

danke, habe schon viel gefunden und probiere es mal aus.

Gruß,
Shorty

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