xyp1964 发表于 2022-3-26 09:58:12




(defun c:tt ()
(defun aa ()
    (setq Dlst'(("bu1" "下一个对话框" "button" "(bb)")("bu2" "取消" "button" "(princ)")))
    (xyp-Dcl-Init Dlst "【DCL界面切换1】" t)
    (princ)
)
(defun bb ()
    (setq Dlst'(("bu3" "图中选择" "button" "(cc)")("bu4" "回前菜单" "button" "(aa)")))
    (xyp-Dcl-Init Dlst "【DCL界面切换2】" t)
    (princ)
)
(defun cc()(setq s1(car(entsel"\n选择: "))))
(aa)
(princ)
)


x_s_s_1 发表于 2022-3-26 11:15:08

本帖最后由 x_s_s_1 于 2022-3-26 11:18 编辑

在热心网友帮助下，完成了！再次感谢各位:handshake

mercio 发表于 2022-3-26 12:24:59

恭喜，并且前来学习

AndyWang 发表于 2022-3-27 12:34:51

很有含量的帖子

海盗曹 发表于 2022-3-28 22:50:14

mark一下，以备学习

jvzigame 发表于 2022-3-29 16:41:58

楼主发贴辛苦了，谢谢楼主分享！

999999 发表于 2022-3-29 22:14:25

谢谢大神们的分享，有一个问题，出现好几个思路，好几个解决的方法，谢谢大神们的出手
页: 1 [2]
查看完整版本: 对话框切换问题