Последние сообщения

Последние сообщения

Страницы: [1] 2 3 ... 10
1
AutoCAD .NET API / Re: Получить путь к папке расположения pc3 файлов
« Последний ответ от Валерий Ивлев 15-12-2025, 16:08:03 »
Уважаемый Александр.
А может есть возможность держать принтер например в пределах .bundle (например, c:\Users\xxxx\AppData\Roaming\Autodesk\ApplicationPlugins\yyyy.bundle\Contents\Resources\Plotters\)
И при установке / инициализации аддона добавлять путь к нему, pmp-файлу и т.д.
Как по вашему лучше? (особенно если bundle мультиплатформенный)
2
AutoCAD .NET API / Re: Как назначить вьюпорту AnnotationScale в соответствии с StandardScale ?
« Последний ответ от avc 11-12-2025, 12:41:22 »
Черт! Что-то я тормознул. Полноценного конструктора у класса нет, но свойства-то доступны для записи  ;D
Вот так работает:
Код - C# [Выбрать]
  1.     /// <summary>
  2.     /// назначить стандартный или пользовательский масштаб
  3.     /// </summary>
  4.     public static void
  5.     SetScale(this Viewport vp, double scale)
  6.     {
  7.       if (vp is null || double.IsNaN(scale) || scale < MinScale) return;
  8.       StandardScaleType std = FindStdScale(scale, vp.Database);
  9.       double oldScale = vp.CustomScale;
  10.       if (std != StandardScaleType.CustomScale)
  11.         vp.StandardScale = std;
  12.       else vp.CustomScale = scale;
  13.       if (vp.Database != null && oldScale != vp.CustomScale)
  14.       {
  15.         ObjectContextManager ocm = vp.Database.ObjectContextManager;
  16.         ObjectContextCollection occ = ocm.GetContextCollection("ACDB_ANNOTATIONSCALES");
  17.         bool found = false;
  18.         foreach (AnnotationScale oldAnnoScale in occ)
  19.           if (Abs(oldAnnoScale.Scale - vp.CustomScale) < ScaleTolerance)
  20.           {
  21.             vp.AnnotationScale = oldAnnoScale;
  22.             found = true;
  23.             break;
  24.           }
  25.         if (!found)
  26.         {
  27.           //Добавление масштаба к чертежу
  28.           AnnotationScale newScale = new()
  29.           {
  30.             Name = $"CustomScale {vp.CustomScale}x",
  31.             PaperUnits = vp.CustomScale,
  32.             DrawingUnits = 1
  33.           };
  34.           occ.AddContext(newScale);
  35.           vp.AnnotationScale = newScale;
  36.         }
  37.       }
  38.     }
3
AutoCAD .NET API / Re: Как назначить вьюпорту AnnotationScale в соответствии с StandardScale ?
« Последний ответ от Привалов Дмитрий 11-12-2025, 12:21:50 »
Цитата: avc от 11-12-2025, 12:15:06
Но как создать нестандартные?
Выше сообщение изменил, как добавлять. В collectionScales  все масштабы хранятся. Скорее всего можно все масштабы изменить, но один должен всегда присутствовать, т.к. много мест с масштабом по умолчанию.
4
AutoCAD .NET API / Re: Как назначить вьюпорту AnnotationScale в соответствии с StandardScale ?
« Последний ответ от avc 11-12-2025, 12:15:06 »
Спасибо. Стандартные масштабы похоже всегда присутствуют в этом словаре. Но как создать нестандартные?
Код - C# [Выбрать]
  1.     /// <summary>
  2.     /// назначить стандартный или пользовательский масштаб
  3.     /// </summary>
  4.     public static void
  5.     SetScale(this Viewport vp, double scale)
  6.     {
  7.       if (vp is null || double.IsNaN(scale) || scale < MinScale) return;
  8.       StandardScaleType std = FindStdScale(scale, vp.Database); // моя процедура подбора масштаба из стандартных
  9.       double oldScale = vp.CustomScale;
  10.       if (std != StandardScaleType.CustomScale)
  11.         vp.StandardScale = std;
  12.       else vp.CustomScale = scale;
  13.       if (vp.Database != null && oldScale != vp.CustomScale)
  14.       {
  15.         ObjectContextManager ocm = vp.Database.ObjectContextManager;
  16.         ObjectContextCollection occ = ocm.GetContextCollection("ACDB_ANNOTATIONSCALES");
  17.         bool found = false;
  18.         foreach (AnnotationScale ac in occ)
  19.           if (Abs(ac.Scale - vp.CustomScale) < ScaleTolerance)
  20.           {
  21.             vp.AnnotationScale = ac;
  22.             found = true;
  23.             break;
  24.           }
  25.         if (!found)
  26.           //occ.AddContext(new AnnotationScale()); // надо создавать новый AnnotationScale, но непонятно как
  27.           vp.AnnotationScale = vp.Database.Cannoscale;
  28.       }
  29.     }
