这是怎么回事？简单代码...

boatying

(defun c:c1()
  (command "pline" (list 0 0) (list 100 0) (list 100 100) (list 0 100) "c")
  (command "pline" (list 20 20) (list 120 20) (list 120 120) (list 20 120)  "c")
  )

结果画出两个大小一样，重叠在一起的四边型，这是怎么回事？

liujing

陈伯雄

注意：
AutoCAD中，OSnap命令的优先级实际上高于程序中的描述。因此，如果当前的OSnap命令中已经预置了某些几何抽点功能，将会在程序中绘图点位之上，自动按照这些抽点功能进行实际绘图点重新的确定，极有可能造成程序所描述的绘图点位不能正确实现的古怪现象。但是，如果程序描述的控制点在当前图形区窗口之外，就不会受到Osnap的任何影响。


例如：
(Command "pline"
'(0 0) '(100 0) '(100 100) '(10 0) '(100 10)
""
)

正确的图样如图4-5-1左边，但是如果当前Osnap设置为“端点”而且有效，结果就成了图44-5-1右边的样子，这显然是错的。
图4-5-1 Osnap的干涉和出错实例

虽然对于目标选择的”W”框、”C”框，自AutoCAD R14开始，Autodesk就知道不要自作主张地加上几何抽点当前设置，但是，直到AutoCAD 2002，还没有认识到，在程序点位描述的执行中，更不应当自作主张地用当前的几何抽点功能介入。这是一个很有历史的问题了。很明显，如果程序作者确实想使用几何抽点，就会使用 (OSnap) 函数，否则AutoCAD没有必要自作主张地添加。我们的正确的做法有两种，(Command)函数运行之前：
1〉设置系统变量OSnapCoord的值为1，屏蔽掉当前的几何抽点方式设置
2〉设置系统变量OSMode的值为0，清除当前几何抽点的所有预置值

由于这两个系统变量都存放在系统注册表中，将影响其它程序，因此要在程序最后的描述中，要将这些系统变量的原值恢复。

以上摘自《Visual LISP程序设计——技巧预范例》“4.5.3  在程序中引用AutoCAD命令时的注意事项”

hothua

秋枫