| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
04.08.2017, 16:04 | #1 | |
VBA autocad 2016. Вставка динблоков на листы с установкой параметров
Инженер
С-Пб
Регистрация: 02.10.2008
Сообщений: 3,686
|
||
Просмотров: 4605
|
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
То есть проверять "oDblkProp.PropertyName"? Но динпараметр вроде один всего в блоке..
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
|
||||
Цитата:
Set oDblkProp = oProps(I)
__________________
Вопрос : Где находится Тургай ? Ответ : Между Парагваем и Уругваем..... |
||||
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
Отчего-то сия процедурка съедает аж 5 секунд на изменение значения параметра. Может, оттого, что вставляется блок на неактивных лайотах? Но время убивается именно на
"Set tmpattrDin = AttrDin(0): tmpattrDin.Value = txtVid", без этих строк процедура в 10 раз быстрее. Как дать ей пинка, что б полетело? Код:
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
блок включает в себя - параметр видимости (около 50 значений) и порядка 130 примитивов - полилинии, текст, штриховки, блоки, сплайны, отрезки, области. Ничего особенно хитрого..
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Может, поможет отключение REGENMOODE?
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
Попробовал, как работает с REGENMOODE=0 - разницы существенной нет. А вот, спасибо baksconstructor, - надоумил прокси поискать.. и, оказалось, их там есть! После чистки быстрее гораздо стало шевелиться, но все равно.. Вставка 20 блоков на 5 листах - порядка 20 секунд.
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
А ты вставляешь, обращаясь к oLayout как к объекту листа? Или как к блоку листа?
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
Цитата:
Код:
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! Последний раз редактировалось AlexV, 08.08.2017 в 16:54. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Попробуй обращаться именно к блоку листа по типу
oLBlock = oLayout.Block Может быть, заработает
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
Дык, вроде и так: "Set insertedBlock = oLayout.Block.InsertBlock"
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Упс, сорри...
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Инженер Регистрация: 02.10.2008
С-Пб
Сообщений: 3,686
|
Да, сам блок влияет на скорость. Удалил всю графику, оставил только пару отрезков и параметр видимости - и время на вставку одного блока с установкой в одно из состояний снизилось с около 1 секунды до 0,35 секунд. Если исключить установку параметра tmpattrDin.Value = txtVid, тогда - 0,16 секунды..
__________________
...Не пытайся гнуть ты ложку, Не вяжи её узлом. Ложка - ложка понарошку, А по правде, - это лом! |
|||
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Проблема создания связи таблиц в AutoCAD 2016 с MS Excel 2016 | alterfiesta | AutoCAD | 15 | 27.06.2019 12:29 |
Как изменить названия листов документа pdf при публикации из AutoCAD 2016 | Михаил Секерин | AutoCAD | 12 | 15.04.2019 09:32 |
Отчего тормозит курсор в Autocad 2016? | Korochun | AutoCAD | 0 | 02.03.2017 23:38 |
Как настроить копирование свойств (_matchprop) объектов между разными чертежами AutoCAD 2016 | Kostinok | AutoCAD | 7 | 15.02.2017 12:35 |
Как добавить префикс к однострочному тексту в AutoCAD 2016 | andrey_artphoto | AutoCAD | 5 | 27.05.2015 17:11 |