【求助】又一错误不惑，老哥来点提示！~~

crane_QS · 发表于 2004-3-30 22:47:00

我想实现两个按钮同时激活后才能按下确定键例如：留装订边(&Y)按钮和A0*2按钮，都按一下才能点确定键，只按下一个没有效果！
感激，感激！！

yxp · 发表于 2004-3-30 22:50:00

忘打开QQ了,你好啊.

meflying · 发表于 2004-3-30 22:57:00

没仔细看程序，估计是在按下那几个按钮的动作中要赋值的几个变量在这之前没有赋值，因此没有按下这些按钮就没有了这些动作，这些变量就为空，导致后面错误。。。要将这些值赋上需要的初始值

crane_QS · 发表于 2004-3-30 22:59:00

赋初始值了啊，可是还是没有反应
(setq PDBL 0)
(setq JH 0)

meflying · 发表于 2004-3-30 23:04:00

看了一下，你的初始值是0，你自己看看，如果PDBL是0，后面的程序能继续吗？

crane_QS · 发表于 2004-3-30 23:10:00

(setq PDBL 0)
(action_tile "HF" "(setq PDBL 1)")
(action_tile "SF" "(setq PDBL 2)")
我本是希望，不点击按钮后就不能继续运行，只有点击后被赋值1或2，才继续后面的操作

meflying · 发表于 2004-3-30 23:16:00

那你就加个判断啊，如果PDBL=0，就退出程序啊。。。
如
(defun c:test()
(setq a (getint "输入一个数字:"))
(cond
((= a 1) (princ "hello"))
((= a 2) (princ "welcome"))
)
(princ)
);这里用了cond，你如果不会，用if也是一样的。。。
这里的(princ "hello")或((= a 2) (princ "welcome"))包括按1（或2）时要做的所有的事情，不仅仅是取得几个值，还有后面的画图等等。。。

crane_QS · 发表于 2004-3-30 23:25:00

我想用一个双重判断，就是当既满足条件1又满足条件2时，就······· 你看我这句有问题吗？
(action_tile "accept"    "(if (>= BKPD 1)
(progn
     (if (> JH 0) (done_dialog 1))
     ))")

meflying · 发表于 2004-3-30 23:45:00

你试一下不就知道可不可以了吗。。。
这些都是程序的设计思路问题，没有定性的方法，各人的方法都可能不同，只有不停地去摸索

【求助】又一错误不惑，老哥来点提示！~~

发表回复

精选推荐