Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de
  AutoCAD VBA
  Objekte aus Xref erhalten

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
  
PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
Autor Thema:  Objekte aus Xref erhalten (1349 mal gelesen)
Frenzelp
Mitglied


Sehen Sie sich das Profil von Frenzelp an!   Senden Sie eine Private Message an Frenzelp  Schreiben Sie einen Gästebucheintrag für Frenzelp

Beiträge: 3
Registriert: 25.11.2011

erstellt am: 25. Nov. 2011 20:43    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

ich habe habe folgendes Problem.
Ich möchte Blöcke aus einer Xref in die eigentliche Zeichnung kopieren.
Wenn ich auf ein AttibuteReference-Objekt des gewünschten Blockes klicke, bekomme ich über die OwnerID die BlockReference. So solle es sein.
Wenn ich aber auf ein geometrisches Object der gleichen Blockrefence klicke, bekomme ich nur ein AcDbBlockTableRecord.
Mir ist keine Möglichkeit bekannt, aus dem AcDbBlockTableRecord ein Entity-Objekt zu bekommen.

Zur Demonstration ein kleines Video.

Kennt jemand das Problem? hat jemand eine Lösung?

Hier mal stark vereinfacht der Code

Sub XrefEntGet()


Dim geklicktesObject As AcadEntity
Dim OwnerObject As Object
Dim PP As Variant, tm As Variant, cd As Variant

'zur Übersichtlichkeit keine Fehlerbehandlung eingebaut!

'hier hole ich mir das Objekt aus der Xref

ThisDrawing.Utility.GetSubEntity geklicktesObject, PP, tm, cd
MsgBox "gewählter Objecttyp: " & geklicktesObject.ObjectName

'hier hole ich mir das übergeordnete Objekt
OwnerObject oObj = ThisDrawing.ObjectIdToObject(geklicktesObject.OwnerID)
MsgBox "Owner Objecttyp: " & oObj.ObjectName


End Sub


Viele Grüße

Peter

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

Brischke
Ehrenmitglied V.I.P. h.c.
CAD on demand GmbH



Sehen Sie sich das Profil von Brischke an!   Senden Sie eine Private Message an Brischke  Schreiben Sie einen Gästebucheintrag für Brischke

Beiträge: 4191
Registriert: 17.05.2001

ACAD20XX, defun-tools

erstellt am: 26. Nov. 2011 10:43    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Frenzelp 10 Unities + Antwort hilfreich

Hallo Peter,

du hast einen Gedankenfehler oder der Zeichnungsaufbau ist dir nicht ganz klar.

Attributreferenzen hängen immer an einer BlockReference (logisch, sonst könnten diese ja nicht von Blockreferenz zu Blockreferenz verschiedene Werte enthalten).
Alle anderen Objekte sind im BlockTableRecord enthalten, da diese ja (per Definition) nicht von Blockreferenz zu Blockreferenz verschieden sein können.

Grüße!
Holger

------------------
Holger Brischke
CAD on demand GmbH
Individuelle Lösungen von Heute auf Morgen.


defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!

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

Frenzelp
Mitglied


Sehen Sie sich das Profil von Frenzelp an!   Senden Sie eine Private Message an Frenzelp  Schreiben Sie einen Gästebucheintrag für Frenzelp

Beiträge: 3
Registriert: 25.11.2011

erstellt am: 26. Nov. 2011 12:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Holger,

vielen Dank für die Antwort.
Ok. Das ist ist die Erklärung, warum ich nicht die Blockreference über ein grafisches Objekt aus der Blockdefinition bekomme. Daran hatte ich nicht gedacht. Ich hoffte eigentlich, dass ich über die GetSubEntity Funktion das nächste Objekt in der Hierarchie bekomme. Diese Funktion greift ja bis zur letzten Ebene durch.

Wie bekomme ich aber das Blockreference-Object des angeklickten Elements?


Viele Grüße
Peter

[Diese Nachricht wurde von Frenzelp am 26. Nov. 2011 editiert.]

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

KlaK
Ehrenmitglied V.I.P. h.c.
Dipl. Ing. Vermessung, CAD- und Netz-Admin



Sehen Sie sich das Profil von KlaK an!   Senden Sie eine Private Message an KlaK  Schreiben Sie einen Gästebucheintrag für KlaK

Beiträge: 2855
Registriert: 02.05.2006

AutoCAD LandDesktop R2 bis 2004
Civil 3D 2005 - 2025
Plateia, Canalis
Visual Basic

erstellt am: 17. Dez. 2011 10:59    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Frenzelp 10 Unities + Antwort hilfreich

Besteht noch Klärungsbedarf?

Wobei mir die Aufgabenstellung noch nicht ganz klar ist. Möchtest Du das gewählte Objekt aus der Xref in die aktuelle Zeichnung an die gleiche Stelle kopieren (also samt den Einträgen in den Attributen) oder willst Du den Block (mit Attributen) aus der referenzierten Zeichnung kopieren um ihn dann an anderer Stelle mit neuen Werten zu füllen.

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

Frenzelp
Mitglied


Sehen Sie sich das Profil von Frenzelp an!   Senden Sie eine Private Message an Frenzelp  Schreiben Sie einen Gästebucheintrag für Frenzelp

Beiträge: 3
Registriert: 25.11.2011

erstellt am: 18. Dez. 2011 10:19    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

ja, es besteht noch Klärungsbedarf. Ich möchte das gewählte Objekt aus der Xref mit seinen Daten (Attributen, Xdata) in die aktuelle Zeichnung kopieren. 

Viele Grüße

Peter

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2025 CAD.de | Impressum | Datenschutz