Обновить стили мультилиний

[MikhailTAP]

Добрый день!
Есть плагин, который использует мультилинии. Их стили содержатся в шаблонах(для создаваемых документов), и в файлах *.mln(для обновления уже существующих чертежей). От версии к версии необходимо обновить стили мультилиний в соответствии с актуальными файлами *.mln, в которых стили называются также но имеют другие настройки. При подгрузке через метод Database.LoadMlineStyleFile, или аналог через P/Invoke ничего не обновляется. Стили не меняют настройки. Пробовал сначала вырезать все мультилинии на чертеже, потом удалить все стили линий, и подгрузить их заново указанными выше методами, однако получаю eWasErased при создании мультилиний (указывая им свои стили, которые были подгружены). И стили в окне MLSTYLE не меняются.

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

1.                         using (doc.LockDocument())
2.                         using (var trans = doc.Database.TransactionManager.StartTransaction())
3.                         using (var styles = (DBDictionary)trans.GetObject(doc.Database.MLStyleDictionaryId, OpenMode.ForRead))
4.                         {
5.                                 var objects = new List<ObjectId>();
6.                                 foreach (var style in styles)
7.                                 {
8.                                         using (var mlstyle = (MlineStyle)trans.GetObject(style.Value, OpenMode.ForWrite))
9.                                         {
10.                                                 //mlstyle.Name = mlstyle.Name + "___";
11.                                                 objects.Add(style.Value);
12.                                                 mlstyle.Erase(true);
13.                                         }
14.                                 }
15.  
16.                                 doc.Database.Purge(new ObjectIdCollection(objects.ToArray()));
17.  
18.                                 trans.Commit();
19.                         }
20.  

Есть ли вариант как-то обновить стили?

Спасибо.

[Андрей Бушман]

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

[MikhailTAP]

Я тоже об этом подумал, однако проблема в том, что стили в файлах mln. А как из них получить объект стиля мультилинии?

[Андрей Бушман]

проблема в том, что стили в файлах mln. А как из них получить объект стиля мультилинии?

это обычные текстовые файлы, так что читать\редактировать их не должно представлять каких-либо трудностей.

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

Думаю, что нужно:
1) Переименовать те стили в чертеже, которые ты хочешь обновить
2) Загрузить Database.LoadMlineStyleFile
3) Задать новые стили.
4) Старые стили удалить.

[MikhailTAP]

Думаю, что нужно:
1) Переименовать те стили в чертеже, которые ты хочешь обновить
2) Загрузить Database.LoadMlineStyleFile
3) Задать новые стили.
4) Старые стили удалить.

Проверить полностью весь порядок смогу только завтра, но могу сказать что пробовал переименовывать стили мультилиний в чертеже, и следом загружать стили из файлов mln, вызывая правда функцию через P/Invoke, однако переименовываются стили нормально, но не подгружаются, в окне MLSTYLE стили не появляются.
Однако, немного предыстории, почему я вообще стал звать функцию загрузки из либы. Я изначально пытался загружать "поверх" стили методом Database.LoadMlineStyleFile, однако если стиль уже присутствовал в чертеже, генерировалось исключение, а если удалить вручную стили мультилиний из чертежа, сохранить, а потом открыть снова(для надежности так сказать), то этот метод сыпал исключение xxxAccessFilexxx(точно не вспомню). Погуглив это исключение, я наткнулся на Ваш пост, Александр:) На нём вы посоветовали использовать функцию из либы.
Я воспользовался этим советом, и стал звать функцию из либы. И бьюсь об заклад, что при подгрузке "поверх" стилей, они обновлялись как надо. Но на следующий день метод перестал работать. Откуда такое поведение - непонятно.

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

На нём вы посоветовали использовать функцию из либы.

Переведи. Желательно с ссылкой на то, что я писал.

[MikhailTAP]

Александр, вот ссылка http://forums.autodesk.com/t5/net/error-loading-a-multiline-style/td-p/1678971 старый пост (аж 2006 год:)). Вообще насколько я понял, eFileAccessErr по заявлению саппорта Автодеска за 2013 г может появляться при использовании метода Database.LoadMlineStyleFile если файл стиля расположен не в системной директории. Хотя в моём случае, путь до директории где лежали стили, был прописан в настройках автокада.

