Delphi保存字符串到文本文件
来源:互联网 发布:遇到网络骗局怎么办 编辑:程序博客网 时间:2024/05/22 11:51
Delphi保存字符串到文本文件,若指定文件不存在,则自动创建;保存字符串时采用累加形式。
procedure mSaveToFile(const FileName: string; sts: string);
var
MyTextFile: TextFile; //定义变量MyTextFile为文本文件类型
begin
//(*步骤1,将文件变量与外部文件联系。相当于为外部文件找了个“替身”*)
AssignFile(MyTextFile, FileName);
//(*判断操作的文件是否存在,不存在则创建文件。*)
if FileExists(FileName) then
//(*步骤2,打开文件,不过在打开前,最好进行文件是否存在的判断。*)
Append(MyTextFile)
else
Rewrite(MyTextFile);
try
//(*步骤3,对文件进行操作。*)
Writeln(MyTextFile, sts);
Flush(MyTextFile); //清空缓冲区,确保字符串已经写入文件之中。
finally
//(*步骤4,关闭打开的文件,CloseFile常与try…finally搭配,用于回收资源 *)
CloseFile(MyTextFile);
end;
end;
用法:
mSaveToFile(ExtractFilePath(Application.ExeName)+'test.txt', FormatDateTime('YYYY-MM-DD HH:mm:SS', now)+'测试');
- Delphi保存字符串到文本文件
- AS3保存字符串到文本文件
- 保存手册到文本文件
- 保存到文本文件
- Java 如何将字符串信息直接写保存到文本文件
- 保存到txt文本文件中
- delphi保存读取utf-8的文本文件
- Java写字符串到文本文件
- java保存日志到本地文本文件
- 将控制台输出直接保存到文本文件
- C语言:将数据保存到文本文件
- delphi如何保存和读取utf-8的文本文件
- 保存字符串到图片
- 保存文本文件, 读取文本文件
- 保存文本文件
- C++读取二进制文件到二维数组并保存到文本文件
- java 将字符串写入到文本文件
- 测试Delphi控件属性保存到dfm
- webService之(五)Spring与CXF整合
- ViewPager+RadioGroup实现标题栏切换,Fragment切换
- 关于C++派生类中构造函数调用顺序的问题
- Hibernate与各种数据库连接 配置
- IT人士必去的10个网站
- Delphi保存字符串到文本文件
- java的学习之路
- 扩展Oozie
- php phpize方式添加扩张-fileinfo实例
- 简明 Vim 练级攻略
- 18个网站优化技巧
- Visual Studio文件属性(无,编译,内容,嵌入的资源)
- 关于ServletContext中getAttributeNames()方法类型转换的问题
- 开通新博客