[LISP]lisp难题求助,高手速出招

crtrccrt · 发表于 2006-3-23 16:28

lisp难题求助,高手速出招
如何将列表框或下拉框内容读出??内容不是用get_tile取得的序列字符而是多个字符串列表.

ljpnb · 发表于 2006-3-23 16:43

(defun Picked (val / V)
(setq val (read (strcat "(" Val ")"))
Lst (mapcar '(lambda (V) (nth V FL)) Val) ;_FL指列表框的列表
)
)

crtrccrt · 发表于 2006-3-24 00:47

是得到列表框的内容,内容指xxx
已经更新列表框:
    (start_list "gg_1")
    (mapcar 'add_list xxx)
    (end_list)
问题的本质是直接"gg_1" 通过取得"xxx",而不是通过 (nth (atoi (get_tile "gg_1")) xxx)
取得的第几个元素.
===========================
已知 "gg_1"   求xxx

ljpnb · 发表于 2006-3-24 08:08

我对这个也不太懂，但2楼程序中的val不一定是单个值，可以是多个序列值，如果是全选，那么最后LST就是所有列表框的字符串了。

xazhji · 发表于 2006-3-24 23:11

“已知 "gg_1" 求xxx ”似乎没有任何意义。没有xxx ，gg_1也是空的。所以xxx 是事先知道的

hustrys · 发表于 2006-3-27 16:31

试试看 (setq VS(nth (atoi(get_tile "v_stands_list")) v_list)) “v_stands_list” dcl中列表框；

账号		自动登录	找回密码
密码			注册