[Kuznetsov R.]

Здравствуйте, форумчане!
Хотел бы попросить помочь с кодом, благодаря которому было бы возможно перенести внутри полилинии, находящейся в слое 1, из Мультитекста или Синглтекста, находящегося в слое 2, текст в атрибут блока.
Последовательность действий могла бы быть следующей:
1. указать (выделить в модели) полилинию для считывания имени слоя;
2. указать (выделить в модели) Мультитекст или Синглтекст для считывания имени слоя;
3. указать (набрать в командной строке) имя атрибута, в который необходимо перенести текст.
Поясняющий чертёж прилагаю.
Буду очень признателен вам за помощь!

[Boxa]

Сообщение от Kuznetsov R. Хотел бы попросить помочь с кодом...

А где собственно код, с которым нужно помочь или Вы так просите написать его за Вас?
ЗЫ.
Всё это выглядит как курсовая работа...

[koMon]

в личное пользование, или …?

[Kuznetsov R.]

Сообщение от koMon в личное пользование, или …?

В личное пользование.

----- добавлено через ~2 мин. -----
Языком лиспа, к сожалению, не владею, а программа существенно бы облегчила рутину в рабочем процессе.

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

https://forum.dwg.ru/forumdisplay.php?f=33 ?

[koMon]

Berries.fas

[Kuznetsov R.]

koMon, спасибо за отклик!
Практически то, что нужно!
Только несколько моментов:
1. См. пост 1.
2. Полилинию необходимо указать только однажды. И не для того, чтобы только внутри этой полилинии произошёл перенос текста в атрибут, а для того, чтобы считать имя слоя полилиний, внутри которых должен произойти перенос. Т.е. после одного запуска команды программа должна пробежаться по всем полилиниям на чертеже, чтобы определить внутри каких следует производить перенос текста в атрибут.
3. Не учитывается слой (во время выполнения программы нет считывания его имени) текста. "Смородина" тоже переносится в атрибут, хотя не должна )
4. Не учитывается имя (во время выполнения программы нет его указания) атрибута. Т.е. нужна возможность переноса текста в любой атрибут с указанными именем (не только "ЯГОДА").

[Boxa]

Offtop: «Тетенька, дайте попить, а то так есть хочется, аж переночевать негде»
нда... без RTree на autolisp, это будет жадный алгоритм... Очень интересно наблюдать.

[Сергей812]

Сообщение от Boxa без RTree на autolisp, это будет жадный алгоритм

отзуммировать чертеж.. получить выборкой с фильтрацией полилинии на указанном слое, а потом выборка типа ssget "_WP" внутри каждой полилинии из полученного ранее набора. Как то так)

[Boxa]

Процитирую ответ Кулик Алексей aka kpblc, который он дал на подобный алгоритм:

И каждый раз выполнять зум, панорамирование и регенерацию экрана - чтобы точки контура гарантированно в него попали?

Это тут было: https://adn-cis.org/forum/index.php?...26462#msg26462

[Сергей812]

ну речь о скорости не идет, лишь бы бесплатно - тем более программа для личного пользования, даже не для работы) все равно руками это будет медленнее делать...

[Boxa]

Сообщение от Сергей812 ну речь о скорости не идет

Потому и написал, что алгоритм в любом случае очень жадный получится... Или перебором координат, или скакать по экрану.

Сообщение от Сергей812 программа для личного пользования, даже не для работы

Ой ли....

Сообщение от Kuznetsov R. а программа существенно бы облегчила рутину в рабочем процессе

[Kuznetsov R.]

Сообщение от Сергей812 все равно руками это будет медленнее делать...

Это действительно так, поскольку количество переносов может доходить до тысячи на одном чертеже.

[trir]

AutoCAD Map 3D => грузим в БД => SQL
задача на пол часа, даже если будут миллионы объектов

[Сергей812]

Сообщение от trir AutoCAD Map 3D => грузим в БД => SQL задача на пол часа, даже если будут миллионы объектов

и пофиг - что на рабочем месте нет ни Map 3D, ни SQL))

[trir]

и пофиг - что на рабочем месте нет ни Map 3D, ни SQL))

а если найду?

Map 3D есть в AutoCAD One, а SQL есть всегда и везде
если нет Map 3D, перегоняем dwg=>dxf а дальше OGR

плохому танцору - ноги мешают

[Boxa]

Сообщение от trir задача на пол часа, даже если будут миллионы объектов

Задача на пол часа и при написание приложения (ну максимум час), однако танцору мешает незнание языков, будь то лисп, SQL или любой другой.
К тому же гражданин соврамши, писал, что для личного пользования, а оказалось для работы.

[Сергей812]

Сообщение от trir Map 3D есть в AutoCAD One

последние пару лет

Сообщение от trir SQL есть всегда и везде

есть для нужд той же 1С, но кто даст туда доступ обычному пользователю?)
Offtop:

Сообщение от trir плохому танцору - ноги мешают

