如果标记的字段,即面积线发生变化时,可以通过更新(regen)直接反映到面积标记中。用写字板打开文件lsp下面给大家介绍几种方法,方法一:工具插件添加到启动组cad可以通过appload(ap)命令加载,在弹出的“加载\卸载应用程序”对话框中可以找到启动组。
代码如下(defunc:tes(/enthxthtxt 1 imjpmjptsmj)(if(and(entsel,请选择封闭曲线))(setqent(carent))(vlaxcurveisclosedent)(setqsmj(vlaxcurvegetarea))。imjsmj)(setqsmj(strcat(RTOS(/smj)22)m2))(progn(if(noth txt)(setqhtxt(/(sqrtsmj)15)))(init get 6)(if(setqhtxthtxt 1(get dist(strcat)请输入字体高度。(if(set qpt(getpoint text marking position))(ent make(list (0 . text)(consosmj)(conso opt)(conso 40h txt)(72.4)(conso opt))))(set)选择闭合曲线得到面积。
2、CAD面积求算 lsp 插件怎么修改小数位数“修改小数位”,一般修改当前格式和图形单位中的精度。如果标记的字段,即面积线发生变化时,可以通过更新(regen)直接反映到面积标记中,用写字板打开文件lsp]"在lisp中,其。