Информационный портал для профессионалов в области САПР
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Форумы CADUser → Программирование → VBA → Помогите пожалуйста с алгоритмом.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Не подскажите ли алгоритм следующей задачки. Линия состоит из многих отрезков. Проводится она от одного блока к другому. Мне нужно сделав "пик" на один из участков линии "собрать" в Selection Set все отрезки составляющих эту линию.
если линия идет из insertion point of block
1. пик на линию
2. polar из dxf 11, по dxf 50(или 51, не помню), на 5 километров
3. ssget "x" (list dxf 11 , polar)
3. в цикле найти ближайший блок
тп же самое с dxf 10
7. удаление всех линий между блоками
8. рисование одной линии
если линия гдето в блоке но не в insertion point of block
1. пик на линию
2. в цикле.
провеить на пересечение с нужным блокком
(entdel ent) чтобы не попал в новый ss
select by point to ss
(entdel ent)вернуть ранее удаленный
ну и.т.д
Спасибо, но это на Lisp-е. A как на VB?
> vig11
Алгоритмы во всех языках одинаковы.
> cadhelp
Никак не могу понять предложенный алгоритм :(
Например, вот это:
7. удаление всех линий между блоками
8. рисование одной линии
Это автору ветки вроде как не надо ???
идея была в том чтобы вместо создания полилинии по "PEDIT" из набора линий, просто создать новую линию. но можно и не создавать , а например покрасить их в красный цвет и развернуть на 90 град.
to vig11
polar в байсике тоже есть
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Форумы CADUser → Программирование → VBA → Помогите пожалуйста с алгоритмом.
Форум работает на PunBB, при поддержке Informer Technologies, Inc
