sunnylhj 发表于 2019-12-1 22:48:02

字符串转换列表的就问

通常字符串转列表直接用 （list str）就可以了，但像字符串："T2-01,1269,30,30" 变成一个列表：("T2-01" "1269" "30" "30" ) 应该怎样操作呢？

lisperado 发表于 2019-12-2 07:35:59

最简单方式加前后刮号“（”“）”，但有缺点如多余逗号会被疏忽 (,,,T2-01,1269,,30,30,,)

(setq lst (read
           (strcat "("
                   (vl-string-translate "," " " "T2-01,1269,30,30")
                   ")"
                   )
           )
      )


(listp lst) ;查询是否为表
;T

USER2128 发表于 2019-12-2 08:18:25

(setq Lst (read (strcat "(" (vl-string-translate "," " " "T2-01,1269,30,30") ")")))
(setq Lst (mapcar 'vl-princ-to-string Lst))
页: [1]
查看完整版本: 字符串转换列表的就问