[Shraybicus]

Добрый вечер.

С помощью функции (см. ниже) можно сделать набор всех примитивов типа "LWPOLYLINE" на чертеже.

(ssget "_X" (list (cons 0 "LWPOLYLINE")))

А как сделать набор примитивов (такого же типа, например), которые находятся в блоках?

Спасибо!

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

Что значит "в объектах"? В описаниях блоков, что ли?

[Shraybicus]

Сообщение от Кулик Алексей aka kpblc Что значит "в объектах"? В описаниях блоков, что ли?

Извиняюсь, если что не понятно. Просто я только недавно начал постигать программирование на AutoLisp.

Я имею ввиду блоки, например, блок состоящий из полилинии, а потом вставленный в чертеж.

С помощью функции (ssget "_X" (list (cons 0 "LWPOLYLINE"))) я создаю набор всех примитивов типа "LWPOLYLINE" на чертеже. А те, полилинии, которые находятся в объектах не попадают в этот набор. Вот как можно получить доступ к примитивам в объектах?

[Дима_]

Сообщение от Shraybicus Вот как можно получить доступ к примитивам в объектах?

Код:

[Выделить все]

(tblsearch "block" "имя_блока") или
(vla-get-blocks (vla-get-activedocument (vlax-get-acad-object)))

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

[Shraybicus]

Сообщение от Дима_ только боюсь что собирать в набор примитивы из блоков ошибочное направление - опиши кончную задачу, учится лучше сразу по правильному пути (чтоб потом не переучиватся).

Я создал программку на LISP, с помощью которой можно автоматически выводить чертежи на печать, в зависимости от формата листа (А4, А3, А2 и т.д.). Формат листа как известно это поллиния. Так вот, программа отыскивает эти самые поллинии отвечающие определенному требованию.

Все прекрасно работает, но как оказалось те форматки, которые созданы с помощью блоков, моя программа не видит. А поиск основывался на использовании только функции
(ssget [<метод>] [<точка1> [<точка2>]] [<список>] [<фильтр>]).

[Нащальника]

Считаю категорически неправильным печать из модели.
Чертите все 1:1 и печатайте с листов. И проблем не будет.

[Shraybicus]

Сообщение от Нащальника Считаю категорически неправильным печать из модели.

В связи с чем это связано? Обоснуйте.

[Дима_]

Сообщение от Shraybicus Формат листа как известно это поллиния.

В этом и зарыт "корень зла" - как вы сами убедились - это не так (еще и блоки). По каким параметрам полилинии Вы определяете формат? - хотя, повертье на слово, методология у Вас изначально тупиковая (уж лучше как раз на блоки ориентироватся, а вобще - как это рекомендует автодеск использовать лист).

[Shraybicus]

Сообщение от Дима_ В этом и зарыт "корень зла" - как вы сами убедились - это не так (еще и блоки). По каким параметрам полилинии Вы определяете формат? - хотя, повертье на слово, методология у Вас изначально тупиковая (уж лучше как раз на блоки ориентироватся, а вобще - как это рекомендует автодеск использовать лист).

Листы я не хочу принципиально использовать. Мне не удобно. Из моих личных соображений.

Форматку я сделал из динамического блока. Которая принимает формат от А4 и дальше, которые используют по ГОСТу. Т.е. все чертежи которые будут создаваться, будут использовать эти блоки (форматки).

Не вижу проблемы и тупика.)

[Дима_]

А не проще посмотреть имя блока и его динамические свойства?

[Shraybicus]

Сообщение от Дима_ А не проще посмотреть имя блока и его динамические свойства?

Возможно) Я просто еще учусь) Поэтому и спросил на форуме. Ведь вроде объекты на LISPе называются vla-объекты, раз ты предлагаешь использовать функции с расширением vla-. А я вот не знал это те блоки или что то другое.)

[Нащальника]

