(setq tagreturn (strcat (strcat tagreturn (itoa acount)) " "))
我的最后一个函数SEL_ALL现在是:
(defun c:SEL_ALL(len) ;;len = length of tags list
(setq tagreturn "") ;;tagreturn = positions in drop list of selected items
(setq acount 0) ;;acount = a counter
(repeat len
(set_tile "tags" (itoa acount))
(setq tagreturn (strcat (strcat tagreturn (itoa acount)) " "))
(setq acount (1+ acount))
)
)
再次感谢 抱歉-我复制了此评论,试图删除它,但不确定如何删除 我复制了这条评论,但不知道如何删除它 欢迎史蒂文P。
既然Sel_all是一个子函数,那么应该删除c:它代表一个独立的命令,如果你感兴趣的话,我对你的子函数做了一些修改。
(defun sel_all (len / tagreturn acount)
;; len = length of tags list ;;
;; tagreturn = positions in drop list of selected items ;;
;; acount = a counter ;;
(setq tagreturn ""
acount 0
)
(repeat len
(set_tile "tags" (itoa acount))
(setq tagreturn (strcat tagreturn (itoa acount) " ")
acount (1+ acount)
)
)
)
谢谢,我不知道你可以用setq来改变几个变量
是的,你对c的看法是正确的:我需要改变这一点 看看你的帖子下面,你会看到一个按钮“编辑帖子”,所以点击这个按钮,我相信你可以自己删除不需要的帖子。
祝你好运
页:
1
[2]