[求助]：关于undefine的问题

罗趣

为什么第一可以第二就不行？有人明白码？

一：
(defun c:line ()
  (command ".layer" "m" "line" "")
  (command ".line" )
  )
(command "undefine" "line")

二：
(defun c:dimlinear()
  (command ".layer" "m" "dim" "")
  (command ".dimlinear" )
  )
(command "undefine" "line")

ll_j

2. 
   
3. (defun c:line ()                       ;定义外部函数c:line取代原来的命令line
   
4.   (command ".layer" "m" "line" "")   ;函数内容1：建立层line并进入
   
5.   (command ".line" )             ;函数内容2：调用原始命令[B].line[/B]画线
   
6. )
   
7. (command "undefine" "line")          ;屏蔽调原来命令line，这样外部函数c:line才能像命令一样执行。
   
8. 
   
9. (defun c:dimlinear()                     ;定义外部函数c:dimlinear取代原来的命令dimlinear
   
10.   (command ".layer" "m" "dim" "")  ;函数内容1：建立层dim并进入
    
11.   (command ".dimlinear" )            ;函数内容2：调用原始命令[B].dimlinear[/B]进行标注
    
12. )
    
13. (command "undefine" "line")           ;屏蔽调原来命令line[B]?[/B]
    
14. 
    
15. 
    

<br /> (defun c:line ()                       ;定义外部函数c:line取代原来的命令line<br />   (command ".layer" "m" "line" "")   ;函数内容1：建立层line并进入<br />   (command ".line" )             ;函数内容2：调用原始命令[B].line[/B]画线<br /> )<br /> (command "undefine" "line")          ;屏蔽调原来命令line，这样外部函数c:line才能像命令一样执行。<br /> <br /> (defun c:dimlinear()                     ;定义外部函数c:dimlinear取代原来的命令dimlinear<br />   (command ".layer" "m" "dim" "")  ;函数内容1：建立层dim并进入<br />   (command ".dimlinear" )            ;函数内容2：调用原始命令[B].dimlinear[/B]进行标注<br /> )<br /> (command "undefine" "line")           ;屏蔽调原来命令line[B]?[/B]<br /> <br /> <br />