FUNCTION fileread,file
;file = DIALOG_PICKFILE(FILTER='*.*');也可以省略
;2010-08-28
;wuxuping@mail.ustc.edu.cn
LineCount = FILE_LINES(file);
if (LineCount gt 0) then begin
StringArray = strarr(LineCount);
OPENR, unit, file, /GET_LUN
READF, unit, StringArray
FREE_LUN, unit
FileString=StringArray
endif else begin
FileString=''
LineCount=0
endelse
RETURN,FileString
END
;===========================================
fileread函数:IDL中将文本文件读入一个字符串数组中,每一行作为一个元素
最新推荐文章于 2021-02-19 13:09:39 发布
本文介绍了一个用于读取文件内容的IDL函数实现。该函数通过对话框选择文件,并使用FILE_LINES函数获取文件行数。如果文件存在且不为空,则使用OPENR和READF语句打开并读取文件内容到字符串数组中,最后返回文件字符串。
1503

被折叠的 条评论
为什么被折叠?



