CAD系统的二次开发技术精要.ppt

第7章 CAD系统的二次开发技术 第7章 CAD系统的二次开发技术 CAD系统的二次开发技术精要 内容 1 二次开发概述 2 AutoCAD软件开发技术概述 3 Visual LISP 4 VBA 1 二次开发概述 1.1 二次开发的定义、意义及特点 1.2 机械CAD软件的二次开发 1. 二次开发的内容 （1）交互式系统的完善 （2）交互式系统、数据库管理系统、有限元分析系统间的连接和相互调用 （3）参数化设计模块的设计 （4）界面设计。主要包括菜单的设计、对话框设计等 （5）国家标准数据库的建立 （6）工程符号和汉字的处理 二次开发的基本思路： 以交互式图形系统为主要支撑， 以图形系统的用户语言为进程的控制者， 以高级语言为系统连接及数据库转换的枢纽， 开发一个集参数化设计零件、交互式编辑图形、数据的系统管理、零件的有限元分析为一体的机械CAD软件系统。  2. 开发软件应具备的功能 （1）交互图形处理功能 （2）设计计算功能 （3）参数化绘图功能 （4）校核功能 （5）有限元分析功能 （6）数据库管理功能  3. 开发要求 （1）结果正确 （2）操作方便 （3）友好的人机交互界面 7.2 AutoCAD软件开发技术概述 AutoCAD软件二次开发工具： AutoLISP编程语言：嵌入在AutoCAD内部的LISP子集 ADS：C语言编写的开发环境 Visual LISP：为增强AutoLISP程序开发能力而设计 Object ARX：面向对象的应用程序开发环境，C++ Active Automation：一套标准，允许通过外显的对象由一个Windows应用程序控制另一个Windows应用程序 VBA:Visual Basic for Application 7.3 Visual LISP 2. Visual LISP 内嵌在AutoCAD内 为增强AutoLISP程序开发能力，加速AutoLISP程序开发而设计的 通过集成开发环境IDE（Integrated Development Environment）进行编写、修改程序、调试和运行。 7.3.2 Visual LISP的启动 （1）启动AutoCAD （2） 【工具】→【AutoLISP】→【Visual LISP 编辑器】 或在命令提示区输入命令VLISP或VLIDE 7.3.3 Visual LISP的显示界面 7.3.4 AutoLISP语言的常用函数 1 赋值函数 设定变量的函数为(setq)，语句为： (setq 变量名 表达式)，将表达式的值赋给变量。 例：(setq a 5.0) ，结果a=5.0 2 数值计算函数 (1) (+ num1 num2 …) 返回所有数的总和 例：(+ 1 2 3 4.5) 返回10.5 (2) (- num1 num2 …)返回第一个数减去后面所有数的差。 例：(- 50 40.0 2)返回8.0 (3) (* num1 num2 …)返回所有数的乘积。 例(* 1 2 3)返回6 (4) (/ num1 num2 …)返回第一个数除以后面所有数的商。 例：(/ 100 20.0 2)返回2.5 7.3.4 AutoLISP语言的常用函数 2 数值计算函数 (5)求另一点坐标 (Polar P1 ang d)。已知P1点，求与P1点距离为d、角度为ang的另一点P2的坐标 例 (Polar ‘(1.0 1.0) 0.785 1.414) 得(2.0 2.0) 7.3.4 AutoLISP语言的常用函数 3 交互性数据输入函数 （1） 坐标点输入函数：(getpoint [提示]) 例 (setq p0 (getpoint “enter a point:”)) 等待输入点的坐标值，把输入的点的坐标赋给p0 （2） 距离输入函数：(getdist [基点] [提示]) 例 (setq dist (getdist “How far”)) 把输入的距离值赋给dist变量 7.3.4 AutoLISP语言的常用函数 4 存取AutoCAD系统变量值函数 （1）设置系统变量值函数 ： 格式：(setvar varname value) 把值value赋给系统变量varname。 例(setvar “dimtxt” 5)，结果dimtxt=5。 （2）获取系统变量值函数 ： 格式：(getvar varname) 返回系统变量varname的值