●在AutoCAD初始化界面的下拉菜单区插手“图形库”菜单条，此菜单条包括“机器图库”和“电子图库”两个菜单项;

　　●对话框：

　　图形打点是CAD应用的一个重要内容，是CAD应用中较为繁琐、较为坚苦的部门之一。差异的用户可以有差异的图形打点方案，本文提出的方案完全基于AutoCAD的开放系统布局提供的Autolisp说话和DCL说话，旨在操作AutoCAD提供的上述两种表明性说话，以使AutoCAD用户能利便地应用。

　　can_button:cancel_button{

　　2、方案论证

　　(end_image)

　　} }

　　label=" ";

　　$I=ACAD.*

　　key="accept";

　　:column{

　　ID-ELE[电子图库]$I=ACAD.ELE +

　　●在AutoCAD主菜单acad.mnu中插手本身的图标菜单区

　　四、 开拓步调

　　)

　　在菜单文件acad.mnu中的***POP10(下拉菜单第十区)前插手如下内容(同时将***POP10改为***POP11)： ***POP10 [图形库]

　　该方案的要害在于图标菜单和对话框。

　　mach001:dialog{

　　●486以上微机

　　AutoCAD R12以上版本提供了一种对话框说话(Dialog-box Control Language，缩写为DCL)，应承用户计划并实现本身的对话框。因此， 可以行使对话框说话编程来对图标菜单中图形举办放大并提供图标菜单中不能提供的笔墨信息。

　　***IMAGE

　　●天生全部图形的幻灯片文件;

　　(action_tile "accept" "(draw001)")

　　很多AutoCAD用户在图形库的建设和打点方面都行使一种较为轻盈的要领：将图形文件定名为能浮现其图形内容的名称，然后将其分类存入特定的文件夹。这种要领的利益在于轻盈快捷，但其不利便、不直观的弱点却更为突出。

　　3、编写对话框文件(*.dcl)

　　针对上述的轻盈要领，本文提出的方案利便、直观且内置于AutoCAD中。该方案如下：

　　label="确定";

　　●点击对话框简直定按钮即可打开拾取的图形文件。

　　(slide_image 0 0 x y "mach(mach001)")

　　AutoCAD软件具有相等优越的开放型布局(Open architecture)和一个强盛的内部编程说话(Autolisp说话，可以完成一些计较机事变和作图成果)，可以利便地让用户随意地开拓本身的呼吁、尺度库文件和各类应用措施等。

　　5、体例图标菜单

　　$I=ACAD.*

　　●将图标菜单的加载放到AutoCAD下拉菜单区

　　:text{

　　}

　　(setq x (dimx_tile "img")

　　对话框首要是显现示一个图文并茂的图形库中的图形，在对话框中不只要有图形预览，还要有该图形的一些笔墨声名。假设图形库中的mach001.dwg是一个绘制轴承的图形文件：图号为mach-001，则可体譬喻下对话框文件(文件名为mach001.dcl)：

　　●点击“机器图库”和“电子图库”两个菜单区弹出响应的图标菜单，在图标菜单中可以看到图形文件标识名和响应的图形(幻灯片);

　　三、 开拓情形

　　mach030.sld

　　}

　　key="img";

　　◆幻灯片库的成立

　　图形打点是CAD应用的一个重要内容，是CAD应用中较为繁琐、较为坚苦的部门之一。用户在现实应用中老是为图形太多无法打点大伤思维。本文提供了一个图形库建设和打点的要领，其最终结果是显现示一个利便快捷、图文并茂的直观的图形库。

　　4、体例对话框节制措施(*.lsp)

　　(fill_image 0 0 x y 0)

　　六、 竣事语

　　:text{

　　height=20;

　　五、 应用结果

　　1、成立图形库文件夹

　　:row{

　　[mach(mach002,mach002)]^C^C(load "mach002");(mach002);

　　AutoCAD主菜单acad.mnu中的“***IMAGE”暗示图标菜单区，对应幻灯片库中的幻灯片、对话框和对话框的节制措施，在图标菜单区插手以下内容(本文给出的是机器图库的图标菜单，电子图库的图标菜单与此相同)：

　　label="机器图库—mach001";

　　y (dimy_tile "img"))

　　(setq dcl_id (load_dialog "mach001.dcl"))

　　fixed_width=true;

　　(start_image "img")

　　mach002.sld

　　2、建造幻灯片库(*.SLB)

　　}

　　dcl_settings:default_dcl_settings{audit_level=0;}

　　本文通过修改AutoCAD主菜单acad.mnu来实现，其操纵步调如下：

　　accept_button;

　　◆建造幻灯片文件(*.SLD)

　　(if (not (new_dialog "mach001" dcl_id))

　　(unload_dialog dcl_id)

　　label="打消";

　　}

　　label="";