var
  F:TextFile;
begin
  AssignFile(F,"文件名");
  Rewrite(F);
  CloseFile(F);
end;

解决方案 »

  1.   

    var F:TextFile;
    var Str:String;
    Begin
         AssignFile(F,'路径\文件名');
         Rewrite(F);//如果是读文本文件,用Reset(F);
         WriteLn(F,'Hello');//或用write写一个字符,writeln是写一行字符,写完跳到下一行
         //如果是读文件,用Realn(F,Str)或Read(F,Str);
         CloseFile(F);
    end;
    如果是操作文本文件,用这些函数最方便,如果是操作其他文件
    1.用上面的函数,只是改为var F:File;
    2.用TFileStream流对象
    3.用FileRead这一族函数
    4.用BlockRead这一组函数
    具体可以查delphi 帮助!
      

  2.   

    简单一点的方法:
    加一个ListBox
    ListBox1.Items.SaveToFile("filename.txt");
    ListBox1.Items.LoadFromFile("filename.txt");
    可以用ListBox1.Itmes[i]对文件的每一行处理
      

  3.   

    哈哈!benhead好方法,更好的是
    你在memo控件上写东西些完后调用
    Memo1.Lines.SaveToFile(const FileName: string);
    如果试读出,用Memo1.Lines.LoadFromFile(const FileName: string)
      

  4.   

    我用了assignfile函数,但不能新建没有的一个文件,如果用reset打开时,提示找不该文件
      

  5.   

    assignfile
    之后,还要用rewrite(f)新建文件!
    你文件还没建,所以肯定是Reset出错了!
      

  6.   

    reset是打开已存在的文件,rewrite是写方式打开,如果不存在就创建一个