请教两句很菜的语句

zxy9108

(setq ptt (getpoint cir-pt"\nselect the text local point:"))
(command "leader" cir-pt ptt "" "" "" depth "") 上面两句话都在调试中都出现了问题,一个说是参数错误,一个是做不出来想要的结果.上面cir-pt,ptt是点,depth是一个字符串.我在以前的程序用过它们是成功了,这一次就出了问题,请教各位高手,问题可能出在哪里?

meflying

变量cir-pt的问题,你要确定前面通过一系列运算后,cir-pt是点


如果你不会使用中断,请在这句前加(princ "*") (princ cir-pt) (princ"*")


看两个星号之间是否是点

zxy9108

谢谢飞哥，用中断检查，cir-pt确实不是点，


(setq aa (entsel))


(setq cir-pt (cdr aa))得到的并不是一个点，而是cadr才能得到点，非常感谢飞哥