---

Ich möchte den Inhalt bzw die enthaltenen Objekte in einem BlocktableRecord löschen, ohne den BlocktableRecord selbst per Erase() zu löschen. Heißt, ich will Name und Origin des Records behalten.
In VB sieht das ungefähr so aus:

Code:

---

        Set BlockobjDetail = ThisDrawing.Blocks.Add(insertionPnt, Blockname)
        For I = 0 To BlockobjDetail.Count - 1
            BlockobjDetail.Item(0).Delete
        Next I

---

Blocks.Add erzeugt nicht zwingend einen neuen Block, sondern gibt nur eine Variable vom Typ AcadBlock zurück, falls schon ein Block mit dem angegebenen Namen existiert.
Bis dahin komme ich auch, aber der Zugriff auf die enthaltenen 'Items' und das Löschen will nicht so ganz.

Code:

---

string blkName = "Blockname"
Document doc = ACADAPP.Application.DocumentManager.MdiActiveDocument;
            Database db = doc.Database;
            Editor ed = doc.Editor;
            Transaction tr = db.TransactionManager.StartTransaction();

BlockTable bt = (BlockTable)tr.GetObject(db.BlockTableId, OpenMode.ForRead);
BlocktableRecord btr = ((BlockTableRecord)bt[blkName].Open(OpenMode.ForRead))

---

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

---

Hallo coLami,

vom Prinzip her ganz einfach: (nur mal so runtergetippt)
1) BlockTableRecord des Blockes suchen
Blocktablerecord _btr = BlockTable["BlockName"].Open(..)
2) Dann den BlockTableRecord durchhecheln und jedes Element löschen
foreach(ObjectId _oid in _btr)
{
Entity _ent = (Entity)_tr.GetObject(_oid,OpenMode.ForWrite)
_ent.Erase(true);
_ent.Close();
}
_btr.Close();

Das sollte so gehen.

Bei Fragen ...

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

---

super, danke!

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