[求助]如何判斷POLYLINE是順時針還是逆時針走的？

lilq_78

[求助]如何判斷POLYLINE是順時針還是逆時針走的？

highflybir

1、如果多段线只有两个点呢？ --根本无法判断顺逆。

2、如果在三个点以上，只需要判断1、2点的矢量和2、3点的矢量的叉积即可。（可能有退化情况）

3、再说这样的判断是无意义的，因为多段线可能在中途转向。

如果你的需要不是这样的，下面已经有讨论：

http://www.mjtd.com/Functions/ArticleShow.asp?ArticleID=1090

lilq_78

非常感謝！

tchen

计算几何的算法 在www.gameres.com里搜索有

tcsl9621

只有封闭的多义线才有意义。可将多义线变成多折线（将其中的圆弧部分用多条直线拟合）后再判断。

alin

(defun C:test(/ ss fd ang offsetObj plineObj)
  (if (setq ss (ssget ":s" '((0 . "*POLYLINE"))))
   (progn
    (setq plineObj (vlax-ename->vla-object (ssname ss 0)))
    (setq fd (vlax-curve-getFirstDeriv plineObj 0.5))
    (setq ang (atan (/ (cadr fd) (car fd))))
    (setq offsetplineObj (car (vlax-safearray->list
      (vlax-variant-value
        (vla-offset plineObj 0.0001)))))
    (if (> (vla-get-length plineobj) (vla-get-length offsetplineobj))
       (princ "\n顺时针.")
       (princ "\n反时针.")
    )
    (vla-delete offsetplineObj)
   );progn
   (princ "\nNo object selected or object selected is not a polyline.")
 );end_if
 (princ)
)

前生

楼上的运用巧妙