新手小疑点
新手小问题
f:=TFileStream.Create(sr.Name,fmopenread);
setlength(str,f.Size);
f.Read(str[1],f.Size);
if pos(s,str)>0 then
这四句话是什么意思？小弟新手，请各位老手继续带一下，非常感谢！！！
------解决方案--------------------
应该是对文件的操作
f:=TFileStream.Create(sr.Name,fmopenread);//创建一个只读文件流
setlength(str,f.Size);//设定str的长度 估计是个字符数组吧
f.Read(str[1],f.Size);//讲文件内容读入str中
if pos(s,str)>0 then //查找指定内容，如果存在则进行相关操作
------解决方案--------------------
补充下1楼：
setlength(str,f.Size);//给字符数组分配内存，设定str的长度，这里的str是delphi里面string类型
所以下面是从str[1]开始的
------解决方案--------------------
整个代码的含义是把文件从流中，读到内存中
f:=TFileStream.Create(sr.Name,fmopenread);
setlength(str,f.Size);
f.Read(str[1],f.Size);
if pos(s,str)>0 then
这四句话是什么意思？小弟新手，请各位老手继续带一下，非常感谢！！！
------解决方案--------------------
应该是对文件的操作
f:=TFileStream.Create(sr.Name,fmopenread);//创建一个只读文件流
setlength(str,f.Size);//设定str的长度 估计是个字符数组吧
f.Read(str[1],f.Size);//讲文件内容读入str中
if pos(s,str)>0 then //查找指定内容，如果存在则进行相关操作
------解决方案--------------------
补充下1楼：
setlength(str,f.Size);//给字符数组分配内存，设定str的长度，这里的str是delphi里面string类型
所以下面是从str[1]开始的
------解决方案--------------------
整个代码的含义是把文件从流中，读到内存中
- Delphi(Pascal) code
f:=TFileStream.Create(sr.Name,fmopenread);//这个是创建文件流 setlength(str,f.Size);//根据流的大小为Str分配内存 f.Read(str[1],f.Size);//将文件内容读入str中 if pos(s,str)>0 then //判断str是否存在指定字串
------解决方案--------------------
数据流。。。
------解决方案--------------------
sr.name应该是findfirst/findnext这对目录查找函数得到一个符合匹配条件的文件名
------解决方案--------------------
在你指定的文件中查找
应该是这个功能吧