Отправлено: pavka_97 от 06-02-2019, 19:48:30
Код - C# [Выбрать]
- using Autodesk.AutoCAD.Runtime;
- using Autodesk.AutoCAD.ApplicationServices;
- using Autodesk.AutoCAD.DatabaseServices;
- using Autodesk.AutoCAD.EditorInput;
- using Autodesk.AutoCAD.Geometry;
- namespace pavpp
- {
- public class pavpp
- {
- [CommandMethod("PAVPP")]
- public void Run()
- {
- Document doc = Application.DocumentManager.MdiActiveDocument;
- Database db = doc.Database;
- Editor ed = doc.Editor;
- ObjectIdCollection ids = new ObjectIdCollection();
- using (Transaction tr = db.TransactionManager.StartTransaction())
- {
- //создаем временную базу
- Database newDB = new Database(false, false);
- string pth = @"D:\.....\1.dwg";
- newDB.ReadDwgFile(pth, System.IO.FileShare.Read, false, string.Empty);
- BlockTable bt = tr.GetObject(newDB.BlockTableId, OpenMode.ForRead) as BlockTable;
- //копируем определение динамического блока в активный файл
- ids.Add(bt["Names"]);
- IdMapping iMap = new IdMapping();
- db.WblockCloneObjects(ids, db.BlockTableId, iMap, DuplicateRecordCloning.Ignore, false);
- //вставляем блок в активный файл
- ObjectId psid = db.CurrentSpaceId;
- BlockTableRecord ms = tr.GetObject(psid, OpenMode.ForWrite) as BlockTableRecord;
- BlockTable bt0 = tr.GetObject(db.BlockTableId, OpenMode.ForWrite) as BlockTable;
- BlockReference br = new BlockReference(Point3d.Origin, bt0["Names"]);
- // blRefTest.SetDatabaseDefaults();
- ms.AppendEntity(br);
- tr.AddNewlyCreatedDBObject(br, true);
- //ed.Regen();
- //ed.UpdateScreen();
- //br.RecordGraphicsModified(true);
- //переключаем свойство динблока
- Number(br);
- //включаем внешние ссылки блока
- db.ResolveXrefs(true, false);
- tr.Commit();
- }
- }
- private void Number(BlockReference bref)
- {
- foreach (DynamicBlockReferenceProperty num in bref.DynamicBlockReferencePropertyCollection)
- {
- if (num.PropertyName == "Test")
- {
- num.Value = "222";
- return;
- }
- }
- }
- }
- }
Отправлено: Александр Ривилис от 06-02-2019, 20:00:15
Нехватает вот этого:
Код - C# [Выбрать]
- btr.Annotative = AnnotativeStates.True; // Это BlockTableRecord вставляемого блока
- ObjectContextManager ocm = db.ObjectContextManager;
- ObjectContextCollection occ = ocm.GetContextCollection("ACDB_ANNOTATIONSCALES");
- ObjectContexts.AddContext(br, occ.CurrentContext);
Отправлено: avc от 06-02-2019, 23:31:41
Отправлено: pavka_97 от 07-02-2019, 10:28:36
Отправлено: avc от 07-02-2019, 10:40:24
Отправлено: Александр Ривилис от 07-02-2019, 11:25:41
Так что по честному надо еще и перебирать все масштабы и искать, какой из них на самом деле 1:1.Или просто создать такой масштаб если его нет.
Отправлено: Александр Ривилис от 07-02-2019, 11:26:24
Я правильно понял, что моя подсказка помогла?
Отправлено: pavka_97 от 07-02-2019, 13:19:13
avc, даже при переименовании 1:1 и при назначении произвольного имени масштабу 1:1, у меня код работает как надо (AutocadEn16x64,Windows7).
Спасибо всем за ответы.
Off-Topic: показать
Отправлено: pavka_97 от 12-02-2019, 14:17:15
btr.Annotative = AnnotativeStates.True; // Это BlockTableRecord вставляемого блокаС этим куском не хочет работать в accoreconsole (консоль запускается по сценарию scr через bat). Это относится к недостаткам консоли или я опять что -то делаю не так?
ObjectContextManager ocm = db.ObjectContextManager;
ObjectContextCollection occ = ocm.GetContextCollection("ACDB_ANNOTATIONSCALES");
ObjectContexts.AddContext(br, occ.CurrentContext)
Отправлено: Александр Ривилис от 12-02-2019, 18:12:32
С этим куском не хочет работать в accoreconsole (консоль запускается по сценарию scr через bat). Это относится к недостаткам консоли или я опять что -то делаю не так?Что значит не хочет работать? Какие-то сообщения об ошибках?
Отправлено: pavka_97 от 12-02-2019, 18:37:16
Отправлено: Александр Ривилис от 12-02-2019, 18:42:13
Я подумал может кусок кода как то с ActiveX связан, что в консоли вроде не работает?Нет. С ActiveX это никак не связано. Теоретически должно работать.