autolisp吧 关注:477贴子:1,087
  • 9回复贴,共1

read-line读取结果为字符串“20 20 ”转变表的形式(20 20)

只看楼主收藏回复

在autolisp中read-line读取结果为字符串“ 20 20 ”怎么转变表的形式(20 20)。


1楼2018-03-23 16:52回复
    左右加括号后用read


    IP属地:江苏来自iPhone客户端2楼2018-03-25 22:45
    收起回复
      (defun c:21demo1()
      (setvar "cmdecho" 0)
      (setq fileph (getfiled "选择文件" "G:/AutoLISP/" "txt" 2))
      (setq file (open fileph "r"))
      (setq fdata (read-line file))
      (command "pline")
      (while fdata
      (command fdata)
      (setq fdata (read-line file))
      )
      (command "")
      (close file)
      (princ)
      )


      3楼2018-03-26 10:44
      收起回复