Создать чертеж и задать его параметры

[Леонид Семенов]

Здравствуйте.
Мне нужно создать плагин, который будет выделенные блоки переносить на новый чертеж. И, казалось бы, что я все сделал.
Но осталась одна проблема. На новом чертеже масштаб чертежа отличается от исходного. Помогите пожалуйста создать новый чертеж, чтобы его параметры соответствовали бы исходному.

[Алексей Кулик]

Что за "масштаб чертежа"? Масштабов в AutoCAD тьма - про какой конкретно масштаб разговор идет?

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

И, казалось бы, что я все сделал.

И где код, который это делает?

[Леонид Семенов]

И где код, который это делает?

Вот участок кода, где я создаю новый чертеж

Код - C# [Выбрать]

1.                 Document acDoc = App.DocumentManager.Add("");
2.                 acDoc.Database.SaveAs(fName, DwgVersion.Current);
3.                 acDoc.Database.CloseInput(true);
4.                 App.DocumentManager.MdiActiveDocument.CloseAndDiscard();

И вот участок кода, где я открываю этот чертеж (file) и добавляю туда блоки,
где Dictionary<string, List<BlockReference>> blocks

Код - C# [Выбрать]

1.                 DocumentCollection acDocMgr = App.DocumentManager;
2.                 Document doc = acDocMgr.Open(file, false);
3.                 Database db = doc.Database;
4.                 Editor ed = doc.Editor;
5.                 using (DocumentLock acLckDoc = doc.LockDocument())
6.                 {
7.                     using (Transaction trans = db.TransactionManager.StartTransaction())
8.                     {
9.                         if (ids.Count != 0)
10.                         {
11.                             IdMapping iMap = new IdMapping();
12.                             db.WblockCloneObjects(ids, db.BlockTableId, iMap, DuplicateRecordCloning.Ignore, false);
13.                         }
14.                         var layers = GetLayers(trans, db);
15.                         var linetypes = GetLinetypes(trans, db);
16.                         foreach (BlockReference br in blocks[file])
17.                         {
18.                             if (!layers.ContainsKey(br.Layer))
19.                                 LoadLayer(Layers[br.Layer], db, trans);
20.                             if (!linetypes.ContainsKey(br.Linetype))
21.                                 LoadLinetype(Linetypes[br.Linetype], db, trans);
22.                             BlockTable bt = db.BlockTableId.GetObject(OpenMode.ForRead) as BlockTable;
23.                             BlockTableRecord blockDef = bt[br.Name].GetObject(OpenMode.ForRead) as BlockTableRecord;
24.                             BlockTableRecord ms = bt[BlockTableRecord.ModelSpace].GetObject(OpenMode.ForWrite) as BlockTableRecord;
25.                             Point3d point = br.Position;
26.                             using (BlockReference blockRef = new BlockReference(point, blockDef.ObjectId))
27.                             {
28.                                 blockRef.ScaleFactors = br.ScaleFactors;
29.                                 blockRef.LinetypeScale = br.LinetypeScale;
30.                                 blockRef.Layer = br.Layer;
31.                                 blockRef.Linetype = br.Linetype;
32.                                 blockRef.Rotation = br.Rotation;
33.                                 blockRef.BlockTransform = br.BlockTransform;
34.                                 blockRef.Color = br.Color;
35.                                 blockRef.LineWeight = br.LineWeight;
36.                                 blockRef.Material = br.Material;
37.                                 ms.AppendEntity(blockRef);
38.                                 trans.AddNewlyCreatedDBObject(blockRef, true);
39.                             }
40.                         }
41.                         trans.Commit();
42.                     }
43.                 }

[Леонид Семенов]

Что за "масштаб чертежа"? Масштабов в AutoCAD тьма - про какой конкретно масштаб разговор идет?

Я думал про "масштаб вставки", а написал "масштаб чертежа"


Вообще надо бы что бы максимально сохранить параметры исходно чертежа

[Алексей Кулик]

Может быть, дело в том, что блоки не Unitless?

[Дмитрий Загорулькин]

где Dictionary<string, List<BlockReference>> blocks

Мне сильно не нравится такой подход. Вы держите кучу объектов открытыми долгое время только для того, чтобы потом прочитать их свойства. Я в похожей задаче использовал структуру такого вида:

Код - C# [Выбрать]

1. internal struct BlockReferenceData
2. {
3.     public string Name;
4.     public bool IsDynamicBlock;
5.     public Point3d Position;
6.     public Scale3d Scale;
7.     public double Rotation;
8.     public string LayerName;
9.     public Color Color;
10.     public string LineTypeName;
11.     public LineWeight LineWeight;        
12.     public Dictionary<string, string> Attributes;
13.     public Dictionary<string, object> DynamicProperties;
14.     // Ну и остальные нужные данные
15.  
16.     public BlockReferenceData(BlockReference bRef)
17.     {
18.         // Тут получаем все нужные данные из вставки блока bRef
19.     }
20.  
21.     public void ApplyTo(BlockReference bRef)
22.     {
23.         // Тут переносим сохраненные данные во вставку блока bRef
24.     }
25. }
26.  

По поводу изначального вопроса - есть у меня подозрение, что если у BlockReference принудительно задается свойство ScaleFactors, то настройки вставки в чертеже не должны играть роли. Возможно, тут аннотативность так себя проявляет?
В общем, нужен исходный чертеж с блоком, минимальный код, при котором проявляется проблема и подробное описание действий для воспроизведения проблемы. Иначе, гадать можно долго.

[Дмитрий Загорулькин]

А вообще, сдается мне, что тут с использованием метода Database.Wblock может получиться все гораздо проще.

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

Мне нужно создать плагин, который будет выделенные блоки переносить на новый чертеж.

Речь вообще идёт об описании блоков (BlockTableRecord) или о вставках блоков (BlockReference)? Если BlockReference, то почему ты не их WblockCloneObjects? А если BlockTableRecord, то зачем ты создаёшь BlockReference?

[Александр Пекшев aka Modis]

Я думал про "масштаб вставки", а написал "масштаб чертежа"

Как и многое в автокаде этот масштаб задается с помощью переменной - INSUNITS. Также нужно смотреть переменные INSUNITSDEFSOURCE и INSUNITSDEFTARGET.

Вообще надо бы что бы максимально сохранить параметры исходно чертежа

Ввиду вышесказанного (про переменные) - это практически невозможно

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

Еще есть -DWGUNITS: https://knowledge.autodesk.com/support/autocad/troubleshooting/caas/sfdcarticles/sfdcarticles/Difference-between-DWGUNITS-and-INSUNITS.html

[Алексей Кулик]

Кстати, по-моему, начиная с 2013 версии, команда доступна и в обычном AutoCAD.
К сожалению, я так и не понял до конца - какие элементы она меняет. Явно не только переменные текущего документа

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

Тут подробнее: http://www.theswamp.org/index.php?topic=16554.0

[Леонид Семенов]

Спасибо большое за ответы. Перменная INSUNITS пока решила мою проблему

[Владимир Шу]

Мне нужно создать плагин, который будет выделенные блоки переносить на новый чертеж

Вообще надо бы что бы максимально сохранить параметры исходно чертежа

Скопировать файл чертежа и удалить лишнее?