ddqzmpaxlozc 发表于 2020-6-8 21:39:56

终于实现了在位编辑块的切换跳转

本帖最后由 ddqzmpaxlozc 于 2020-6-11 10:04 编辑

在大佬的帮助下，终于实现了在位编辑块的切换跳转，只不过还存在参照点不对的情况，大家觉得该从何入手，解决这一难题?

菜卷鱼 发表于 2020-7-10 08:55:59

这个程序并没有多大的意义，只是省略了点几次确定。
平时进入参照块编辑都是先选中块，然后鼠标右键选择进入，所以无法直达你要的块，

如果你先输入REFEDIT命令，再选择块，就可以直达你要的块，你只要点一下确认就是

再说一遍，是先输入命令，再选择对象

(defun c:red (/ reft)
(setq reft (getvar 'refeditname))
(if (= reft "")
    (command "refedit")
    (progn
      (command "refclose" "s")
      (command "refedit")
    )
)
(prin1)
)

你搞半天就是为了偷懒少点一下确定

tranque 发表于 2024-4-12 11:23:47

菜卷鱼 发表于 2020-7-10 08:55
这个程序并没有多大的意义，只是省略了点几次确定。
平时进入参照块编辑都是先选中块，然后鼠标右键选择进 ...

确实是省略了点击，但是体验到的流畅感是丝滑的

azbd 发表于 2020-6-8 23:07:33

不明白，可以详细点吗？

longer1000 发表于 2020-6-9 08:27:09

共享下嘛！

lxl217114 发表于 2020-6-9 09:01:57

这个妹纸有点厉害

飒路紫 发表于 2020-6-9 09:13:36

代码发上来，大家研究研究，也许是几个坐标系之间转换的问题。

lisperado 发表于 2020-6-9 10:07:17

嵌套块？好像见过Lee Mac类似思路

nentsel应该会返回所选取嵌套块再entget？

ddqzmpaxlozc 发表于 2020-6-9 21:43:52

感觉无解，哈哈哈，看来只有cad编程人员出手才能搞定了

ddqzmpaxlozc 发表于 2020-6-10 10:26:33

已经解决！

飒路紫 发表于 2020-6-10 17:12:24

飒路紫 发表于 2020-6-9 09:13
代码发上来，大家研究研究，也许是几个坐标系之间转换的问题。

每次关闭再打开？位置不对，就是参照坐标不对。很好解决。只是要一直选择而已
页: [1] 2
查看完整版本: 终于实现了在位编辑块的切换跳转