andy_lee 发表于 2022-7-5 22:56:55

“_LEADER”需要什么参数

我在这个论坛上找到了leemac的代码。
(defun c:lb ( / p x y str )
(while (setq p (getpoint "\nPick Point - ENTER to finish: "))
    (setq   x (strcat "X = " (if (minusp (car p)) """+" ) (rtos (car p) 2 2)))
    (setq   y (strcat "Y = " (if (minusp (cadr p)) "" "+" ) (rtos (cadr p) 2 2)))
    (setq str (strcat x "\n" y))
   ;(setq   z (strcat "Z = "(if (minusp (caddr p)) "" "+" ) (rtos (caddr p) 2 2)))
   ;(setq str (strcat x "\n" y "\n" z))                                       
    (command "_LEADER" p pause "" str "")
)
(princ)
)
 
有时运行结果如下

 
W为什么?需要设置哪些参数?
我需要这样:

andy_lee 发表于 2022-7-6 00:42:11

哦我使用“qleader”---“set”,测试所有选项,无法解决此问题。需要帮助!
 
(defun c:tt ()
(while (setq p (getpoint "\nPick Point - ENTER to finish: "))
(command "_LEADER" p pause "" 1234 "")
)
(princ)
)
 
这是DWG示例
测试1.dwg
页: [1]
查看完整版本: “_LEADER”需要什么参数