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 firemonkey app 如何获得当前系统语言设置

Delphi ado 动态建立.mdb数据库,表

Delphi android检查互联网连接

Delphi trayicon1如何把窗体关闭到系统托盘

Delphi监视进程并结束进程

winapi 字符及字符串函数(1): charlower - 字符或字符串转小写

Delphi idhttp post 普通提交乱码处理

Delphi xe5 android 调用 google zxing

Delphi中关于字符串的操作

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...