如何在LISP中获取物体的位置

manjiaju · 发表于 2004-3-16 16:45:00

在设计窗口中拖动一个物体，获取物体位置的LISP代码如何写哦

meflying · 发表于 2004-3-16 19:59:00

物体的位置？用什么表示它的位置？

manjiaju · 发表于 2004-3-16 20:09:00

比如说，先插入一个块图形，然后再拖动到某个位置后，怎么定位这个图块

meflying · 发表于 2004-3-16 20:18:00

MOVE命令，移到你需要的位置上就可以了，，，位置坐标可以由命令行输入，也可以用鼠标点取。。。

manjiaju · 发表于 2004-3-16 20:36:00

如果这样也不用问了．设计人员拖动块图形后，ＬＩＳＰ程序怎么知道新的位置？不好意思，我是个菜鸟，刚学的

yxp · 发表于 2004-3-16 20:39:00

楼主的意思可能是...可惜我不会编写。
而楼上只是将块在瞬间移到指定位置，没有过程的实时显示。
可能要用到grread函数和grdraw函数。

meflying · 发表于 2004-3-16 20:43:00

要说清楚一点，这个是指一个块的插入点，而不是物体的位置，一个对象是有大小的，说它的位置必须要指定对象某点在什么位置，
(cdr (assoc 10 (entget (car (entsel "选择块...")))))

yxp · 发表于 2004-3-16 20:54:00

那么在lisp中能实现象move命令一样的实时移动吗？
在坐标标注lisp的程序中，我见过这种功能，标注的坐标数据和直线随着鼠标的移动而移动，可以定位在鼠标单点的任何位置。
可惜看不懂，太长了。

manjiaju · 发表于 2004-3-16 21:08:00

谢谢各位大峡
还有一个问题,获得图形各种几何信息的函数是什么?

meflying · 发表于 2004-3-16 21:12:00

没有这样一个函数，但有个命令：list
如果要在LISP中获得一些几何信息，只有通过其组码经过计算获得，各组码的意义参考帮助文件中的DXF参考
组码列表使用ENTGET获得