Сообщение от Shraybicus Цитата: Сообщение от Нащальника Считаю категорически неправильным печать из модели. В связи с чем это связано? Обоснуйте.

1. Создавая чертеж в модели 1:1 вы избавляетесь от ошибок при масштабировании объектов или размеров.
2. Новый лист создается нужного формата с настройками на нужный принтер, можно написать название листа.
3. Можно вставить в лист 2 и более объектов разного размера расположеных далеко друг от друга (пример фасад и узел).
4. Вывод на печать большого числа листов осуществляется с помощью подшивки.
5. Нет необходимости включать и выключать слои. Все блокируется в листе.

И многое многое другое...

Совет: научитесь работать с листами и видовыми окнами. Автоматизация проектирования начинается с этого.

[Shraybicus]

Сообщение от Дима_ А не проще посмотреть имя блока и его динамические свойства?

А как посмотреть динамические свойства блока?

С помощью (tblsearch <таблица> <заголовок>) я максимум могу получить точку вставки. А вот если ввести в командной строке _LIST, то еще получаю размеры блока, т.е. длину и ширину форматки. Но как их получить другим способом я не знаю. =(

Сообщение от Нащальника Совет: научитесь работать с листами и видовыми окнами. Автоматизация проектирования начинается с этого.

Это все я умею. И черчу всегда 1:1. Но вот не хочу я использовать листы. Вот и все тут.)

[Дима_]

Посмотреть динамические свойства блока я настоятльно рекомендую через vla функции. С помощью tblsearch ... ты не получишь точку вставки вхождения блока - ты получишь его описание (доступ к примитивам входящим в блок - через dxf -2, далее entext до пустого символа nil). Кстати - если тебе нужно определить "габартные размеры" - есть специально заточенная функция vla-getboundingbox - вобщем ты либо изучи материал, либо задавай вопросы конкретней.

[Shraybicus]

Сообщение от Дима_ Кстати - если тебе нужно определить "габартные размеры" - есть специально заточенная функция vla-getboundingbox

И как эта функция работает?

Не все такие умные как ты

[Александр Ривилис]

Сообщение от Shraybicus И как эта функция работает?

Поиск по форуму: http://www.google.ru/custom?hl=ru&in...ingbox&spell=1

[Дима_]

Сообщение от Shraybicus И как эта функция работает? Не все такие умные как ты

в автокадовской справке по VB расписаны все функции

Код:

[Выделить все]

(vl-load-com)
(defun gbb (ent / xy1 xy2)
(vla-getboundingbox (vlax-ename->vla-object ent) 'xy1 'xy2)
(mapcar 'vlax-safearray->list (list xy1 xy2)))

пример (gbb (entlast)) - вернет список из двух точек (нижний левый и верхний правый угол примитива).
P.S. если считаешь меня умней - то послушай совет - РАБОТАЙ В ЛИСТЕ.

[Shraybicus]

Дима_, спасибо

Попробовал этот листинг.

Испытуемый приложен к посту. Файл содержит динамический объект, который с помощью режима выбора может становиться форматом А4 книжный или А4 альбомный.

Результат работы функции: ((0.0 0.0 0.0) (297.0 297.0 0.0))

А если нарисовать поллинию обычную, то результат как полагается.

Что из себя представляют объекты вставленные в чертеж?

[Do$]

Это мы уже походили
Конкретно - в этой теме.
В двух словах: для динамического блока определяются габариты с учетом даже тех объектов, которые невидимы в текущем состоянии.
Остальное ответы можно найти в указанной теме, даже на те вопросы, которые еще не были заданы, но возникнут в скором времени

[Shraybicus]

Сообщение от Do$ Это мы уже походили Конкретно - в этой теме. В двух словах: для динамического блока определяются габариты с учетом даже тех объектов, которые невидимы в текущем состоянии. Остальное ответы можно найти в указанной теме, даже на те вопросы, которые еще не были заданы, но возникнут в скором времени

Спасибо огромное! Почитаю.)