есть условия задачи - лисп. Но мы же знаем про вертикальные решения...)


----- добавлено через ~5 мин. -----
p.s. имхо, автоматизация сейчас должна проходить максимально незаметно для руководства: потому что иначе легко можно получить строго противоположный эффект - вместо облегчения работы увеличение объемов работ) Поэтому ничего, что требует каких то согласований, установок, прав админа

[Kuznetsov R.]

Сергей812, правильно ли я понимаю, что, на ваш взгляд, задача нетривиальная, похожих кодов, которые можно было бы "подрихтовать" под поставленную задачу, вы за свою практику встречали, а написание нового кода под озвученную задачу требует финансовых вливаний?

[Сергей812]

Сообщение от Kuznetsov R. правильно ли я понимаю, что, на ваш взгляд, задача нетривиальная, похожих кодов, которые можно было бы "подрихтовать" под поставленную задачу, вы за свою практику встречали, а написание нового кода под озвученную задачу требует финансовых вливаний?

готового кода 100% именно под ваш вариант скорее всего нет, но отдельные подзадачи представлены на многих языках программирования в инете. Хотите - ждите волонтера, хотите - разберитесь сами, если нет желания тратить время - либо в сторону раздела исполнителей, либо вертикальных решений, как советовали выше.

[Kuznetsov R.]

koMon, Сергей812, спасибо за ответы по существу вопроса!
Тема закрыта.

[Сергей812]

И практически сразу появляются вопросы:
1. Полилиния на заданном слое, но не замкнута - что делать: игнорировать, предложить пользователю замкнуть ее автоматически и т.д.?
2. Контур, образованный полилинией, имеет пересечения или нет?
3. Текст и блок гарантированно находятся внутри контура, или могут "высовываться" за границы?
иначе будет приятный сюрприз - когда прогоните по чертежу "чохом", а потом выискивать среди 1000 групп данных - что штатно отработало, а что нет.

[trir]

Задача на пол часа и при написание приложения (ну максимум час)

тут фишка в том, что если изначально хранить данные в БД, то задача решается одним запросом - минутное дело

есть условия задачи - лисп

можешь дать ссылку на реализацию rtree на AutoLisp'е?

[Сергей812]

Offtop:

Сообщение от trir тут фишка в том, что если изначально хранить данные в БД, то задача решается одним запросом - минутное дело

фишка в том, что никто в здравом уме не даст "играться" на уже поднятой СУБД с рабочими данными. А поднять СУБД на отдельной тестовой машине - это еще надо обосновать суметь. И тем более не везде пользователи сидят под локальными правами администратора, чтобы сделать это самостоятельно)

Сообщение от trir можешь дать ссылку на реализацию rtree на AutoLisp'е?

а оно мне зачем на лиспе?)

[trir]

а оно мне зачем на лиспе?)

https://forum.dwg.ru/showpost.php?p=1874641&postcount=8

что никто в здравом уме не даст "играться" на уже поднятой СУБД с рабочими данными

вообще не проблема

[Сергей812]

Сообщение от trir вообще не проблема

и как туда ТС загнать данные и получить результат, причем из акада?

[trir]

в map 3d есть экспорт в spatial lite или через ogr

[Сергей812]

Сообщение от trir в map 3d есть экспорт в spatial lite или через ogr

это все приведет к решению задачи ТС - перенос по определенному условию содержимого текста в атрибут блока внутри заданного контура?

[Boxa]

ну если совсем фантазировать, по идеи, если взять датаекстрак текстов с соответствующей фильтрации и выборкой и использовать утилитку динИн_диАут, то можно свести текст и блоки по критерию ближайший... и перетащить значения текста в нужный атрибут.... но это на уровне идеи...

[trir]

дальше задача сводится к нахождению точек внутри контура

[Сергей812]

Сообщение от Boxa ну если совсем фантазировать, по идеи, если взять датаекстрак текстов с соответствующей фильтрации и выборкой и использовать утилитку динИн_диАут, то можно свести текст и блоки по критерию ближайший... и перетащить значения текста в нужный атрибут.... но это на уровне идеи...

ну или воспользоваться этим, например. Т.е. сделать выборку полилиний по заданному слою, выборку текста и блока (правда, по какому критерию блок выбирать - в теме не раскрыто -)), далее собрать координаты и дополнительную информации в списки и в цикле пройтись по полилиниям с контролем попадания в образованный ею контур. Получается вложенные циклы 1000шт * 2000 координат (а по факту меньше, если еще флаг обработки ввести в элементы списка) - в принципе, обработка не должна занять длительное время, имхо.

[frostmourn]

Сообщение от trir можешь дать ссылку на реализацию rtree на AutoLisp'е?

Кстати, встречал. Жаль, не сохранил.

[trir]

ну или воспользоваться этим, например.

ну так на c#'е с rtree всё просто

[koMon]

Сообщение от Kuznetsov R. Только несколько моментов:

как-то так