|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
![]() |
Поиск в этой теме |
|
||||
Регистрация: 26.02.2025
Сообщений: 2
|
Всем здравствуйте! Не получилось победить беду из #632? Очень требуется такое решение. Необходимо поменять значение стиля печати для примитивов внутри блоков после конвертации при помощи ._CONVERTPSTYLES. Для примитивов с заданным цветом задается стиль печати Style_1. На этих объектах и выпадает данная ошибка.
|
|||
![]() |
|
||||
Регистрация: 10.01.2020
Сообщений: 415
|
1 Сначала надо перейти в режим с объектозависимым профилем печати
2 В коде файла bgtools 3.9.lsp нужно внести следующие изменения: строка 5733 | (defun bg:blfix (lst / cnt adoc opt ss cnta isRus locklay bobj old_color) ... строка 5766 | ;;_Color type byblock строка 5777 | (setq old_color (vla-get-color sub_item)) ... строка 5799 | ;;_Plot style type byblock строка 5800 | (if (vlax-write-enabled-p sub_item) строка 5801 | (if (= old_color 1) строка 5802 | (vla-put-PlotStyleName sub_item "Красное") строка 5803 | (vla-put-PlotStyleName sub_item "ByBlock") строка 5804 | ) ;_ end of if строка 5805 | ) ;_ end of if Изменения позволят устанавливать стиль печати "Красное" всем объектам внутри блока имеющим цвет №1 (красный) |
|||
![]() |
![]() |
|
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Научите лиспу на примере (или как kpblc, VVA и компания пытаются обучить чайника лиспу) | Red Nova | LISP | 5019 | 07.06.2025 23:43 |
{Конкурс} Lisp. Задачки для студентов | gomer | LISP | 10 | 05.01.2011 16:33 |
LISP на команду 3dcorbit | Малюк | LISP | 2 | 30.09.2009 14:18 |
Запуск Lisp команды в новом документе | BlackHarp | LISP | 1 | 26.03.2009 23:06 |
загрузка DOS прог через LISP | Gaa | LISP | 15 | 12.08.2005 19:19 |