[kurstep]

Здравствуйте. Очень часто в автокаде необходимо выбрать конкретный объект. Возможно ли это сделать не используя фильтры.
Ведь каждый объект имеет свой номер который не меняеться после закрытия чертежа
( типа (-1 . <Имя объекта: 7fffd636650>))
Я пытался выбрать через фуннкцию

Код:

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

 (pl:obj-filter-select-manual  sel '( (-1 . <Имя объекта: 7fffd636650>)))

Но результата это не дает. Подскажите как это можно осуществить?

[Puroshev]

Команда: (entget (car (entsel)))
Выберите объект : ((-1 . <Имя объекта: 7ffffb06540>) (0 . "LINE") (330 . <Имя
объекта: 7ffffb03990>) (5 . "238A") (100 . "AcDbEntity") (67 . 0) (410 .
"Model") (8 . "0") (62 . 7) (6 . "Continuous") (100 . "AcDbLine") (10 1.2212
3.1366 0.0) (11 6.90465 7.1618 0.0) (210 0.0 0.0 1.0))

Выбор объекта по его метке (5 . "238A")
(setq Ob (handent "238A"))

[ProPeller]

Сообщение от kurstep Очень часто в автокаде необходимо выбрать конкретный объект.

Вы пытаетесь добавить объект к уже существующему набору. Какой смысл выбирать один примитив по фильтру, если вас есть указатель на него?
Воспользуйтесь командой vla-AddItems и не ищите сложных путей.

Вот еще вопрос. Вы действительно добавляете объект к набору или же вам просто нужно выбрать один объект и работать с ним?

[skkkk]

Тоже теперь вдруг стало любопытно. Странно, почему не работает конструкция типа (слету не смекну, как использовать в фильтре тип ENAME, поэтому использовал handle (STR)):

Код:

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

 (ssget "_X"  '((5 . "14FEA5")))

Оно ясно, что конструкция данная не имеет особого практического смысла, поскольку можно создать пустой набор и добавить в него нужный примитив, типа того:

Код:

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

 (setq ss (ssadd))
(ssadd (car (entsel)) ss)

Но все же почему методы AutoLISP справедливы не для всех групп-точечных пар?

[ProPeller]

Сообщение от skkkk Но все же почему методы AutoLISP справедливы не для всех групп-точечных пар?

Скорее не методы, а именно фильтры. Может быть потому что с таким фильтром можно выбрать только лишь один объект? Как вы уже правильно сказали, практического смысла это не имеет.

[kurstep]

Такой выбор понятен....

Сообщение от skkkk Оно ясно, что конструкция данная не имеет особого практического смысла, поскольку можно создать пустой набор и добавить в него нужный примитив, типа того: Код: [Выделить все] (setq ss (ssadd)) (ssadd (car (entsel)) ss)

но можно ли передать команде ssadd <имя объекта> без указания на него интерактивно (car (entsel)) , то есть передать непосредственно значение <имя объекта: 7ffdee4234> ?

[skkkk]

Сообщение от ProPeller Скорее не методы, а именно фильтры.

Ну да, корявенько выразился, хотел выпендриться - только опозорился (с)

Сообщение от ProPeller Может быть потому что с таким фильтром можно выбрать только лишь один объект?

Все равно не пойму логику. Ведь я же могу выбрать один объект с фильтром, например, по слою или типу примитива, если он один и есть такой.
При попытке использовать фильтр по хэндлу ошибки не возникает (типа "неверный список ssget"), а просто выдается nil как будто такого объекта и нет вовсе. Мне, конечно, остается только догадываться о внутренней реализации механизмов лиспа и фильтров в частности, но думалось, что там все идет по одному определенному алгоритму, и возможжно, получается, что фильтр по хэндлу специально исключили из функционала, потому что посчитали, что это не имеет практического значения? Непонятно.

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

Сообщение от kurstep можно ли передать команде ssadd <имя объекта> без указания на него интерактивно (car (entsel)) , то есть передать непосредственно значение <имя объекта: 7ffdee4234> ?

Можно. Сначала запомни ename-указатель на примитив в отдельную переменную, а потом ее и используй. Другой вопрос, что не факт, что такой подход сработает (можно в переменную загнать указатель на примитив внутри блока, например).

[kurstep]

Сообщение от Кулик Алексей aka kpblc Другой вопрос, что не факт, что такой подход сработает

В том то и дело, что не работает, как я понимаю ename-указатель - это особый тип данных и когда его загоняешь в переменную он не читается правильно

[ProPeller]

Сообщение от kurstep и когда его загоняешь в переменную он не читается правильно

Работает он правильно, просто функция pl:obj-filter-select-manual подразумевает под собой использование фильтра, а фильтр с подобными условиями работать не будет в силу особенностей ЯП. До сих пор не понимаю, с какой целью вы используете pl:obj-filter-select-manual.

Сообщение от kurstep ename-указатель - это особый тип данных и когда его загоняешь в переменную

Хотя, вопрос как "загонять". Расскажите как вы это делаете?

[skkkk]

Offtop: ProPeller, в расширенном режиме есть галочка "Отключить смайлы в тексте". Хотя даже прикольно эта рожица туда затесалась

Добавлено: Алексей уже поправил.

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

Offtop: Хотя я правил не это

[ProPeller]

Сообщение от skkkk Offtop: ProPeller, в расширенном режиме есть галочка "Отключить смайлы в тексте". Хотя даже прикольно эта рожица туда затесалась

Offtop: Пасиба!))

