怎样创建一个文件并把需要的信息导入其中

解决方案 »

  1.   

    我是这样创建文件的F:=TFileStream.Create('d:\xiaofeitongji.txt',fmCreate);
    请问这样才能把所需要的数据或文字写入其中
      

  2.   

    如果你是想把某个Memo控件的内容导出,可以这样:memo1.lines.SaveToFile('C:\我的文件.txt');另外,对于纯文本的文件,可以这样:var
      aText:TextFile;
    begin
      AssignFile(aText,'c:\我的文件.txt');
      Rewrite(aText);
      WriteLn(aText,'这是第一行文本');
      WriteLn(aText,'这是第二行文本');
      CloseFile(aText);
    //查看C:\我的文件.txt 可看到内容
    end;
    对于非文本类型的文件:type
      aRecord=Record
        Name:String[8];
        Tel:String[20];
      end;
    var aFile:file of aRecord;
        aRec:aRecord;
    begin
      AssignFile(aFile,'c:\另一文件.dt');
      rewrite(aFile);
      aRec.Name:='张三丰';
      aRec.Tel:='0871-10000';
      Write(aFile,aRec);
      CloseFile(aFile);
    //打完收工 
    end;//另:好消息:
    网络域名、网站空间优惠,详情请见:
    kmok.cn 
    昆明OK软件工作室 
     域名为中国最大的域名、虚拟主机提供商 中国万网 提供,空间速度快。