[转贴]：为DWG文件“减肥”

seeker

为DWG文件“减肥”

由于工作需要，我们经常把大量的Auto－CAD绘制的DWG图形文件作为电子邮件的附件在互联网上传输，为经济快捷起见，笔者近来特意琢磨如何为DWG文件“减肥”，得到经验三条，在此介绍给大家。
方法一：用PURGE命令。
用PURGE命令把图形中没有使用过的块、图层、线型等全部删除，可以达到减小文件的目的。如果文件仅用于传送给对方看看或是永久性存档，在使用PURGE命令前还可以作如下工作：
一、把图形中插入的块炸开，使图形中根本不含有块；二，把线型相同的图层上的元素全部放置在一个图层上，减少图层数量。这样一来就能使更多的图块、图层成为没有使用的，从而可以被PURGE删除，更加精减文件尺寸。使用PURGE命令，用选项All（键入参数a）比较方便。示例如下：
Command: purge
Purge unused Blocks/Dimstyles/LAyers/LTypes/SHapes/STyles/Mlinestyles/All: aNames to purge <＊>:（直接回车）
Verify each name to be purged? （直接回车）
Purge block cz08? y
Purge block cz16? y
Purge layer CEN? y
Purge layer HAT? y
No unreferenced linetypes found.
No unreferenced text styles found.
No unreferenced shape files found.
Purge dimension style LEAD? y
No unreferenced mlinestyles found.
笔者还发现，连续多次使用PURGE命令，并且每次均用选项All，直至出现如下提示，就已经“减肥”到极点了。
Command: purge
Purge unused Blocks/Dimstyles/LAyers/LTypes/SHapes/STyles/Mlinestyles/All: a
Names to purge <＊>:（直接回车）
Verify each name to be purged? （直接回车）
No unreferenced blocks found.
No unreferenced layers found.
No unreferenced linetypes found.
No unreferenced text styles found.
No unreferenced shape files found.
No unreferenced dimension styles found.
No unreferenced mlinestyles found.

　方法二：程序解决：********(最好的方法）***********

程序一：炸开当前图中的所有图块

(defun T-EXPLODE( )
(setq S(ssget "X" (list (cons 0 "INSERT"))))
(setq P(sslength s))
(setq N 0 )
(setq p (- p 1))
(while (<= n p)
(setq nam(ssname s n))
(command "EXPLODE" nam "")
(setq n (+ n 1)))) 把以上程序加入文件acad.lsp中。

程序二：清除图中所有的图块

改造菜单，加命令…[清除图块]^C^Cscript PURGE

[炸开图块]^C^CT-EXPLODE

用文本编辑器编一命为PURGE.SCR的文件，把其存于\ACAD2000\SUPPORT\目录下，文

件的内容为:

purge b y y y y y y y y y y y
y y y y y y y y y y y y y y y
y y y y y y y y y y y y y y y
y y y y y y y y y y y y y y y


方法三：用WBLOCK命令。
把需要传送的图形用WBLOCK命令以块的方式产生新的图形文件，把新生成的图形文件作为传送或存档用。目前为止，这是笔者发现的最有效的“减肥”方法。现简明示例如下：
Command: wblock
（在弹出的对话框中输入文件名及文件存放位置，由于非常简单，故在此省略对话框图形）
Block name: （直接回车）
Insertion base point:（任选一点）
Select objects: （选择完毕后回车）
Command:
这样就在你指定的文件夹中生成了一个新的图形文件。
比较以上两种方法，各有长短：用PURGE命令操作简便，但“减肥”效果稍差；用WBLOCK命令最大优点就是“减肥”效果好，最大的缺点就是不能对新生成的图形进行修改（甚至不作任何修改）存盘，否则文件又变大了。笔者对自己的DWG文件用两种方法精简并对比效果发现，精简后的文件大小相差几乎在5K以内。读者可根据自己的情况确定使用何种方法。
在传送DWG文件前，应用WINZIP（笔者推荐）压缩，效果特好，几乎只有原来的40％左右！

amplly

还有就是用Autocad 2004格式存储文件会小很多！