topic Re: Save a string value in dwg file in .NET Forum

Save a string value in dwg file

abdul.haseeb — Thu, 14 Feb 2019 07:17:28 GMT

Hi all,

I need to save a string value in dwg file say "something to be saved".

then when I needed I should get this value.

Please kindly help to get this.

Re: Save a string value in dwg file

_gile — Thu, 14 Feb 2019 08:39:29 GMT

Hi,

You can use an Xrecord in a DBDictionary to store the string.

You'll find many example in this forum, here's one.

Re: Save a string value in dwg file

abdul.haseeb — Thu, 14 Feb 2019 09:19:44 GMT

Thanks for this reply.

But in need something different....

Like variable while are already available in DWG

USERS1-5

Actually I want to save it in VB.net and want to get the same in ObjectARX c++ and vice versa

Re: Save a string value in dwg file

_gile — Thu, 14 Feb 2019 10:57:54 GMT

USERS1-5 is not saved in the drawing, this is why you have to use an Xrecord (or some Extended data attached to an unerasable object as the layer "0").

Xrecords (and xdata) can be accessed by any AutoCAD programation environment (AutoLISP, COM, .NET, ObjectARX).

"ABDUL_HASEED" and an Xrecord named "StringValue" which only contains one string.

        public void SaveStringInCurrentDrawing(string str)
        {
            var doc = Application.DocumentManager.MdiActiveDocument;
            var db = doc.Database;
            using (doc.LockDocument())
            using (var tr = new OpenCloseTransaction())
            {
                var nod = (DBDictionary)tr.GetObject(db.NamedObjectsDictionaryId, OpenMode.ForRead);
                DBDictionary dict;
                if (nod.Contains("ABDUL_HASEEB"))
                {
                    dict = (DBDictionary)tr.GetObject(nod.GetAt("ABDUL_HASEEB"), OpenMode.ForRead);
                }
                else
                {
                    dict = new DBDictionary();
                    nod.UpgradeOpen();
                    nod.SetAt("ABDUL_HASEEB", dict);
                    tr.AddNewlyCreatedDBObject(dict, true);
                }
                Xrecord xrec;
                if (dict.Contains("StringValue"))
                {
                    xrec = (Xrecord)tr.GetObject(dict.GetAt("StringValue"), OpenMode.ForWrite);
                }
                else
                {
                    xrec = new Xrecord();
                    if (!dict.IsWriteEnabled) tr.GetObject(dict.ObjectId, OpenMode.ForWrite);
                    dict.SetAt("StringValue", xrec);
                    tr.AddNewlyCreatedDBObject(xrec, true);
                }
                xrec.Data = new ResultBuffer(new TypedValue(1, str));
                tr.Commit();
            }
        }

        public string GetSavedStringInCurrentDrawing()
        {
            var doc = Application.DocumentManager.MdiActiveDocument;
            var db = doc.Database;
            using (doc.LockDocument())
            using (var tr = new OpenCloseTransaction())
            {
                var nod = (DBDictionary)tr.GetObject(db.NamedObjectsDictionaryId, OpenMode.ForRead);
                if (!nod.Contains("ABDUL_HASEEB"))
                    return null;
                var dict = (DBDictionary)tr.GetObject(nod.GetAt("ABDUL_HASEEB"), OpenMode.ForRead);
                if (!dict.Contains("ABDUL_HASEEB"))
                    return null;
                var xrec = (Xrecord)tr.GetObject(dict.GetAt("StringValue"), OpenMode.ForWrite);
                if (xrec.Data == null)
                    return null;
                return xrec.Data.AsArray()[0].Value.ToString();
            }
        }

Re: Save a string value in dwg file

stefan.hofer — Thu, 14 Feb 2019 12:48:27 GMT

you can also use custom properties:

thisDrawing.SummaryInfo.AddCustomInfo("MyKey", "MyValue");

and

string value = "";
thisDrawing.SummaryInfo.GetCustomByKey("MyKey", out value);

thisdrawing:

using acApp = Autodesk.AutoCAD.ApplicationServices.Application;
//...
thisDrawing = (AcadDocument)acApp.DocumentManager.MdiActiveDocument.GetAcadDocument();