需要一个脚本来删除 PaperSpace 中的特定块
遍历循环。市政当局要求我们将包含“用于施工”戳记的pdf存放到其专有的基于web的界面中。他们还要求我们上传我们的CAD文件和PDF的没有“建设”邮票到一个不同的基于网络的界面。
我们有一小组55张图纸..我已经在所有55张图纸上都贴了邮票。因此，我可以将文件集发布为PDF，并创建带有“For Construction”的初始PDF，但我不想单独打开55个文件来移除图章。仅供参考，块名用于施工。我利用脚本专业，所以我可以运行。scr文件，但我不知道如何写。scr文件，这样它将擦除一个名为“FORCONSTRUCTION”的特定块。
哦..供参考..每个图纸上的块不在同一个位置..我们有11x17、42x30和24x36的，还有一些非常奇怪的尺寸。
在所有的图纸中，图章都在PS中..我把它们放进去了..所以我知道。
我考虑过进行简单的块交换..让替换块仅在定义点上有线条，这样它就不会打印..但我知道市政府希望这个街区消失。
仅供参考，本市不允许外部参照..上传之前，图纸必须是100%独立的项目。破碎的外部参照是不允许的..(红旗是他们的系统)
**** Hidden Message ***** 假设它不在锁定层上，请在脚本中尝试：
(and (setq ss (ssget "X" '((0 . "INSERT") (2 . "FORCONSTRUCTION"))))
(setq lst (vl-remove-if 'listp (mapcar 'cadr (ssnamex ss))))
(mapcar (function (lambda (x) (entdel x))) lst)
)
它不会清除块，只是删除插入。
我相信这2个例程可以满足您的需求
http://www.lee-mac.com/odbxbase.html
http://www.lee-mac.com/deleteblocks.html
不客气。
我想我欠Jeff Mishler最初的解决方案。（大约10年前） 开心的时候时间过得很快。 高层也在考虑这一点，但有些人认为...如果cad技术人员已经在文件中...为什么他们不能只是放入图章...其次是为什么文档控制人员需要这样做...然后我们必须训练他们使用哪些图章...最终我相信pdf图章是一种选择，但我的直觉告诉我...如果管理层有什么要说的，我们将在cad中进行。
我不知道这个能不能正常工作...我加载了lisp，然后试图通过命令remstamp运行，我得到了
未知的命令“REMSTAMP”。按F1键获取帮助。
我错过了什么吗？？
如果我通过scr运行，我得到
；错误:参数太少 您必须提供块名称.这样：
页:
[1]