[Kostinok]

Здравствуйте, возможно кто то уже встречался с этой проблемой, поэтому хочется перенять опыт и пополнить знания, тем паче, что это действительно смогло бы помочь.
Идея такая:
Представте себе кучу линий на чертеже - это несколько объедененных групп, встает вопрос как быстро и точно подсчитать длины ГРУПП, состоящих из этой кучи линий, т.е. есче раз 20 линий на чертеже - это 3 электрогруппы (к примеру электроосвещение).
Так вот каждый раз я объединяю линии в одной моей электрогруппе в группу AutoCADовскую, командой "-g", даю этой AutoCADовской группе одноименное название (к примеру О1). После выделяю всю новоиспеченную группу и набираю команду "list" - AutoCAD находит мои линии объединенные в группе и дает по каждой информацию, из всей информации меня интересует только length, поэтому после в этом же текстовом окне я набрав команду cal начинаю складывать все мои линии.
Немного про выделение: точнее сказать сначала мне приходиться обводить те линии, которые должны попасть в одну группу, делаю это определенным цветом, в определенном слое, что бы после нажав QSelect можно было их легко найти, а потом уже состряпать группу.

Хотелось бы автоматизировать процесс, т.е. сначала нарисовав линии (поверх остальных) бысто их выделить, но не тратить на это драгоценное время - т.е. не щелкать на proreties, не выбирать qselect, не задавать там определенный цвет, и не жать потом на выделить - чувствую, что все это возможно...
И вторая задача, после того как AutoCAD определился с новой группой - он мне показал сумму всех длин линий входящих в группу.

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

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

kopilkaspama, у тебя из 2 сообщений 2 со ссылками на твой ресурс. Намек ясен?

[ЕЖЕК]

Раз подняли топик, воспользуюсь!

Приспичило мне тут помимо подсчета длин по критериям, еще одна задача!
Простановка над каждым примитивом (line, pline)из набора, над его центром, текста(или мтекста) содержащего его длину.(можно еще с коэффициентом)

Заранее спасибо!

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

ЕЖЕК, в поиск. А не найдешь - тогда field.

[ЕЖЕК]

Сообщение от Кулик Алексей aka kpblc ЕЖЕК, в поиск. А не найдешь - тогда field.

Поиском нашел более похожее тему http://forum.dwg.ru/showthread.php?t=842&page=6
читаю ее уже часа два, ничего такого нет, надо править лиспы

А field это я так понимаю дизель писать нужно чтоли?

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

Зачем Diesel? И без этого обойтись можно...

[ЕЖЕК]

Сообщение от Кулик Алексей aka kpblc Зачем Diesel? И без этого обойтись можно...

Я понимаю что ничего сложного нет, но я уже ничего не писал на лиспе лет 5.
А так сделал сборку и вышеозначенного поста, которая позволяет выбрать примитив и поставить в ручном режиме текст-длину, не совсем то что хотел, но качественно лучше чем совсем без САПРа .
Спасибо

[VVA]

ЕЖЕК, Полями было здесь LISP. Вставка в таблицу поля, соотвествующего площади примитива
Полями и тестом здесь Добавление в чертеж длины полилинии
в частности в #11 RPL- Report Polyline Length

Пишет длину вначале плиний и линии и заносит в гиперссылку. Подвел мышу и посмотрел

[zz212243]

Ребят, подскажите, почему при каждом заходе в автокад приходится по-новому загружать лисп "(entlen)" через "appload" ?

[sertor]

Сообщение от zz212243 Ребят, подскажите, почему при каждом заходе в автокад приходится по-новому загружать лисп "(entlen)" через "appload" ?

Один из вариантов - добавить лисп в автозагрузку (портфель).

[zz212243]

sertor, в смысле? Добавить лисп-файл в меню "пуск"-"автозагрузка"? В автокаде я автозагрузки не встречал... Если в автокаде- то где этот портфель (автозагрузка) находится?

[Хмурый]

диалоговое окно команды _appload

[zz212243]

Спасибо, Хмурый и sertor! Помогло!

[pan]

Сообщение от Kostinok Можно ли выбрать мои начерченные определенным цветом линии с клавиатуры или написав макрокоманду, мне просто надо знать как работать с Qselect и с его переменными если такие есть, ну в принципе не могут не быть.

Начиная с AutoCAD 2011 в контекстном меню появилась команда "Выбрать подобные"