Сообщение от Кулик Алексей aka kpblc Offtop: Хотя я правил не это

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

Сообщение от skkkk Тоже теперь вдруг стало любопытно. Странно, почему не работает конструкция типа (слету не смекну, как использовать в фильтре тип ENAME, поэтому использовал handle (STR)):

Потому что иногда нужно читать и официальную документацию:

Filterable Entities Entity filter lists recognize all DXF group codes except for handles (group 5), names (the "pseudo" group code -1), and extended entity data codes (in the range 1,000-2,000). To retrieve extended entity data, a filter list must specify the data's registered application name.

[power_factor]

Сообщение от kurstep но можно ли передать команде ssadd <имя объекта> без указания на него интерактивно (car (entsel)) , то есть передать непосредственно значение <имя объекта: 7ffdee4234> ?

А можно ли то же самое с entget? То есть передать в функцию entget <Entity name>, <hanle>, <soft pointer> или что-то ещё без каких-либо промежуточных действий c entsel и прочим.

Во всей литературе единственным примером работы с entget является код вида: (enget (entlast)) или (entget (entnext)). Понятно, что эти примеры прекрасно работают, но ведь и entlast, и entnext используют имя объекта или какую-то иную "метку". Так почему же невозможно использовать эту метку сразу, если она мне известна?

[name02]

Функция entget как раз и служит для получения информации в списочном виде из объекта ENTITY - смотри справку тут
То есть ты предварительно получаешь объект и передаешь его как аргумент в entget.
Если хочешь, то можешь сделать свою функцию и передавать в нее хоть ENTITY, хоть HANDLE и уже внутри нее реализовать что-то
Или я не правильно понял что тебе нужно...

[power_factor]

Сообщение от name02 Или я не правильно понял что тебе нужно...

Или я правильно объяснить не могу)

В примере хелпа:
(entget (entlast))

Я хочу знать, можно ли:
(entget (-1 . <Entity name: slk0dsl1>))

или какой-то другой синтаксис, но напрямую в entget передать Entity name или другой уникальный идентификатор. Без промежуточного присваивания, entsel и т. п.

[Сергей812]

использовать соответствующие функции лиспа - handent, vla-handletoobject.

[name02]

Сообщение от power_factor Я хочу знать, можно ли: (entget (-1 . <Entity name: slk0dsl1>))

Думаю, что ты не очень понимаешь суть entsel/entnext и какой аргумент нужен entget.
entsel/entnext позволяют получить ОБЪЕКТ (он же entity). Напрямую изменить/прочесть его параметры ты не можешь, чтобы это сделать, надо как представить его в "читабельном" виде.
Для этого и нужен entget - он получает ОБЪЕКТ, а возвращает СПИСОК из точечных пар, соответствующих свойствам объекта. И вот как раз этот СПИСОК ты можешь изменить, что в свою очередь повлияет на ОБЪЕКТ.
Что в принципе и отражено в названии языка List Processing language — «язык обработки списков»

[===AAA===]

Я хочу знать, можно ли: (entget (-1 . <Entity name: slk0dsl1>))

Можно, но немного по-другому:

(entget (cdr(-1 . <Entity name: slk0dsl1>)))

Всю-то "точечную пару" зачем функции (entget) скармливать?