乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 93|回复: 14

[编程交流] 快速访问网元

[复制链接]

13

主题

57

帖子

45

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:17:04 | 显示全部楼层 |阅读模式
有人能提供一种快速方法来访问特定块外的嵌套层(参照编辑/就地块)吗?
 
例如,所附的图形模拟了访问特定块外部嵌套块的困难。
 
参照附图,如何访问矩形块外部的嵌套层(参照编辑/块在位)?
 
谢谢
如何访问嵌套块。图纸
回复

使用道具 举报

20

主题

338

帖子

323

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
100
发表于 2022-7-5 17:21:29 | 显示全部楼层
你调查过恩特尔吗?
回复

使用道具 举报

13

主题

57

帖子

45

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:26:17 | 显示全部楼层
Hippe013先生。我和我的伴侣仍然Lisp程序。
回复

使用道具 举报

18

主题

1529

帖子

973

银币

中流砥柱

Rank: 25

铜币
649
发表于 2022-7-5 17:34:13 | 显示全部楼层
OP在这里发布了相同的问题:
https://www.theswamp.org/index.php?topic=51852.0
回复

使用道具 举报

13

主题

57

帖子

45

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:35:12 | 显示全部楼层
 
你好我是那里的海报,但没有关于访问嵌套块的回应。
回复

使用道具 举报

18

主题

1529

帖子

973

银币

中流砥柱

Rank: 25

铜币
649
发表于 2022-7-5 17:42:46 | 显示全部楼层
对于“正常”块,标准的REFEDIT命令效果良好。根据您选择的嵌套元素,该对话框建议嵌套级别。但您的图形包含一个相当独特的块,从复杂的嵌套和块名来看,它可能是通过编程创建的。为了增加难度,将其插入到具有巨大坐标的点。
这似乎不太可能是一个现实的场景。
 
关于双重张贴:
我想Hippe013在这里发表自己的贡献之前很想知道你的另一个帖子。
回复

使用道具 举报

13

主题

57

帖子

45

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:44:52 | 显示全部楼层
 
先生
 
该图纸不是我使用的图纸,只是一个示例:
-我在图形中处理的块数
-许多嵌套的层次很深
-长文件名(其中一个例子是胡言乱语。这是为了表明大多数块都有很长的名称)
 
所有这些都使得进入特定块之外的嵌套块级别极其困难,甚至是不可能的。
 
Cadders。请试用绘图并共享您的快速方法,以访问该特定块外部的嵌套层。
我每次画50个这样的方块&一点也不有趣。每次面对这样的障碍,我都会汗流浃背
回复

使用道具 举报

pBe

32

主题

2722

帖子

2666

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
211
发表于 2022-7-5 17:49:47 | 显示全部楼层
  1. (defun c:notdb (/ adoc nb ent entV)        ;<-- Name of the deepest block
  2. (setq aDoc (vla-get-ActiveDocument (vlax-get-acad-object)))
  3. (setq nb (car (nentselp)))
  4. (setq ent (entget nb))
  5. (setq        entV (vla-ObjectIdToObject aDoc
  6.        (vla-get-OwnerId
  7.          (vlax-ename->vla-object nb)
  8.        )
  9.      )
  10. )
  11. ;;;                To go directly to editing the block        ;;;
  12. (command "_bedit" (Vla-get-name entV))
  13. (princ)
  14. )
回复

使用道具 举报

13

主题

57

帖子

45

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:52:59 | 显示全部楼层
pBe先生,谢谢您的调查。
 
我在LISP中指出了块名
 
  1. (defun c:notdb (/ adoc nb ent entV)[b]klmgagidgiASDFJNSAASDFJKASNDLFVASD LFDSAHFSDFVANDGNAQ-!_MyBlock76fafkljgb asrfgquyrwegf wqeiugf[/b]        ;<-- Name of the deepest block
  2. (setq aDoc (vla-get-ActiveDocument (vlax-get-acad-object)))
  3. (setq nb (car (nentselp)))
  4. (setq ent (entget nb))
  5. (setq        entV (vla-ObjectIdToObject aDoc
  6.        (vla-get-OwnerId
  7.          (vlax-ename->vla-object nb)
  8.        )
  9.      )
  10. )
  11. ;;;                To go directly to editing the block        ;;;
  12. (command "_bedit" (Vla-get-name entV))
  13. (princ)
  14. )

 
然而,当运行lisp时,它要求选择一个对象&当单击时,它直接将我带到我单击的块中。
 
参考之前的示例图纸,我需要的是:
 
我需要在我点击的块外一个块级别,在这个例子中,它是矩形块。
 
因此基于绘图示例
 
此外,我需要进入的块级别,就在我单击的块之外,有不同的块名称。
因此,最好是我单击的LISP,它将进入我单击的块之外的块级别。
 
谢谢
回复

使用道具 举报

13

主题

57

帖子

45

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:58:29 | 显示全部楼层
另一种解释方式
 
块1(最外层块)
 
运行lisp时,cadder将选择一个嵌套实体(恰好是块6)&lisp将在Block in Place命令中将cadder带到块5。
 
干杯
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-6 10:36 , Processed in 1.049141 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表