字符串两个问题

xiaoliu

请问如何在几个字符串之间加上空格,然后返回一个大字符串呢


还有,如何将这个大字符串在分解为这几个小的字符串呢?

meflying

(strcat str1 " " str2 " " str3)



(mapcar '(lambda (e) (vl-symbol-name e))(read (strcat "("        str ")")))

ljcgq

meflying简洁厉害!!!!

龙龙仔

;;(setq STR "WWW RR RRR");OK
(setq STR "123 456 789");當是數字時,則不行
(mapcar '(lambda (E) (vl-symbol-name E))
(read (strcat "(" STR ")"))
) ;;改用vl-princ-to-string會比較好
(mapcar '(lambda (E) (vl-princ-to-string E))
(read (strcat "(" STR ")"))
)