在AutoCAD中自动生成明细表.doc

[标签:标题]在利用计算机进行机械绘图的领域里,AutoCAD是国内公认的功能强大的绘图软件。但其在文字、表格处理上却显得很薄弱,尤其是在制作表格上,甚至没有提供此项功能。而人工绘制表格和文字输入不但花费的时间长,而且严重地影响了绘图速度。因此,如何自动而有效地生成明细表便显得很有意义。本文通过实例介绍如何在AutoCAD系统下自动生明细表的方法。首先,把明细表的数据信息,,作为明细表数据文件。然后用AutoLisp的READ-LINE函数提取有关数据信息,并把该数据信息赋给表格图块属性。通常,一个明细表是由表头和表体两部分组成。表头是固定的,因此可以用AutoCAD命令生成一个固定的表头,并把它作为一个图块存入磁盘。表头实际上是一个图形文件,,然后用AutoCAD命令建立一个如图3所示的图块,,图3中M1~M8均为属性名。当用户向表中插入该块时,系统会向用户询问属性值,此时用AutoLisp程序将上面建立的明细表数据文件中的数据分别赋给各个属性。属性的定义是用AutoCAD命令ATTDEF完成的。首先,用AutoLisp的I/O函数READ-,再用字符串连接函数STRCAT给文件的每一行加上括号,此时数据类型为字符串(STR)。然后,再利用READ函数把字符串转换成一个表(LIST),以方便AutoLisp对表中的每一项进行各种操作。最后,MAND函数调用INSERT命令,,,。(defunC:mxb(/scmdepf1bkam1m2m3m4m5m6m7m8p1)●在AutoCAD环境下,,再执行(LOAD“MXB”),。●\ACAD\SUPPORT子目录下,再在\ACAD\SUPPORT\:●\ACAD\SUPPORT子目录下,再在\ACAD\SUPPORT\: