画圆弧后无法取得图元

ynhh

画圆弧后无法取得图元
因CAD自带的画圆弧，画的过程中能动态直观地看到圆弧效果
所以想用这方法画圆弧后，再取得圆弧上的三个点
但偿试后感觉这样还取不到图元，也不好再往下取得圆弧上的三个点了
不知我这想法是不是有问题
请知道的老师老点一下
谢谢

(defun C:QQ()
(command "ARC")
(setq en (entlast));返回图形中最后那个未删除的主对象（图元）名称
;(command "erase" en "");删除对象  
)

yshf

(defun C:QQ()
    (command "ARC" pause)
    (setq en (entlast));返回图形中最后那个未删除的主对象（图元）名称
    (princ "\n")
    (princ (entget en))
    ;(command "erase" en "");删除对象??
    (princ)
)

Andyhon

.
(command "ARC")
(while (= (logand (getvar "CmdActive") 1) 1) (vl-cmdf pause))
.

ynhh

yshf 发表于 2025-5-23 18:18
(defun C:QQ()
    (command "ARC" pause)
    (setq en (entlast));返回图形中最后那个未删除的主对象（ ...

谢谢老师，我是想取得图元，删除那个是测试用的
您这好象也没取出图元

ynhh

Andyhon 发表于 2025-5-23 19:36
.
(command "ARC")
(while (= (logand (getvar "CmdActive") 1) 1) (vl-cmdf pause))

谢谢老师指点
您这方法真能得到圆弧的图元
再请老师
这个  pause  字符好象不能改动
不知是何意思
谢谢您

guosheyang

(defun C:QQ(/  en)
     (command "ARC" pause pause pause)
     (setq en (entlast))
     (princ)
)
这样可以获得