[bargool]

Есть динамический блок с атрибутами и прочими извращениями в текущем файле и в неком эталонном постороннем файле.
Необходимо обновить блок в текущем файле в соответствии с изменившимся эталоном.
Я догадался до такого способа, но может, можно сделать всё проще?

Код:

[Выделить все]

[CommandMethod("blockRedefine", CommandFlags.Session)]
public void blockRedefine()
{
	// "Текущий" документ
	currDwg = Application.DocumentManager.MdiActiveDocument;
	currDatabase = currDwg.Database;
	DocumentCollection docManager = Application.DocumentManager;
	//открываем файл с эталонным блоком в режиме для чтения
	Document frameDoc = docManager.Open(@"Путь до файла.dwg", true);
	Database frameDb = frameDoc.Database;
	ObjectIdCollection frameCollection = new ObjectIdCollection();
	using (DocumentLock docLock = frameDoc.LockDocument())
	{
		using (Transaction transaction = frameDb.TransactionManager.StartTransaction())
		{
			BlockTable frameBlockTable = (BlockTable)transaction.GetObject(frameDb.BlockTableId, OpenMode.ForRead);
			// Пытаемся открыть эталонный блок
			BlockTableRecord frameBlock = transaction.GetObject(frameBlockTable["Frame"], OpenMode.ForRead) as BlockTableRecord;
			// если получилось - описание блока есть, добавляем в ObjectIdCollection для переноса в "текущий" документ
			if (frameBlock != null)
			{
				frameCollection.Add(frameBlock.ObjectId);
			}
		}

	}
	// Переключаемся на "текущий документ"
	docManager.MdiActiveDocument = currDwg;
	using (DocumentLock docLock = currDwg.LockDocument())
	{
		using (Transaction transaction = currDatabase.TransactionManager.StartTransaction())
		{
			BlockTable blockTable = (BlockTable)transaction.GetObject(currDatabase.BlockTableId, OpenMode.ForRead);
			IdMapping idmapping = new IdMapping();
			// пишем определение эталонного блока в "текущий" файл с заменой
			frameDb.WblockCloneObjects(frameCollection, blockTable.ObjectId, idmapping, DuplicateRecordCloning.Replace, false);
			transaction.Commit();
		}
	}
	// закрываем уже ненужный файл с эталонным блоком
	frameDoc.CloseAndDiscard();
	// Теперь надо обновить уже вставленные вхождения блока. Следующая конструкция работает, но мне крайне не нравится
	currDwg.SendStringToExecute("attsync\n", true, false, false);
	currDwg.SendStringToExecute("n\n", true, false, false);
	currDwg.SendStringToExecute("Frame\n", true, false, false);
}

Есть ли более корректный способ обновления описания блока, и самое главное, как более корректно и безгеморройно обновить вхождения блока?
Код тестовый, за отсутствие должных проверок не бить

[Александр Ривилис]

Сообщение от bargool Я догадался до такого способа, но может, можно сделать всё проще?

1. Не обязательно открывать "эталонный чертеж" как документ. Достаточно открыть только базу:

Код:

[Выделить все]

Database frameDb = new Database(false, true);
using (frameDb)
{
      try
      {
          frameDb.ReadDwgFile(@"Путь до файла.dwg",  System.IO.FileShare.Read,  false,  "" );
          // Тут твой код ...
      } 
      catch { }
}

2. Если запускаешь команды, то не забывай подчеркивание перед именем английской команды и опции команды - в локализованных AutoCAD твой код работать не будет.

[Олег (jr.)]

Попробуй такой вариант, вроде рабочий,
но не помню...

Код:

