新元素加入表结尾

xiaoliu

请问cons是将一个新元素加入表地开头，那么怎么样将一个新的元素加入表地结尾呢？

lei6699

倒过来不就行了？


或者用append，可以吗？ (append '(a b c) '(d))，返回(a b c        d)

xiaoliu

我地程序功能为，每点一次按钮sub，调用sub函数，将几个编辑诓里地内容联起来放入列表诓中，同时变量需记住所有地内容。如在4个编辑框里分别输入 1 ,2,3,4 点击sub按钮，列表框里显示 1 2 3 4, 变量list1为（（1 2 3 4））若再输入 5，6，7，8，列表框里加上5 6 7 8一项，变量list1为( (1 2 3 4 ) (5 6 7 8));可是list1中内容始终不对，该怎么写阿，各位大侠 (action_tile "sub" "(sub)") (defun sub(/ listadd string s1 s2 s3 s4 )
(setq listadd (list(get_tile "diameter")(get_tile "thickness")(get_tile "length")(get_tile "material")))
(setq s1 (car listadd))
(setq s2 (cadr listadd))
(setq s3 (caddr listadd))
(setq s4 (last listadd))
(setq string (strcat s1 " " " " s2 " " " " s3 " " " " s4))
(start_list "popuplist" 2)
(add_list string)
(end_list)
(setq list1 (append (list list1) (list listadd))) )

meflying

把2楼的语句仔细再看看，注意append的用法，看看哪个变量对应你程序中的哪个。。。


另，帮助中应该有此函数的详细介绍，也该看看

xiaoliu

还有一种解决办法，但需要知道，列表框总共有多少项，这个函数是什么啊，斑竹

lei6699

有了选择集之后，可以用sslength


具体用法看帮助手册 ：）

alin

你在(setq s4 (last listadd))后面加一句
(setq listadd (mapcar 'atoi listadd))试试看