---

Hallo,

ich moechte gerne die Drawing Properties auslesen und schreiben.

Summary lesen mach ich so:

Private Sub NewCmd1()
Dim acDocument As Document = DocumentManager.MdiActiveDocument
Dim acDatabase As Database = acDocument.Database
Dim myTitle As String = acDatabase.SummaryInfo.Title.ToString
End Sub

Summary schreiben? Das Programm bricht bei der letzten Zeile ab.

Private Sub NewCmd2()
Dim acDocument As Document = DocumentManager.MdiActiveDocument
Dim acDatabase As Database = acDocument.Database
Dim acSummaryInfo As DatabaseSummaryInfo = New DatabaseSummaryInfo
Dim mySummaryInfoBuilder As DatabaseSummaryInfoBuilder = New DatabaseSummaryInfoBuilde(acDatabase.SummaryInfo)
mySummaryInfoBuilder.Author = "TB"
acSummaryInfo = mySummaryInfoBuilder.ToDatabaseSummaryInfo()
acDatabase.SummaryInfo = mySummaryInfoBuilder.ToDatabaseSummaryInfo()
End Sub

Custom Properties lesen und schreiben ???

Bin fuer jede Antwort oder Beispielcode dankbar.

Gruss Alfonso

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

---

Kann mir den niemand helfen?

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

---

Hallo Alfonso,

in c# sieht's so aus:

Code:

---

Database _db = Autodesk.AutoCAD.DatabaseServices.HostApplicationServices.WorkingDatabase;
            DatabaseSummaryInfoBuilder infoBuilder = new DatabaseSummaryInfoBuilder(_db.SummaryInfo);
            infoBuilder.Author = "Hans Meiser";
            _db.SummaryInfo = infoBuilder.ToDatabaseSummaryInfo();

---

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!

[Diese Nachricht wurde von Brischke am 28. Nov. 2011 editiert.]

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

---

Zitat:

---

Original erstellt von Alfonso:
Kann mir den niemand helfen?

---

... schon zu einem funktionierenden Ergebnis gekommen?

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

---

Hallo Holger,

bin die ganze woche auf der Baustelle und werde erst am Wochenende dazu kommen. Rueckmeldung kommt aber auf jeden fall!

Gruss Alfonso

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