[Андрей Бушман]

Ну, во первых, нельзя удалять все стили. Должен присутствовать как минимум стиль standard, а ты пытаешься и его удалить.

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

Должен присутствовать как минимум стиль standard, а ты пытаешься и его удалить.

Нельзя удалять также и текущий стиль и все используемые в чертеже стили. Ты же их сначала удаляешь, а затем уже проверяешь можно ли их удалить. В чем смысл?

[MikhailTAP]

Да, согласен, изменять/удалять системные объекты - плохое дело, но тем не менее, я у себя на чертеже перед этим удалял все(!) мультилинии. Но тем не менее, не могу понять, почему повторная загрузка стилей(через инвок, без удаления) работала, а потмо перестала о_О.

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

Ну тут как минимум нужно смотреть на твой код. Как минимум MLStyleDictionary должна быть доступна для записи в момент когда ты выполняешь загрузку *.mln-файлов. И вообще желательно, чтобы это действие было вне транзакции.

[Андрей Бушман]

я у себя на чертеже перед этим удалял все(!) мультилинии. Но тем не менее, не могу понять, почему повторная загрузка стилей(через инвок, без удаления) работала, а потмо перестала о_О.

Ну-ну... Пробовал после этого войти в редактор стилей мультилиний?

Не занимайся ерундой. Тебе сказали, что нельзя удалять стандартные и текущие стили. То, что у тебя там "что-то работало, а потом перестало" - весьма сомнительно. В любом случае это "что-то" покоцало базу данных твоего чертежа и рано или поздно это всё равно вылезло бы. Кстати, возможно, что в свой шаблон ты как раз коцанный чертёж и вогнал. Соответственно всё, созданное на его основе так же криво.

Вот подправленный твой код (собственно, от "твоего" там почти ничего и не осталось):

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

1. using System;
2. using System.Collections.Generic;
3. using System.Linq;
4.  
5. #if AUTOCAD
6. using cad = Autodesk.AutoCAD.ApplicationServices.Application;
7. using Ap = Autodesk.AutoCAD.ApplicationServices;
8. using Db = Autodesk.AutoCAD.DatabaseServices;
9. using Ed = Autodesk.AutoCAD.EditorInput;
10. using Rt = Autodesk.AutoCAD.Runtime;
11. using Gm = Autodesk.AutoCAD.Geometry;
12. using Hs = Autodesk.AutoCAD.DatabaseServices.HostApplicationServices;
13. using Us = Autodesk.AutoCAD.DatabaseServices.SymbolUtilityServices;
14. #endif
15.  
16. namespace cad_sandbox {
17.   public class Class1 {
18.     [Rt.CommandMethod("test")]
19.     public void Test() {
20.       Ap.Document doc = cad.DocumentManager.MdiActiveDocument;
21.       Ed.Editor ed = doc.Editor;
22.       Db.Database db = doc.Database;
23.  
24.       using (doc.LockDocument()) {
25.         using (var trans = doc.Database.TransactionManager.StartTransaction()) {
26.           Db.DBDictionary styles = trans.GetObject(db.MLStyleDictionaryId,
27.             Db.OpenMode.ForRead) as Db.DBDictionary;
28.           List<Db.ObjectId> objects = new List<Db.ObjectId>();
29.           foreach (var style in styles) {
30.             if (db.CmlstyleID != style.Value &&
31.               style.Key.ToLower() != "standard") {
32.               objects.Add(style.Value);
33.             }
34.           }
35.  
36.           if (objects.Count > 0) {
37.             doc.Database.Purge(new Db.ObjectIdCollection(objects.ToArray()));
38.           }
39.  
40.           foreach (var item in objects) {
41.             var mlstyle = (Db.MlineStyle)trans.GetObject(item,
42.               Db.OpenMode.ForWrite);
43.             mlstyle.Erase(true);
44.           }
45.           trans.Commit();
46.         }
47.       }
48.     }
49.   }
50. }

[MikhailTAP]

Спасибо за помощь, завтра попробую.

[Андрей Бушман]

юзингов-то в своём коде ты понатыкал... я поубирал лишние.