[Выделить все]

        [CommandMethod("_impblk", CommandFlags.Session | CommandFlags.Redraw)]
     
        public void test()
        {
            string DwgNm = @"c:\Test\bla.dwg";
            string blkNm = "TestBlock";
            Point3d insPt = new Point3d(100.0, 200.0, 0.0);
 
            Document AcDoc = Application.DocumentManager.MdiActiveDocument;
            Database acCurDb = AcDoc.Database;

            InsertDrawingAsBlock(AcDoc, DwgNm, blkNm, insPt);
        }

        public void InsertDrawingAsBlock(Document doc, string filepath, string blockname, Point3d ipt)
        {
            Database curdb = doc.Database;

            Editor ed = doc.Editor;

            DocumentLock loc = doc.LockDocument();

            using (loc)
            {

                Transaction tr = doc.TransactionManager.StartTransaction();

                using (tr)
                {
                    try
                    {
                        ObjectId blkid = default(ObjectId);
                        BlockTable bt = (BlockTable)tr.GetObject(curdb.BlockTableId, OpenMode.ForRead, false);


                        if (bt.Has(blockname))
                        {
                            Autodesk.AutoCAD.ApplicationServices.Application.ShowAlertDialog(string.Format("Block \"{0}\" does already exist\nTry another name", blockname));
                            return;

                        }
                        BlockTableRecord btr = (BlockTableRecord)tr.GetObject(curdb.CurrentSpaceId, OpenMode.ForWrite);
                        Database db = new Database(false, true);

                        using (db)
                        {

                            db.ReadDwgFile(filepath, System.IO.FileShare.Read, false, "");

                            blkid = curdb.Insert(blockname, db, true);

                        }

                        if ((!bt.Has(blockname)))
                        {
                            Autodesk.AutoCAD.ApplicationServices.Application.ShowAlertDialog(string.Format("Block \"{0}\" does not added to block table\nExit on Error", blockname));
                            return;

                        }
                        BlockTableRecord btrec = (BlockTableRecord)tr.GetObject(blkid, OpenMode.ForRead, false);


                        if (string.IsNullOrEmpty(btrec.Name))
                        {
                            btrec.UpgradeOpen();

                            btrec.Name = blockname;

                            btrec.DowngradeOpen();

                        }

                        BlockReference bref = new BlockReference(ipt, blkid);

                        Matrix3d mat = Matrix3d.Identity;

                        bref.TransformBy(mat);

                        bref.ScaleFactors = new Scale3d(2);//<--масштаб, к примеру

                        bref.Rotation = Math.PI / 4;//<--поворот блока, к примеру

                        btr.AppendEntity(bref);

                        tr.AddNewlyCreatedDBObject(bref, true);



                        if (btrec.HasAttributeDefinitions)
                        {
                            Autodesk.AutoCAD.DatabaseServices.AttributeCollection atcoll = bref.AttributeCollection;

                            foreach (ObjectId subid in btrec)
                            {
                                Entity ent = (Entity)subid.GetObject(OpenMode.ForRead);
                                AttributeDefinition attDef = ent as AttributeDefinition;

                                if (attDef != null)
                                {
                                    ed.WriteMessage( "\nValue: " + attDef.TextString);
                                    AttributeReference attRef = new AttributeReference();

                                    attRef.SetPropertiesFrom(attDef);

                                    attRef.Visible = attDef.Visible;

                                    attRef.SetAttributeFromBlock(attDef, bref.BlockTransform);
                                    attRef.HorizontalMode = attDef.HorizontalMode;

                                    attRef.VerticalMode = attDef.VerticalMode;

                                    attRef.Rotation = attDef.Rotation;

                                    attRef.TextStyle = attDef.TextStyle;

                                    attRef.Position = attDef.Position + ipt.GetAsVector();

                                    attRef.Tag = attDef.Tag;

                                    attRef.FieldLength = attDef.FieldLength;

                                    attRef.TextString = attDef.TextString;

                                    attRef.AdjustAlignment(curdb);

                                    atcoll.AppendAttribute(attRef);

                                    tr.AddNewlyCreatedDBObject(attRef, true);

                                }

                            }
                        }

                        ed.UpdateScreen();

                        tr.Commit();
                    }
                    catch (Autodesk.AutoCAD.Runtime.Exception ex)
                    {
                        Autodesk.AutoCAD.ApplicationServices.Application.ShowAlertDialog(ex.ToString() + "\n" + ex.Message);
                    }
                }
            }

        }

