---

Hallo Gemeinschaft,

ich versuche in einer Zeichnung alle Prüfmaße zu finden, scheitere aber an der Stelle, wo ich erkennen kann, ob das Maß "normal" oder eine Prüfmaß ist.
Mein Code sieht so aus:

Code:

---

Public Function getPrüfmaße() As String
  Dim oEntity As AcadEntity
   Dim oLayout As AcadLayout
 
  Dim sFile As String
 
    For Each oLayout In ThisDrawing.Layouts
        For Each oEntity In oLayout.Block
            If TypeOf oEntity Is AcadDimRotated Then
            sFile = sFile & oEntity.Measurement & vbTab
        End If
        Next
   Next
  
MsgBox sFile
End Function

---

Hat einer ne Idee, welche Eigenschaft ich abfragen soll um nur die als Prüfmaß deklarierte Maßlinien zu finden?
Danke  :-)

[Diese Nachricht wurde von insidERR am 10. Feb. 2012 editiert.]

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

---

Keiner ne Idee?

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

---

ähm, keine Ahnung was ein Prüfmaß ist und worin der Unterschied zu einem normalen Maß ist.

Wie unterscheidest du denn in der analogen bzw. manuellen auswahl welches welches ist?

LG
reltro

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

---

Idee :
Maße durchscannen ... XDATAS der MAßobjekte auslesen .. auf "ACAD_DSTYLE_DIMINSPECT" überprüfen ....  ?

------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Hallo CADmium,
das war der entscheidende Tip. Danke dir.
Hab noch gegoogelt paar Codeschnipsel gefunden und zu was brauchbarem zusammen gesetzt. Jetz funzt es.

reltro: ein Beispiel für Prüfmaße

"10" ist nicht umrandet = KEIN Prüfmaß

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