你好
我知道这听起来像有线电视，但我昨天运行的脚本今天无法运行
例如，此脚本
- (Defun c:demo ()
- (vl-load-com)
- (if (and (setq pline (car (entsel "\nSelect Polyline:")))
- (eq (cdr (assoc 0 (entget pline))) "LWPOLYLINE")
- (setq int (getdist "\nEnter Interval:"))
- (setq in int)
- )
- (while (Setq pt (vlax-curve-getPointAtDist pline int))
- (setq ppt (vlax-curve-getparamatpoint pline pt))
- (vlax-invoke
- (vlax-ename->vla-object pline)
- 'AddVertex
- (1+ (fix ppt))
- (list (car pt) (Cadr pt))
- )
- (setq int (+ int in))
- )
- )
- )
今天喊：
; 错误：没有函数定义：VLAX-CURVE-GETPOINTATDIST
可能是我发现的线索，当我重新启动autocad并尝试再次加载该代码时，我收到警告：
分配给受保护符号acNative。输入中断循环？
如果我说是，它不会识别vlax，但如果我说N，它会工作。
这有什么意义吗？ | 
置顶卡
