永不言弃 发表于 2015-9-25 18:17:14

单击选择多边形输出面积

本帖最后由 永不言弃 于 2015-9-25 18:21 编辑

不用输入命令，想通过选择多边形，直接在下面输出面积，可以实现吗，谢谢
(print (strcat(rtos(/(vla-get-area(vlax-ename->vla-object (car(entsel)))) 666.66)2 3) "亩"))

xyp1964 发表于 2015-9-25 21:37:45

本帖最后由 xyp1964 于 2019-4-29 23:21 编辑

用命令多简单

(defun c:mj ()
(princ (strcat (rtos (* (vla-get-area (vlax-ename->vla-object (car (entsel "\n选择边界: ")))) 1.5e-9)2 3)"亩"))
(princ)
)

lyqiezi 发表于 2015-9-25 18:48:16

还不如鼠标移动到上面就显示面积
选择了就马上执行命令的话，其它命令还怎么用啊

429014673 发表于 2015-9-25 18:54:23

单位没转换过来

429014673 发表于 2015-9-25 18:55:23

单位没转换过来

永不言弃 发表于 2015-9-25 18:56:39

lyqiezi 发表于 2015-9-25 18:48 static/image/common/back.gif
还不如鼠标移动到上面就显示面积
选择了就马上执行命令的话，其它命令还怎么用啊

加一个反应器，选择JZD所在图层的PL线

永不言弃 发表于 2015-9-25 18:57:42

永不言弃 发表于 2015-9-25 18:56 static/image/common/back.gif
加一个反应器，选择JZD所在图层的PL线

鼠标移动到上面显示面积又要怎么做呢，谢谢

lyqiezi 发表于 2015-9-25 20:22:32

刚发现，其实可以用宏，双击多线段就可以实现你的要求了
步骤：自定义-》界面-》双击动作-》多线段-》点里面的编辑多线段，在右边“宏”里面，改成^C^C_area;o;l;
就可以双击多线段出面积和周长了
悬停的我只是看别人有这个效果，自己还不会

永不言弃 发表于 2015-9-25 21:00:24

lyqiezi 发表于 2015-9-25 20:22 static/image/common/back.gif
刚发现，其实可以用宏，双击多线段就可以实现你的要求了
步骤：自定义-》界面-》双击动作-》多线段- ...

不会宏啊，希望各位大神帮帮忙

永不言弃 发表于 2015-9-25 22:18:54

xyp1964 发表于 2015-9-25 21:37 static/image/common/back.gif
同命令多简单

院长，我想做一个对话框，选择权属线的时候，对话框里面 的内容会变，不用输入命令

页: [1] 2
查看完整版本: 单击选择多边形输出面积