[[MTL]]

Всем привет,
Тема автоматической нумерации стара и надоела всем порядком. Существует много решений этой проблемы, в том числе и от Autodesk. Сам попробовал и так и сяк. По мне, так всё время чего-то не хватает. Кароч, решил сам прогу написать.
Кратенько описание:
1. Загружаете AutoNum_v.4.1 в Autocad
2. Вызов функции русскими буквами: НУМ
3. Выбираете объекты для нумерации. Можно прямо рамкой. Учитываются только объекты типа TEXT, MTEXT и INSERT (блоки). Всё ненужное само отфильтруется. Нажимаете Enter.
4. В открывшемся диалоговом окне, показывает сколько каких объектов в ваш набор попало. Если что не нужно нумеровать - снимите галочку. Для блоков имеется выпадающий список с тэгами атрибутов. Выбираете нужный.
5. Направление нумерации либо справа налево и сверху вниз по рядам, либо сверху вниз слева направо по столбцам.
6. "Префикс" - это то, что перед номером будет. "Постфикс" - то, что после номера. "Нач. значение" и "Интервал" - это не нужно объяснять. Дробная нумерация тоже работает.

PS: Гуру Lispa не судите строго. Первая прога.

[VVA]

Сообщение от [MTL ;1700701]По мне, так всё время чего-то не хватает.

И даже после опубликованной версии 4.1 всегда найдутся те, кому нужно синюю полосу поперек или большую красную кнопку в левом верхнем углу
В любом случае молодец, что сделал что-то для себя и решил поделиться.
Просто для сведения - в свое время делал подборку существующих нумераторов - список опубликован в FAQ - Как последовательно пронумеровать в чертеже числа?

[Setvar]

Сообщение от [MTL ;1700701]Первая прога.

Верится с трудом, что первая. Вернее, совсем не верится.

[pan]

Мультивыноски добавить слабО?

[Nike]

Довольно мощный автонумератор и не только

[KEHT]

Nike, Предложенный нумератор на VBA, а этот на лисп. Сам пользовался тем , но всё время искал альтернативу. Если добавить макросы VBA в автозагрузку, то открытие файлов и их сохранение увеличивается во времени проверено на Autocad 2011 и 2016. Не знаю почему, заметил такую особенность, это видно при автосохранении особенно.

А по делу, понравился данный нумератор, как альтернатива тому что писал выше. От себя добавил туда функцию добавления к тексту префикса и постфикса, без нумерования текста или атрибута. Нужно иногда просто выбрать разный текст и к нему добавить префикс, например "-" или "+", до этого всегда пользовался тем что на VBA.
Чтобы добавить просто префикс или постфикс без нумерации, поля Нач знач и интервал должны быть звездочки "*" .

[Сергей812]

Сообщение от KEHT Если добавить макросы VBA в автозагрузку, то открытие файлов и их сохранение увеличивается во времени проверено на Autocad 2011 и 2016. Не знаю почему, заметил такую особенность, это видно при автосохранении особенно.

тыц

[KEHT]

Сергей812, Спасибо, причина теперь ясна. Так что использовать vba придеться в крайних случаях

[Сергей812]

Сообщение от KEHT Так что использовать vba придеться в крайних случаях

VBA можно использовать извне через COM-интерфейс, например, из Excel. Можно достаточно интересные вещи делать типа извлечения данных для спецификации с автоматическим подтягиванием остальных граф спеки. Будет работать медленно достаточно, но гораздо быстрее человека. Аутодеск, исключив много лет назад VBA из состава самого акада - как бы непрозрачно намекает, что можно вполне и без него обойтись) Остальные языки для написания надстроек не требуют ставить энаблеров.

[doctorraz]

Сообщение от Сергей812 Остальные языки для написания надстроек не требуют ставить энаблеров.

возможно путаю, но для доступа к объектной модели автокад извне, энаблер ставить не требуется. из того же эксель или vb6 все доступно.
насчет быстродействия согласен.. если грубо, то раз в десять vb из под автокада быстрее работает, чем если извне.
проверял на 2015,16 64 бит

