(defun c:Test (/ p1 p2 p3)
(if (and (setq p1 (getpoint "\nSpecify leader starting point: "))
(setq p2 (getpoint p1 "\nSpecify next point: "))
)
(progn
(grdraw p1 p2 7 1)
(setq p3 (getpoint p2 "\nSpecify next point <Annotation>: "))
(redraw)
(initdia)
(if p3
(command "_.leader" "_non" p1 "_non" p2 "_non" p3 "_A" "" "_M" "")
(command "_.leader" "_non" p1 "_non" p2 "_A" "" "_M" "")
)
)
)
(princ)
) 艾伦先生。
您能告诉我为什么使用（initdia）吗？因为没有任何对话框可以用leader命令显示？
谢谢 启动多行文字编辑器（对话框）。领导命令的一部分。
如。
Command: leader
Specify leader start point:
Specify next point:
Specify next point or <Annotation>: a
Enter first line of annotation text or <options>:
Enter an annotation option Mtext] <Mtext>: m 这真的很好，我忘记了多行文字对话。
非常感谢你。 我从未真正使用过Leader；QLeader在r14（我刚开始的时候）就已经出现了，我只是使用了r14（更好）和新推出的MLeader（截至2008年）。
页:
1
[2]