Entsel和Entsel在同一位置
大家好，我想问一下：
有没有办法同时执行“entsel”和“entsel”（单击一次）？
例如，我试图从动态块中选取一条嵌套线，
我试图存储line的实体名block的实体名。
Command: (entsel)
Select object: (<Entity name: 7ff64b74d980> (58158.7 46703.2 0.0))
我已经意识到（cdr（entsel））将返回用户拾取点的坐标，但是否可以调用entsel并应用/模拟相同的拾取点？ 可能是这样的-而不是nentsel-使用nentselp并查找这两个不同输出之间的差异（nentsel/nentselp）：
(defun c:pick ( / es ns )
(setq es (entsel "\nPick an entity..."))
(setq ns (nentselp (cadr es)))
(prompt "\nEntsel data : ")
(princ es)
(prompt "\nNentselp data : ")
(princ ns)
(princ)
)
谢谢你，马尔科！
我对包含这种方法的例程几乎没有什么想法，我很高兴这不是很难解决。
保加利亚欢呼！ 无需第二次选择-当选择嵌套实体时，父实体列表是由nentselp返回的列表中的第四项。 我刚试过这个：
Command: (nentsel)
Select object: (<Entity name: 7ff6925060b0> (58211.6 46249.8 0.0) ((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0) (55462.9 46380.2 0.0)) (<Entity name: 7ff692504ec0>))
据我所知，（car（nentsel））将返回嵌套实体的名称，（last（nentsel））将返回父实体，因此当我选择块的同一行时：
Command: (entsel)
Select object: (<Entity name: 7ff692504ec0> (58178.1 46249.8 0.0))
Command: (last (nentsel))
Select object: (<Entity name: 7ff692504ec0>)
（last（entsel））将等于（car（entsel））
我希望我理解正确
不完全是这样：尝试创建一个具有多个嵌套级别的嵌套块，然后选择块的一个组件-您会发现，由nentsel/nentselp返回的列表中的最后一项将包含一个实体列表，所选实体上方的每个父项一个。
这样，（last（last（ENTSELP）））将等于（car（entsel）） 李，
这些小细节决定了为什么你的代码（总是）完美无瑕。
我没有想过多嵌套实体。
谢谢 谢谢你的客气话，Grrr，经过多年的实践，你对函数有了全面的了解-你的路很好。 你好
将此页面添加书签，作为您的参考。 嗨，塔瓦，
我刚刚学会了如何在AutoCAD中使用“脱机帮助”，因为我经常失去互联网连接。
但是你再次注意到，我没有检查它来解决这个问题。
很抱歉，
至少有人可以从这条线索中学到一些东西
页:
[1]
2