再续文本文档

Question

如何创建/删除一　*.TXT　文档？，如何更名/改变文档存放路径，
如何以追加方式写文本文档？如何指定第三行读入MEMO？
请指教

Answer 1

var f:textfile;
    s:string;
begin
//初始化文件
  assignfile(f,OpenDialog1.FileName);
  reset(f);
//读取文件
   readln(f,s);
//写文件  writeln(f,s);
  closefile(f);
end;

Answer 2

简单的
var f:textfile;
    s:Tstringlist;
begin
if opendialog1.Execute then
begin
   s:=Tstringlist.Create;
   s.LoadFromFile(opendialog1.FileName);
   memo1.Lines.Add(s.Strings[3]); //取第三行
end;
end;

Answer 3

哈哈，l0f(凌风)在这里练书法啊？写了这么多：）
更名/改变文档存放路径
你可以直接用shell执行dos文件命令，或者
写程序，另建一个文件后删除以前的文件。