[bargool]

Александр Ривилис, спасибо, напрямую к базе обращаться гораздо лучше. А вот про SendStringToExecute - я бы хотел сделать это вообще без отправки команд в ком. строку, собственно, мой вопрос в основном в этом и заключается (BlockReference.ResetBlock, судя по описанию тут не подойдёт, если помнить, что это динамический блок?).
Олег (jr.), твой код решает другую задачу. Мне надо обновить существующий блок (с этим справился), а самый главный вопрос - как обновить отображение уже вставленных вхождений блока. Напомню, блок динамический. По жизни, это можно сделать через Design Center, выбрав нужный блок в другом файле и указав ему "Redefine only", но после этого опять же надо сделать attsync, что бы динамические элементы и атрибуты обновились в соответствии с новым описанием блока.

[Vildar]

Сообщение от bargool // Теперь надо обновить уже вставленные вхождения блока. Следующая конструкция работает, но мне крайне не нравится currDwg.SendStringToExecute("attsync\n", true, false, false); currDwg.SendStringToExecute("n\n", true, false, false); currDwg.SendStringToExecute("Frame\n", true, false, false);

Тоже интересно, как это эффективно сделать.
Пока остановился на варианте из 3 поста, тут:
http://www.caduser.ru/forum/index.ph...D=49&TID=49224
Короче, вставляю новые блоки на место существующих.

[bargool]

Vildar, мощный монолог.. похоже, тоже проблема с рамками к чертежам?
Тоже вариант, но всё же считаю вопрос про замену attsync'у открытым

[Vildar]

Сообщение от bargool похоже, тоже проблема с рамками к чертежам?

Да ) Делаю альтернативу подшивке, наподобие альбомов в СПДС7.

[Сергей Богатов]

Сообщение от Vildar Да ) Делаю альтернативу подшивке, наподобие альбомов в СПДС7.

А чем не устроила подшивка? Взяв её за основу, можно с помощью программерства "приделать" те функции, которые нужны. Сам так и сделал. В том числе изменение рамок, автоподпись, проставление "ИЗМов", и т.п.
P.S.
Тоже остановился на

Код:

[Выделить все]

 
cFile.SendCommand "_ATTSYNC" & vbCr & "NAME" & vbCr & blk_Name & vbCr

[hwd]

Сообщение от Сергей Богатов Тоже остановился на Код: [Выделить все] cFile.SendCommand "_ATTSYNC" & vbCr & "NAME" & vbCr & blk_Name & vbCr

Плохое решение.

Другой вариант решения:
Написать метод расширения static void AttSync(this BlockTableRecord btr, bool setAttDefValues, bool removeSuperfluous). Второй параметр указывает на то, следует ли во вхождениях блока перезаписать текущие значения AttributeReference на значения по умолчанию. Третий - следует ли удалять те AttributeReference, которых нет в определении блока.

Алгоритм работы следующий:
1. На основе определения блока получаем все его вхождения блоков.
2. Для каждого AttributeDefinition в определении блока проверяю наличие соответствующего ему AttributeReference (в каждом его вхождении блока).
2.1. Если параметр setAttDefValues равен true - перезаписываем значения всех AttributeReference
2.2. Если параметр removeSuperfluous равен true - удаляем все те AttributeReference, для которых отсутствует AttributeDefinition в определении блока.

имхо.

п.с. Если у кого есть предложения по расширению обозначенного мною выше функционала - я с интересом выслушаю их. Более того - я сам напишу этот метод и выложу его код.

[Сергей Богатов]

