隐藏+抽屉界面！！（源码）修改一下支持中文汉字

nxchenjk

我的汉字还是不显示啊，有办法解决吗，谢谢

cjf160204

你這個怎麼添加命令

nxchenjk

把子程序换一下。就可以支持中文了。
(defun fun-str2lst(str sp / str1)
  (cond
    ((= str nil) nil)
    ((= sp nil) nil)
    ((= str "") "")
    ((= sp "") str)
    (t
     (setq str1 (strcat "((\"" str "\"))"))
     (while (vl-string-search sp str1)
       (setq str1 (vl-string-subst "\")(\"" sp str1))
     )
     (apply 'append (read str1))
    )
  )
)