明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2197|回复: 31

[函数] ad运行“RENAME”命令会出现一个对话框能批量加前缀

[复制链接]
发表于 2024-5-21 12:05:39 | 显示全部楼层 |阅读模式
cad运行“RENAME”命令会出现一个对话框“”这个时候批量修改‘标注样式、块名、层名等’都能快捷加前缀,期待大侠实现lsp→对话框里预选→一键搞定全部?
 楼主| 发表于 2024-7-17 21:32:11 | 显示全部楼层
本帖最后由 寒潮大冬瓜 于 2024-7-18 08:30 编辑

;启动贱人YY插件20191016
(DEFUN C:QQ()(QQ2023)(princ))
(defun QQ2023 ()
        (if (not (member '20191016jianren58VLS (vl-list-loaded-vlx)))
                (load "20191016jianren58VLS.VLS")
        ) ;_ 结束if
        (c:YY)
) ;_ 结束defun

按照这个款式来就能实现
其中“QQ”是自己拟定的新快捷命令,“QQ2023”是中转函数名,“20191016jianren58VLS.VLS”或“20191016jianren58VLS.VLx”→是文件名,“yy”是原插件的命令!
 楼主| 发表于 2024-8-11 18:07:46 | 显示全部楼层
本帖最后由 寒潮大冬瓜 于 2024-8-11 18:11 编辑
OooCcc 发表于 2024-5-24 10:24
因为自己也用的到,所以这几天抽空整了个增强型rename

命令名称为oc_renamePlus

OooCcc大侠这个多功能改为同时操作就很棒!
很多时候就是想把这个图加上前缀后→复制到另外张图里进行比较→这样不放过任何一个角落(就是块名图层名标注名文字样式线型等)!这样比较放心不会被另外一个图的原有设置冲击搞乱了……便于保持对比效果!
类似这个

求rename命令增强版
http://bbs.mjtd.com/forum.php?mo ... &fromuid=418631
(出处: 明经CAD社区)

ad运行“RENAME”命令会出现一个对话框能批量加前缀
http://bbs.mjtd.com/forum.php?mo ... &fromuid=418631
(出处: 明经CAD社区)


 楼主| 发表于 2024-7-18 08:23:05 | 显示全部楼层
本帖最后由 寒潮大冬瓜 于 2024-7-18 08:27 编辑
xxyyzzlg 发表于 2024-7-17 21:54
什么场合下需要这么做啊?
避免块重名,整理图库?
从来没批量改过

这个问题其实是设计运用cad的过程中,具体对工况场景的理解角度不同!
我运用是从这张图纸的专业版本→拷贝到另一个图里进行叠加比较→就用到了这个全部重命名!比较过程中还是通过关闭不同的图层来实现视觉冲击效果!
这个过程搞不好是个痛苦的过程!搞好了就能把问题都找出来了→提前制定预控措施!
在用系统命令‘RENAME’前需要把0图层‘YESE移动0图层的全部图元到指定图层便于重命名的实施因为0图层是不能重命名的’处理一下再实施‘RENAME’重命名。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2024-5-21 14:07:26 | 显示全部楼层
都会lisp了还需要弹出对话框做什么。。。直接后台处理掉不就好了。。。
发表于 2024-5-21 15:56:02 | 显示全部楼层
之前整过一个给图块批量加前缀后缀啥的,需要的话我可以发给你

http://bbs.mjtd.com/forum.php?mod=attachment&aid=MTM0NTkwfGFkYzM5Mjk3MjdiOWMwOTg2ZDQ1NzJmMmI5ZDY4MjkyfDE3MjcwMzc0NzY%3D&request=yes&_f=.png

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2024-5-21 16:11:54 | 显示全部楼层
OooCcc 发表于 2024-5-21 15:56
之前整过一个给图块批量加前缀后缀啥的,需要的话我可以发给你

http://bbs.mjtd.com/forum.php?mod=attachment&aid=MTM0NTkwfGFkYzM5Mjk3MjdiOWMwOTg2ZDQ1NzJmMmI5ZDY4MjkyfDE3MjcwMzc0NzY%3D&request=yes&_f=.png

给图块批量加前缀后缀!好棒!感谢OooCcc大侠!462463943@qq.com我qq邮箱
 楼主| 发表于 2024-5-21 16:14:45 | 显示全部楼层
Klein 发表于 2024-5-21 14:07
都会lisp了还需要弹出对话框做什么。。。直接后台处理掉不就好了。。。

我的意思是希望能在lisp里实现这个功能,目前是在CAD界面操作的!
发表于 2024-5-21 16:17:54 | 显示全部楼层
寒潮大冬瓜 发表于 2024-5-21 16:11
给图块批量加前缀后缀!好棒!感谢OooCcc大侠!我qq邮箱


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2024-5-21 16:33:58 | 显示全部楼层
给图块批量加前缀后缀C:\360安全浏览器下载\cad软件的RENAME功能图片_20240521161537.png

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2024-5-21 20:10:55 | 显示全部楼层

感谢OooCcc大侠分享!!!
发表于 2024-5-24 10:24:31 | 显示全部楼层
因为自己也用的到,所以这几天抽空整了个增强型rename

命令名称为oc_renamePlus
运行界面如下:

程序文件如下,中级会员及以上可以免费下载:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2024-5-26 20:30:53 | 显示全部楼层
OooCcc 发表于 2024-5-24 10:24
因为自己也用的到,所以这几天抽空整了个增强型rename

命令名称为oc_renamePlus

非常棒!感谢指导以及分享!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-9-23 04:37 , Processed in 0.235591 second(s), 35 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表