Сообщение от hwd Плохое решение. Другой вариант решения: Написать метод расширения static void AttSync(this BlockTableRecord btr, bool setAttDefValues, bool removeSuperfluous). Второй параметр указывает на то, следует ли во вхождениях блока перезаписать текущие значения AttributeReference на значения по умолчанию. Третий - следует ли удалять те AttributeReference, которых нет в определении блока.

Согласен. Просто так проще Сейчас переписываю код из VBA в VB.NET. Буду приводить в порядок Да и обработку динамических блоков надо будет добавлять...

[hwd]

Сообщение от Сергей Богатов Согласен. Просто так проще

Использовать SendCommand нужно с большой осторожностью, иначе это может вылезти боком. По возможности его вообще нужно избегать и прибегать к его помощи только тогда, когда не найдёшь альтернативы.

[Vildar]

Сообщение от Сергей Богатов А чем не устроила подшивка?

У нас листами никто не пользуется. И не собирается. Есть готовые проекты (файлы dwg с чертежами в модели), которые берутся за основу для новых проектов.
Я одно время делал подшивки для новых проектов. А сейчас мне надоело.
Сделаю "свое колесо" а-ля "подшивка". Может получится и приживется.
Наверно можно было делать поверх подшивки, но мне показалось, что легче сделать "по-простому".

[hwd]

Сообщение от Vildar У нас листами никто не пользуется. И не собирается. Есть готовые проекты (файлы dwg с чертежами в модели), которые берутся за основу для новых проектов. Я одно время делал подшивки для новых проектов. А сейчас мне надоело. Сделаю "свое колесо" а-ля "подшивка". Может получится и приживется. Наверно можно было делать поверх подшивки, но мне показалось, что легче сделать "по-простому".

Имхо - в данной ситуации лучше не изобретать велосипед, а использовать родные подшивки, без всяких там "аля". Это удобный, а главное - "родной" инструмент AutoCAD. Не знаю, что там может надоесть, причём настолько, чтобы начать лепить свой велосипед...

[Дима_]

Сообщение от hwd Более того - я сам напишу этот метод и выложу его код.

А сколько у тебя их готовых, просто если есть не "узкоспециализировавнные", может завернешь в LispFunction и выложешь под основные версии (типа HwdPowerPack.dll)

[TararykovDG]

Сообщение от hwd Алгоритм работы следующий: 1. На основе определения блока получаем все его вхождения блоков. 2. Для каждого AttributeDefinition в определении блока проверяю наличие соответствующего ему AttributeReference (в каждом его вхождении блока). 2.1. Если параметр setAttDefValues равен true - перезаписываем значения всех AttributeReference 2.2. Если параметр removeSuperfluous равен true - удаляем все те AttributeReference, для которых отсутствует AttributeDefinition в определении блока. имхо. п.с. Если у кого есть предложения по расширению обозначенного мною выше функционала - я с интересом выслушаю их. Более того - я сам напишу этот метод и выложу его код.

hwd, Раз уж в теме речь идет о динамических блоках, то может расширить предложенный Вами функционал возможностью переноса значений соответсвующих динамических параметров.

[hwd]

Сообщение от Дима_ А сколько у тебя их готовых, просто если есть не "узкоспециализировавнные", может завернешь в LispFunction и выложешь под основные версии (типа HwdPowerPack.dll)

Есть кое-что. Часть из этого я уже "завернул" в библиотеку AcadNetLib.dll. Сейчас как раз дорабатываю документацию к ней - это черновик, сгенерированный на основе существующего кода. Я сейчас вношу изменения в комментарии исходников, чтобы справка генерировалась более полно: с примерами, пояснениями и т.п.

Писать lisp-функции на .net я пока не планирую, т.к. во первых - мне это не интересно (я на лиспе не пишу, а значит мне это не понадобится), а во вторых - работы полно.

Сообщение от TararykovDG hwd, Раз уж в теме речь идет о динамических блоках, то может расширить предложенный Вами функционал возможностью переноса значений соответсвующих динамических параметров.

Честно говоря, я не понял того, что вы написали...

