垫片对话框设计论文

垫片对话框设计论文

ID:45576178

大小:124.65 KB

页数:5页

时间:2019-11-15

垫片对话框设计论文_第1页
垫片对话框设计论文_第2页
垫片对话框设计论文_第3页
垫片对话框设计论文_第4页
垫片对话框设计论文_第5页
资源描述:

《垫片对话框设计论文》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、垫片的参数化绘图摘要:利用AUTOCAD自带的二次开发丁具AUTOLISP工具,我们可以自己编程来实现零件的参数化绘图,本文主要介绍如何对垫片进行参数化绘图,并进行了对话框的设计,即用户可以通过菜单、对话框,通过此程序可以使用户更方便,更快捷的在AUTOCAD界面中绘制垫片。关键字:参数化对话框WasherofparameterdrawAbstract:UsingAUTOCADthebringingre-developmenttoolAUTOLISPtool,wemayownprogramreaIizethecomponentsparametriz

2、ationcartography.thisarticIemainlyintroducedhowcarriesontheparametrizationcartographytothewasher,andhascarriedonthedialogboxdesign,nameIytheusermaythroughthemenu,thedialogboxTmaycausetheuserthroughthisproceduretobemoreconvenient,quickerdrawsupthewasherintheAUTOCADcontactsurfac

3、e.Keyword:parametrizationsurfaceofman-machineinteraction一、AUTOLISPI具♦AutoLISP是一种针对扩充及自订AutoCAD函数机能而产生,以LTSP为基础的程序设计语言.LTSP本身于50年代末期出现是一种擅于处理串行文字(ListofProcessing),属第四代「人工智能(ArtificialIntelligence)J的计算机语言.>目的是令使用者充份利用AutoCAD进行开发,直接増加及修改AutoCAD指令.>AutoLisp语言建基于普通的l」SP语言上,并扩充了许多适

4、用于CAD的特殊功能而形成.>是一种能以直译方式(不须先行编译)亦可于AutoCAD内部执行的直译性程序语言>程序容易学习及撰写,程序即使出错亦不会对操作系统(如DOS,WINDOWS)有不良影响.>数据及程序均统一以串行(List)结构表示.>可直接调用几乎全部的AutoCAD命令.>既具备一般高级语言的基本结构和功能,亦有一般高级语言没有的强人图形处理能力.>内建TAutoCAD应用程序,不须另行购买;亦不须使用特定的编辑器或开发环境.>可配合AutoCAD提供的PDB,建立DCL(DialogControlLanguage)文件创建对话框.A

5、UTOLISP编辑器界面如2VisualLISP为AutoCAD(Dcavinc1.dvr>[X舍名i>](T)©BMA;car•M丄vl

6、<>1L00001C00001]■

7、Dravinc1.dvKJAT口CJ厂厂;

8、对食翊"35(«!-££画如ucuaooi4补zg・住冷竹话••C37•记□祜«>erci»CD?《尸2109□>X(图1)二、垫片参数化绘图以及对话框的程序为了能够实现利用菜单绘图并实现隐藏对话框进行交互式操作

9、,所以我们需要三个文件,后缀名分别为(.mnu.mnl.del)。下面分别说一下其功能:1.(nrnu文件)为菜单文件在加载时用,以下是本文所使用的菜单文件,文件名为(zjj.mnu)***menugroup=userzjj***pop401[参数化绘图][■■][designbyzhangjunjun][■■]HT01[垫片零件]AcAcdraw[THT03[使用帮助]AcAchelp[■■](mnl文件)为垫片绘图程序,以及对话框程序存放的文件,它的文件名与(mnu文件)的文件名必须一至,当(mnu文件)加载时,(mnl文件)将白动加载。以下是

10、(mnl文件),文件名为(zjj.mnl)(DEFUNc:draw()(setqDCL_ID(load_dialog”e:\zjj.dcT'))(NEW.dialog”DRAW”DCL_ID)(Action_tilenaccept"n(draw2)(done_dialog)u);(START_DIALOG)(UNLOAD_DIALOGDCLJD)(command"circle"pOdl)(command"circle"pOd2))(defiindraw2()(setqpO(list300300))(setqdl(abs(atof(get_tile

11、"DRAW_dl”))))(setqd2(abs(atof(get_tile"DRAW_d2")))))1.(del文件)

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。