----- добавлено через ~2 мин. -----

Сообщение от Сергей812 Остальные языки для написания надстроек не требуют ставить энаблеров.

заодно спрошу.... тот же vb.net под каждую версию автокад компилировать? или как vba умеет позднее связывание?

[Сергей812]

Сообщение от doctorraz возможно путаю, но для доступа к объектной модели автокад извне, энаблер ставить не требуется. из того же эксель или vb6 все доступно.

речь шла об работе VBA "изнутри" акада - а снаружи через COM-интерфейс можно любым доступным способом "ломиться") Рекомендовал Excel для начинающих: потому что быстро достижимый результат, пакет офиса даже в минимальной конфигурации Word+Excel содержит все необходимое и не требует каких либо согласований по установке дополнительного ПО под админскими правами. Для первой "пробы пера" самое то, имхо.

Сообщение от doctorraz тот же vb.net под каждую версию автокад компилировать? или как vba умеет позднее связывание?

не понял вопроса. Если речь идет о Net Api - то зачастую достаточно скомпилировать под группу версий акада с одной версией формата.

[doctorraz]

Сообщение от Сергей812 Если речь идет о Net Api - то зачастую достаточно скомпилировать под группу версий акада с одной версией формата.

спасибо

----- добавлено через ~2 мин. -----

Сообщение от Сергей812 Остальные языки для написания надстроек не требуют ставить энаблеров.

эта фраза смутила.. vb то же ничего не требует, как выше описали

----- добавлено через ~5 мин. -----

Сообщение от Сергей812 Аутодеск, исключив много лет назад VBA из состава самого акада - как бы непрозрачно намекает, что можно вполне и без него обойтись)

но сом не выпилен и поддерживается в исправном состоянии... гдето была инфа, что терки у них с мелкософтом за vba.

[Сергей812]

Сообщение от doctorraz но сом не выпилен и поддерживается в исправном состоянии...

через COM не все доступно. Правда, и в оболочке NET API тоже не все функции реализованы по сравнению с ObjectARX) Но для большинства прикладных задач автоматизации это вообще не критично, имхо. Каждый выбирает свой инструмент.

[[MTL]]

Привет, всем
Спасибо за комменты, всегда интересно почитать. В голове у мя полно идей, но как обычно ни на что не хватает времени. Если ещё чё напишу, постараюсь выкладывать.

[[MTL]]

Привет, всем
Немного усовершенствовал программу. В версии 5.1 добавлено:
1. Нумерация мультивыносок.
2. При формировании рядов и столбцов, появилась возможность определить допустимое отклонение между координатами двух соседних объектов, при котором они считаются расположенными в ряд (или столбец).
Изменяя величину допуска и нажимая кнопку “Подробнее…” вы можете проконтролировать, как изменяется машинное представление о расположении объектов.
3. Теперь можно проставить «префикс» и «постфикс» без нумерации, через флажок в диалоговом окне.
4. Добавлена возможность отрицательной нумерации (уменьшение). Когда интервал – отрицательное число.

[s4am]

Цены бы не было добавь вы функцию копирования текста с простановкой префикса или изменения текста на заданное число.

[[MTL]]

Поподробнее можно?

[s4am]

Сообщение от [MTL] Поподробнее можно?

Выбираю текст - указываю шаг приращения - выбираю базовую точку - проставляю текст с приращением
пример:
есть текст 100 (выбираю его) - указываю + 10(или - 10 чтоб наоборот отнимала от выбранного числа) -выбираю базовую точку - проставляю текст в чертеж 110 - 120- 130-и т.д.....
Как то так. надеюсь внятно объяснил

[[MTL]]

То есть вы хотите, чтобы программа не переименовывала текстовые блоки, а сама их создавала? Хм...надо подумать.

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

Сообщение от KEHT Если добавить макросы VBA в автозагрузку, то открытие файлов и их сохранение увеличивается во времени проверено на Autocad 2011 и 2016. Не знаю почему, заметил такую особенность, это видно при автосохранении особенно.

Ничего удивительного: http://adn-cis.org/autocad,-vba-i-proizvoditelnost.html