Столкнулся с такой проблемой. Функция grvecs в AC2007 работает, в AC2022 и AC2024 не работает.
(defun c:66 (/)
(setq cont 1
wr 100
hr 50
)
(while (= cont 1)
(redraw)
(setq x (grread t))
(if (= (car x) 5)
(progn (setq xt (car (cadr x))
yt (cadr (cadr x))
p1 (list xt yt)
p2 (list xt (+ yt hr))
p3 (list (+ xt wr) (+ yt hr))
p4 (list (+ xt wr) yt)
)
(grvecs (list 256 p1 p2 p2 p3 p3 p4 p4 p1))
)
(setq cont 0)
)
)
(redraw)
(princ)
(vl-cmdf "_.rectangle" p1 p3)
(princ)
)
То есть на курсоре висит прямоугольник размером 100х50, который перемещается с курсором. После указания точки, строится прямоугольник. Так вот, в версии автокада 2007 этот прямоугольник на курсоре отображается. В версиях 2022 и 2024 прямоугольника не видно, но он вставляется в чертеж в указанной точке. В чем может быть проблема?
