(XD::Geom:Get9PT)获得实体或选择集9点中的指定点

Lispboy

1. ;|
   
2. 获得实体或选择集9点中的指定点
   
3. 参数：
   
4.    e --- 实体或选择集
   
5.    index--指定索引（0-8）
   
6. 返回值：
   
7.    点
   
8. |;
   
9. (defun XD::Geom:Get9PT(e index / box)
   
10.    (setq box (XD::Geom:9pt e))
    
11.    (nth index box)
    
12. )
    
13. 
    

;|<br /> 获得实体或选择集9点中的指定点<br /> 参数：<br />    e --- 实体或选择集<br />    index--指定索引（0-8）<br /> 返回值：<br />    点<br /> |;<br /> (defun XD::Geom:Get9PT(e index / box)<br />    (setq box (XD::Geom:9pt e))<br />    (nth index box)<br /> )<br /> <br />

renyong119

赚豆  见题就回

q3_2006

(nth index e) 应该改成(nth index box)

q3_2006

老大，笔误 (nth index e) 应该改成(nth index box)

浮世小半生

又是api  可怕{:soso_e179:}

wyldd

谢谢,学习了