有人知道文本文件的读写吗

Question

如果是文本文件用TStrings的派生类的ADD方法。可以放在DLL中，也可以在程序中定义后直接使用。

Answer 1

read和readln读取文件中的数据，write和writeln写如文件不知道这些函数算不算

Answer 2

eof这个函数是检查是否到文件末尾的

Answer 3

这是pascal基本的文件操作，虽然在win下较少用了：
assignfile、reset、rewrite、read（ln）、write（ln）

Answer 4

var   F: TextFile;
  S: string;
begin
  if OpenDialog1.Execute then            
  begin
    AssignFile(F, OpenDialog1.FileName); 
    Reset(F);
    Readln(F, S);                        
    Edit1.Text := S;                     
    CloseFile(F);
  end;
end;

Answer 5

var
 f:TextFile;
 s,s1:string;
begin
 if opendialog1.Execute then
  Assignfile(f,Opendialog1.FileName) ;
  reset(f);
  readln(f,s);
  s1:='dffdf';
  rewrite(f);
  write(f,s+s1);
  closefile(f);end;

Answer 6

使用TStringList对象最简单：function AddString(strYouWantAdd:String;YourFile:TFilename);
var
  strlst:TStringList;
begin
  try
    strLst:=TStringList.create;
    strLst.loadfromfile(YourFile);
    strLst.add(strYouWantAdd);
    strLst.saveToFile(YourFile);
  finally
    strLst.free;
  end;
end;