assignfile文件操作的小小问题:blockread、blockwrite带的参数是什么意思？

为什么reset()函数无法读取只读文件,有没有解决的办法?

不会吧？只读文件怎会读不出来呢？你换其余只读文件尝尝。

var Str:String;var FileT:TextFile;begin AssignFile(FileT,Path); Reset(FileT); While not Eof(FileT) do begin Readln(FileT,Str); end; ShowMessage(Str);end;

seek有什么用啊？？？怎么用啊

seek用来把文件指针移动到指定的地方，比如你想读文件偏移量为100（从文件的头上算起）的地方，用seek(f, 100);这样你下次用Read的时候就直接从偏移量为100的地方读了。

delphi是什么它有什么用啊？？？？？？？？？？？？？？？？？？？？？？？？

delphi由Borland公司推出的Delphi是全新的可视化编程环境，为我们提供了一种方便、快捷的Windows应用程序开发工具。

它使用了Microsoft Windows图形用户界面的许多先进特性和设计思想，采用了弹性可重复利用的完整的面向对象程序语言(Object-Oriented Language)、当今世界上最快的编辑器、最为领先的数据库技术。

如何用readln函数一次只读出一行文本？？？？？急！！！！！！！

应用字符串数组，定义一个长度，然后逐行读入s : string[15]j : integer; memo1.lines.add(s + inttostr(j));...try while not eof(abc.txt) do begin readln(abc.txt,s,j) end;finally closefile(abc.txt)end;

文件操作的小小问题:blockread、blockwrite带的参数是什么意思？

function ReadFileToString(const fileName:string):string;// test ok var F:file; intFileSize:Integer; actualRead:Integer; begin try assignfile(F,FileName); reset(F,1); setlength(Result,intfileSize); blockRead(F,Result[1],intFileSize,actualRead); //actualRead 实际读到的字节数 except intFileSize:=filesize(F); end; closefile(F); Result:=''; End;