一、前言 9
M$;I~?v
autocad软件具有相当优秀的开放型结构（open architecture）和一个强大的内部编程语言（autolisp语言，可以完成一些计算机工作和作图功能），可以方便地让用户随意地开发自己的命令、标准库文件和各种应用程序等。 2_�`NQy#~
图形管理是cad应用的一个重要内容，是cad应用中较为繁琐、较为困难的部分之一。用户在实际应用中总是为图形太多无法管理大伤脑筋。本文提供了一个图形库创建和管理的方法，其最终效果是展示一个方便快捷、图文并茂的直观的图形库。 /h5_A4k m6q
二、 方案设计 qyP ?|26PI
1、实现方案 ` JZJ7rD
许多autocad用户在图形库的创建和管理方面都使用一种较为简便的方法：将图形文件命名为能体现其图形内容的名称，然后将其分类存入特定的文件夹。这种方法的优点在于简便快捷，但其不方便、不直观的缺点却更为突出。 o=p hat[^W
针对上述的简便方法，本文提出的方案方便、直观且内置于autocad中。该方案如下： =N-XI8YHA[
●生成所有图形的幻灯片文件； vu77'^(3
●在autocad初始化界面的下拉菜单区加入“图形库”菜单条，此菜单条包含“机械图库”和“电子图库”两个菜单项； .^%]i?4$o
●点击“机械图库”和“电子图库”两个菜单区弹出相应的图标菜单，在图标菜单中可以看到图形文件标识名和相应的图形（幻灯片）； q z]uD 2@
●在图标菜单中拾取图形弹出一幅对话框，该对话框给出图形的一些文字信息（如：作者， 图形内容， 绘图日期，图号等）和图形的预览； 8 R}NKqjw@
●点击对话框的确定按钮即可打开拾取的图形文件。
GnS. %=as
2、方案论证 ("C 1a
该方案的关键在于图标菜单和对话框。 %P|q!v�&b
●图标菜单： 9H7
;WhgV
图标菜单是autocad菜单的一种。图标菜单以20个为一组显示幻灯片，并同时显示一个包含有幻灯片名或其他文字的滚动列表框。图标菜单的长度不受限制，如果一个图标菜单包含的幻灯片多于20个autocad会提供换页按钮，以便让用户换页显示更多的幻灯片。因此，可以利用autocad的开放型体系结构上的二次开发定制图标菜单来对图形库进行管理。 yw=.*yxH
图标菜单也有不足之处。图标菜单的一个页面需显示20幅幻灯片，所以只能从中获得比较概略的图形信息（尤其是复杂图形）。所以，需要采取一定的辅助措施来对使用图标菜单的缺陷进行弥补。 $!A _@.
●对话框： 7}{,/ZW e3
从用户观点来看，窗口操作环境是目前最先进最流行的一种人机交互界面。它能控制光栅扫描型显示器和以鼠标器为代表的输入设备，向用户提供了图文并茂的可视化环境，是操作更为直观、自然、简便和快速。 yUfa3MD([�
autocad r12以上版本提供了一种对话框语言（dialog-box control language，缩写为dcl），允许用户设计并实现自己的对话框。因此， 可以使用对话框语言编程来对图标菜单中图形进行放大并提供图标菜单中不能提供的文字信息。 Hdni9m; |?
三、 开发环境 �N/(P)Y3
●486以上微机 !:?ZHv( pW
●win95或win98操作系统 pHYS)ub
●autocad r12以上版本（本文提供方案在r12、r13、r14中都能实现，但本文提供的开发步骤主要是在r14中实现） p`QApD=
四、 开发步骤 mh=V; S&3
1、建立图形库文件夹 "S|n'$,
在autocad目录下创建文件夹storeroom，将需要进入图形库进行管理的图形文件存入该文件夹。 /
'9b**^
2、制作幻灯片库（*.slb) \`8i@V?
◆制作幻灯片文件（*.sld） 07s"g:zs
在当前视窗中打开图形文件，并将图形移到屏幕中央。然后在命令行键入mslide命令并在“creat slide file”框中键入幻灯片名（按下〈return〉键则将当前图形名作缺省幻灯片名接受）。为了创建幻灯片库，将所有幻灯片文件保存到autocad目录下的support子目录中。 ,C= O|BAj
◆创建幻灯片列表文件（*.txt） P@S(5`~~I
假设有mach001.dwg～mach030.dwg共30个图形文件和对应的mach001.sld～mach030.sld共30个幻灯片文件,编辑如下文件（文件名为mach.txt）： (AQ/"vgf+
mach001.sld rS% &f}oI(^
mach002.sld xKj\Nvym&l
mach003.sld [~ a .wK
mach030.sld Nm%z ^*x
◆幻灯片库的建立 *gyNnD[$
使用autocad的support目录中的实用程序slidelib，将幻灯片文件按照文件列表构造成幻灯片库mach.slb： slidelib mach<> 7q+_P1jFP/
3、编写对话框文件（*.dcl） j?]NSAsP
对话框主要是展示一个图文并茂的图形库中的图形，在对话框中不仅要有图形预览，还要有该图形的一些文字说明。假设图形库中的mach001.dwg是一个绘制轴承的图形文件：图号为mach-001，则可编制如下对话框文件（文件名为mach001.dcl）： , jq$KN7 %
dcl_settings:default_dcl_settings{audit_level=0;} jeCtW@h~jp
accept_button:ok_button{ h4WJdh3\
label="确定"; f~HS)Yg?
key="accept"; , QsTp~$R
} !=`pH?F U
can_button:cancel_button{ 2eaENl_3e#d
label="取消"; FjzJrg 0f:7
key="cancel"; I?NL }+
} 0`cvcFWKr
mach001:dialog{ D^F(~iEP
label="机械图库—mach001"; g5l\bL^Ft
:row{ O* eW&j9Hc
:column{ l5#UHo-3ZV
:text{ E+UW '&6#
label="图 号：mach-001"; wM-_h(5 JJ
key="num"; ` R
s os
width=20; / }H=
fixed_width=true; )B! _i~HE
} RU-z+zH-
…… )2Q:Bxi%
:image{ @_y Ow,Ac
key="img"; F $=qu9X.
width=40; .`NZU`A6E$
height=20; _=,#dI\3vg
} Ge;g-oZe=b
} %nn;ENV X$
spacer_1; Kk$&3
P
q/o
:row{ :STB#(+
:text{ ~?} )1
label=" "; zUy v D)
} =nm35is]"&
accept_button; b\;F^" ,L
can_button; :text{ iB ZiyL
label=""; :#Aw`\6V$}
} } ^4yoxs7g
} eG_2_~eChS=
4、编制对话框控制程序（*.lsp） XroQw l5+
下面给出对话框文件mach001.dcl的控制程序mach001.lsp： Q�"Sw1 D
(defun mach001() X .RiVU~'w
(setq dcl_id (load_dialog "mach001.dcl")) j3xo
^;,Y
(if (not (new_dialog "mach001" dcl_id)) %?LP 4)F$
(exit)) EW?(d@pM
(action_tile "accept" "(draw001)") W27{{
(action_tile "cancel" "(done_dialog)") @YO&E,L_
(setq x (dimx_tile "img") * #+{?m
y (dimy_tile "img")) *yu[SBk& qx
(start_image "img") T&R]&I?=Am
(fill_image 0 0 x y 0) 'yGQ7+4d +
(slide_image 0 0 x y "mach(mach001)") boM]zmZ8Z
(end_image) ; Yykz9t.9
(start_dialog) iu1`D{
(unload_dialog dcl_id) h`"9Yd86A'
) (=]hh=xunL
(defun draw001()command "open""mach001") =F
dV-] F
5、编制图标菜单 j&P, iywKc
本文通过修改autocad主菜单acad.mnu来实现，其操作步骤如下： /%nim!|ZhaB
●在autocad主菜单acad.mnu中加入自己的图标菜单区 -KvClX.j=
autocad主菜单acad.mnu中的“***image”表示图标菜单区，对应幻灯片库中的幻灯片、对话框和对话框的控制程序，在图标菜单区加入以下内容（本文给出的是机械图库的图标菜单，电子图库的图标菜单与此类似）： l@32=eNCQ
***image z; j8QMXpS
**mach !h5@D[h%:-y
[电子图库] {?3UBw);Ip
[mach(mach001,mach001)]^c^c(load "mach001");(mach001); DDEWN?EZy{
[mach(mach002,mach002)]^c^c(load "mach002");(mach002); sMQI"Qw
D30
/`A9M
[mach(mach030,mach030)]^c^c(load "mach030");(mach030); bR6Ec=F= ?
●将图标菜单的加载放到autocad下拉菜单区 CiN7kXl8w&O
在菜单文件acad.mnu中的***pop10（下拉菜单第十区）前加入如下内容（同时将***pop10改为***pop11）： ***pop10 [图形库] G?YJwGF
id-ele[电子图库]$i=acad.ele + #}e*]SwPr
$i=acad.* {G8$|zp~
id-mach[机械图库]$i=acad.mach + $H#qCbp;o
$i=acad.* +(qQ 1hWfY}
●将修改后的菜单文件用autocad中的menu命令编译成acad.mns即可。 `A{*?q�}C
五、 应用效果 =S(G%'2
进入autocad操作界面后，会发现在下拉菜单区出现了“图形库”菜单项。点击下拉菜单“图形库”菜单项，弹出相应的下拉菜单项，包括“机械图库”和“电子图库”。选择“机械图库”或“电子图库”菜单项（本文使用的是“机械图库”菜单项），弹出图1所示图标菜单。通过鼠标双击图标菜单左边的列表框中的列表项或右边的图标则可弹出图2所示的对话框，该对话框给出了一些与图形有关的信息。也可以先用鼠标拾取一个列表项或图标，再点击“ok”按钮弹出对话框。对话框给出了放大的幻灯片和该幻灯片的信息。点击“确定”按钮则打开图形文件。点击“取消”按钮则不打开图形文件并关闭对话框。 c*883k�bV
六、 结束语 CX\� iunF*
图形管理是cad应用的一个重要内容，是cad应用中较为繁琐、较为困难的部分之一。不同的用户可以有不同的图形管理方案，本文提出的方案完全基于autocad的开放体系结构提供的autolisp语言和dcl语言，旨在利用autocad提供的上述两种解释性语言，以使autocad用户能方便地应用。 c jmC^1d~
u7Qui 4v 
