B、 我会定期检查图纸是否有空文本。
这本身不是一个标准,而是一个实用的建议空文本是一个空字符串,或者只包含“白色”字符(制表符、空格等)。它可以存在于图形中,因为一些运算符通过在编辑器中打开并靠在空格栏上来“删除”文本。虽然这听起来是假的,但多年来我一直看到这种情况发生,它从未停止让我感到惊讶/烦恼,极端情况下超过70000个空文本实体!我真希望我是在开玩笑!症状是加载给定内容缓慢,缩放扩展没有意义等。
快速测试:打开QTEXT,然后执行缩放扩展;每个空间或布局选项卡。到处都是奇怪的小盒子")(-4 . "")(-4 . "and>"))))
(progn
(command"_erase"TXT"")
(princ(strcat"\n"(itoa(sslength TXT))" nul text strings deleted. "))
)
(princ"\nNo nul text strings found. "))
(setq BLK(tblnext"BLOCK"T)NAMES nil)
(while BLK
(if(=(cdr(assoc 0(entget(cdr(assoc -2 BLK)))))"ENDBLK")
(progn
(if(setq NB(ssget "X" (list(assoc 2 BLK))))
(command"_erase"NB"")
)
(setq NAMES(cons(cdr(assoc 2 BLK))NAMES))
)
)
(setq BLK(tblnext"BLOCK"))
)
(if NAMES
(progn(textscr)
(princ"\nNul blocks found and need purging: ")
(foreach X NAMES(princ"\n ")(princ X))
)
(princ"\nNo nul blocks found. ")
)
(princ)
)
(c:DelNul)
我使用的一个效果很好的方法,
打开所有图层并确保所有图层都解冻。
缩放至范围
全部擦除,但在完成拭除命令之前,请移除并选择覆盖图形整个区域的窗口。
这将删除所有空文本条目。
页:
[1]