[Vildar]

Сообщение от hwd Имхо - в данной ситуации лучше не изобретать велосипед, а использовать родные подшивки, без всяких там "аля". Это удобный, а главное - "родной" инструмент AutoCAD.

Согласен. Я сделал все что мог, чтобы внедрить подшивку. Не получилось. Люди ее не используют, ни в какую.

Сообщение от hwd Не знаю, что там может надоесть, причём настолько, чтобы начать лепить свой велосипед...

Создавать листы, добавлять их в подшивку, именовать листы, нумеровать, вставлять ссылки на номера листов в примечания, печатать. Какой смысл мне продолжать все это делать одному.
А автоматизация мне интересна, я лучше ей позанимаюсь.

Сообщение от hwd п.с. Если у кого есть предложения по расширению обозначенного мною выше функционала - я с интересом выслушаю их.

Как я понял, нужно обновлять три вещи у вхождений блока: геометрию, атрибуты, дин.параметры.
Но если получится обновить геометрию и атрибуты без создания нового вхождения блока (замены вхожд.блока), тогда думаю дин.параметры можно не проверять. И учесть, что при выполнении BlockReference.ResetBlock(), который может помочь при обновлении геометрии блока, сбрасывает дин.параметры в начальное положение.
Геометрию нужно обновлять, т.к. при копировании определения блока из другого чертежа с помощью WblockCloneObjects, геометрия вхождений этого бока не обновляется (тоже самое с атрибутами, и с дин.параметрами(не уверен)).

[TararykovDG]

Сообщение от hwd Честно говоря, я не понял того, что вы написали...

Был блок A c атрибутами A1 (знач. по умолчанию "xxx"), A2 (знач. по умолчанию "yyy") и дин. параметром D1 (знач. по умолчанию 50, пусть это лин. параметр расстояние). На чертеже имелось 2 вхождения блока A. В первом вхождении A1 имел значение "Вася", A2 - "Петя", дин.параметр D1 был равен 100, во втором вхождении A1 - "Оля", A2 - "Катя", D1 = 200. Обновляем блок. Теперь у нас в описании блока A один атрибут A1 и один дин. параметр D1, A2 нет. После применения некого метода static void AttSync(this BlockTableRecord btr, bool setAttDefValues, bool removeSuperfluous, bool setDynParamValue) обновляем вхождения и кроме значений атрибута A1 в первом вхождении D1 остается равен 100, а во втором 200

[hwd]

Сообщение от TararykovDG Был блок A c атрибутами A1 (знач. по умолчанию "xxx"), A2 (знач. по умолчанию "yyy") и дин. параметром D1 (знач. по умолчанию 50, пусть это лин. параметр расстояние). На чертеже имелось 2 вхождения блока A. В первом вхождении A1 имел значение "Вася", A2 - "Петя", дин.параметр D1 был равен 100, во втором вхождении A1 - "Оля", A2 - "Катя", D1 = 200. Обновляем блок. Теперь у нас в описании блока A один атрибут A1 и один дин. параметр D1, A2 нет. После применения некого метода static void AttSync(this BlockTableRecord btr, bool setAttDefValues, bool removeSuperfluous, bool setDynParamValue) обновляем вхождения и кроме значений атрибута A1 в первом вхождении D1 остается равен 100, а во втором 200

теперь понял, только на мой взгляд именно так и имеет смысл делать, а не сбивать 100 и 200 обратно в 50 (т.е. тут вариант только один). Или я ошибаюсь?

[TararykovDG]

Сообщение от hwd теперь понял, только на мой взгляд именно так и имеет смысл делать, а не сбивать 100 и 200 обратно в 50 (т.е. тут вариант только один). Или я ошибаюсь?

Наверное Вы правы, но раз уж есть bool setAttDefValues и можно сбрасывать атрибуты в умолчательные значения, то почему бы не быть и bool setDynParamValue, а там как надо с такими значениями и вызывать static void AttSync