永发信息网

用lisp语言读取文件内容,只能读取整行么,我要第一行的第三个数据可以做到么,文件中都是数据

答案:1  悬赏:50  手机版
解决时间 2021-03-27 21:20
  • 提问者网友:川水往事
  • 2021-03-26 20:55
用lisp语言读取文件内容,只能读取整行么,我要第一行的第三个数据可以做到么,文件中都是数据
最佳答案
  • 五星知识达人网友:玩世
  • 2021-03-26 21:06
(defun List_FromFile (fn / f l ll)
 (if (setq f (open (findfile fn) "r"))
   (progn
     (while (setq l (read-line f))
       (setq ll (cons  l ll))
     )
     (close f)
   )
 )
 (reverse ll)

(setq data_file_patch (strcat "e:\test\DataFile\" "data.txt"));;设文件路径
(setq lst (List_FromFile data_file_patch));;get list

(car lst);;获取文件中的第一个数据
(cadr lst);;获取文件中的第二个数据
(caddr lst);;获取文件中的第三个数据
(nth 3);;获取文件中的第四个数据追问能把注释删除了吗,不知道哪里是正文哪里是注释,还有就是get list(car lst)这句对么?谢谢回答追答;;符号后面的是注释,get list是注释,其它所有中文都是注释追问显示说参数类型错误:stringp nil,应该是if那里的问题,但是不知道是什么问题追答你不会调试么? 从defun开始,这是一个自定义函数,是经过验证的,没有任何问题,
你的文件路径设置正确么? 程序中e:\\test\\DataFile\\这个路径要换成你自己的路径,
文件名data.txt要换成你自己的文件名追问路径和文件都改了,应该是没问题吧,我再看看吧,无论如何还是非常感谢你
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