---

Hallo zusammen,

hat jemand eine Idee, Ansatz oder vielleicht einen Code, wie man verschachtelte XRefs auslesen kann?
D.H.
Ich habe eine Zeichnung in der ein XRef ist, dieses XRef beinhaltet ein weiteres XRef, u.s.w. Wie kann ich nun in einem Listenfeld die Namen der XRefs anzeigen?

Bin über jeden Hinweis dankbar...

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

cu
Heiko

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

---

Hallo Heiko,
hab mir das mal angesehen. Mach Dir in VBA mal ein Konstrukt wie folgt:

Public Sub test()
    Dim acDoc As AcadDocument
    Set acDoc = ThisDrawing
   
End Sub

dann Breakpoint auf "End Sub", laufen lassen und beim Break schaust Du Dir im Überwachungsfenster mal das Objekt acDoc und davon die Blocks an.
Bei den Blöcken solltest Du alle Xrefs finden, die - auch verschachtelt - in der Zeichnung sind (Property IsXRef).
In den jeweiligen Xrefs die Items aufklappen, und hier kommen ggf. weitere XRefs zutage.
Schau Dir also einfach mal in Ruhe das Objekt Thisdrawing an, damit solltest Du etwas anfangen können.

Gruß
Norbert

[Diese Nachricht wurde von Norbert AC am 21. März 2003 editiert.]

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