明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1459|回复: 3

再问动态对话框赋值问题,请高手看看我的代码。

[复制链接]
发表于 2005-11-3 22:16 | 显示全部楼层 |阅读模式

我想实现对话框动态赋值,即上次输入的值可在下次输入是自动保存,可是我用(set_tile "key" "值")时没有成功,下面是我的代码:

    (action_tile "tubie" "(setq tubie1 $value)")                 [tubie 是一个文本框的key值]

    (action_tile "accept" "(done_dialog 3)")
    (action_tile "cancel" "(done_dialog 4)")

     (cond
           ((= result 3) (progn  (load "biaotilan.lsp") (biaotilan tubie1)  (set_tile  "biaotilan" biaotilan1)))                           [biaotilan 是一个函数名tubie1是参数]

      ((= result 4) (exit))

      )

但是事实上我的对话框的文本框没有实现我想要得功能,请高手指点一下,我的代码问题出在哪里呢?

发表于 2005-11-3 22:47 | 显示全部楼层
保存在那里了。
发表于 2005-11-4 09:57 | 显示全部楼层

set_tile是在对话框显示之前,就是action_tile的位置,而不是退出对话框之后...

另外在退出对话框之前要保存对话框中的值,这样下次才能继续调用

(action_tile "accept" "(setq biaotilan1 (get_tile \"biaotilan\")) (done_dialog 3)")

还有,对文本框的赋值,由于你是退出对话框才使用这个值,所以不需要每次tubie都进行赋值,而只需要accept时一次保存这个值就可以了

(action_tile "accept" "(setq tubie1 (get_tile \"tubie\")) (setq biaotilan1 (get_tile \"biaotilan\")) (done_dialog 3)")

 楼主| 发表于 2005-11-4 14:08 | 显示全部楼层

但是我是过之后还是不行啊,set_tile如何用呢?在什么时候用?能写的明白一点么,还有就是(action_tile "accept" "(done_dialog 3)")之中只能有一个语句阿,如果写成(action_tile "accept" "(set_tile "tubie" tubie1)(done_dialog 3)")系统提示是错误的:

参数太多。

注意:["tubie"和是文本框的"key"值,"accept"是确定按钮的"key"值]

我在第一篇帖子中有一个地方没有写清楚,应该是这样:

  (action_tile "tubie" "(setq tubie1 $value)")                 [tubie 是一个文本框的key值]         

    (action_tile "accept" "(done_dialog 3)")
    (action_tile "cancel" "(done_dialog 4)")

   (setq result (start_dialog)) 
   (unload_dialog index)

(cond
           ((= result 3) (progn  (load "biaotilan.lsp") (biaotilan tubie1)      (set_tile  "tubie" tubie1)))                           [biaotilan 是一个函数名tubie1是参数]

      ((= result 4) (exit))

      )

所以能告诉我正确实现该目的的程序究竟是怎样的呢?

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-20 12:20 , Processed in 0.175709 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表