5
AutoCAD .NET API / Re: Как назначить вьюпорту AnnotationScale в соответствии с StandardScale ?
« Последний ответ от Привалов Дмитрий 11-12-2025, 11:45:17 »
Цитата: avc от 09-12-2025, 22:44:11
Свойство AnnotationScale имеет публичный сеттер, но этого объекта очень мутные конструкторы, ни StandardScaleType, ни масштаб как double они не принимают (а в некоторых других API вообще нет публичных конструкторов). Похоже надо как-то получить этот объект из БД чертежа. Но как?

Скорее всего нужно извлекать реально существующий масштаб из списка масштабов текущего чертежа, его и назначать.

Код - C# [Выбрать]
  1. ObjectContextManager contextManager = db.ObjectContextManager;
  2. if (contextManager != null)
  3. {
  4.    ObjectContextCollection collectionScales = contextManager.GetContextCollection("ACDB_ANNOTATIONSCALES");//Получение списка масштабов в текущем чертеже
  5.    foreach (AnnotationScale scale in collectionScales)
  6.    {
  7.       scales.Add(scale);
  8.    }
  9.    //или текущий.
  10.    AnnotationScale currentScale = (AnnotationScale)collectionScales.CurrentContext;
  11.  
  12.    //Добавление масштаба к чертежу
  13.    AnnotationScale scale = new AnnotationScale();
  14.    scale.Name = "MyScale 1:28";
  15.    scale.PaperUnits = 1;
  16.    scale.DrawingUnits = 28;
  17.    collectionScales.AddContext(scale);
  18.  
  19.    //Добавление к аннотативному объекту
  20.    ObjectContext objectContext = collectionScales.GetContext("MyScale 1:28");
  21.    anotativeObject.AddContext(objectContext );
  22. }



6
AutoCAD .NET API / Как назначить вьюпорту AnnotationScale в соответствии с StandardScale ?
« Последний ответ от avc 09-12-2025, 22:44:11 »
Заметил, что при программном назначении вьюпорту StandardScale или CustomScale, его свойство AnnotationScale остается старое, от старого масштаба. А если масштаб менять в интерфейсе Автокада, то AnnotationScale синхронно переключается как масштаб. Вопрос - как программно синхронизировать AnnotationScale с масштабом? 
Свойство AnnotationScale имеет публичный сеттер, но этого объекта очень мутные конструкторы, ни StandardScaleType, ни масштаб как double они не принимают (а в некоторых других API вообще нет публичных конструкторов). Похоже надо как-то получить этот объект из БД чертежа. Но как?
7
AutoLisp / VisualLISP и DCL / Re: значек диаметра в DCL
« Последний ответ от altver 17-11-2025, 16:50:42 »
Огромное спасибо!
8
AutoLisp / VisualLISP и DCL / Re: значек диаметра в DCL
« Последний ответ от 1958 17-11-2025, 16:00:00 »
\\U+2300
9
AutoCAD .NET API / Re: Создание листов
« Последний ответ от igrik 11-11-2025, 09:29:38 »
Цитата: Привалов Дмитрий от 10-11-2025, 07:22:12
Скорее всего это нормально, если чертеж насыщенный, то обновление видового экрана занимает больше времени. Плюс их много.

Предполагаю, что viewport.On = true; можно не выполнять на каждом видовом экране.
Да, вот эти лаги при насыщенном чертеже и хотелось бы обойти. Вот ищу способ.

viewport.On = falsе нерабочий способ. Он просто выключает показ отображаемого содержимого у viewport. И тогда пользователю нужно будет заходить в видовой экран и руками включать этот вьюпорт.

Походу Автокадовскими средствами эту проблему не решить, и придётся выдумывать велосипед. Я поэтому и задал вопрос, может кто такой уже и придумал

Извините, вам запрещён просмотр содержимого спойлеров.
10
AutoCAD .NET API / Re: Создание листов
« Последний ответ от Привалов Дмитрий 10-11-2025, 07:22:12 »
Цитата: igrik от 08-11-2025, 13:36:00
Вопрос - есть ли способы обойти задержку при обновлении/создании Viewport. Или это особенность Автокада?
Доброе утро!
Скорее всего это нормально, если чертеж насыщенный, то обновление видового экрана занимает больше времени. Плюс их много.

Предполагаю, что viewport.On = true; можно не выполнять на каждом видовом экране.
Достаточно выполнить его на текущем листе.

Далее пользователь при переходе на нужный ему лист вызовет обновление видового экрана.
Страницы: [1] 2 3 ... 10