delphi 方便的文本文件操作(TEXT)

本文整理自网络，侵删。

 
FText: Text;//只能定义为成员或全局
AssignFile( FText, edt1.Text );//打开文件
  Rewrite( FText );//只能一行一行的写
  Writeln( FText, 'aaa');
  Writeln( FText, 'aaa');
  Writeln( FText, 'aaa');
  Writeln( FText, 'aaa');
  Writeln( FText, 'aaa');
  CloseFile( FText );//关闭也就是保存
  s: string;
  Reset( FText );
  mmo1.Clear;
  while not Eof(FText) do
  begin
    Readln( FText, s );
    mmo1.Lines.Add(s);
  end;
 

相关阅读 >>

Delphi 写日志函数

Delphi debug release区别是什么？

Delphi文本加密解密

Delphi 获取随机字符串的方法 thash.getrandomstring

Delphi的常用条件编译指令

Delphi -- 农历算法单元

Delphi获取句柄并发送消息

Delphi发送邮件源代码

Delphi 写一个可拖动的 tshape

Delphi2009之timage

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 方便的文本文件操作(TEXT)