Delphi文本文件的写操作
2012-10-12 20:42
176 查看
最近我用Delphi写了个程序,需要将用户信息写入文件,因此在网上查了下
Delphi有关文本文件的操作,经整理后,我将其封装成了一个函数,
以方便以后的使用,访函数代码如下:
Delphi有关文本文件的操作,经整理后,我将其封装成了一个函数,
以方便以后的使用,访函数代码如下:
//将帐号信息写入文本文件函数 procedure TForm1.WriteUserToText(user:String; pass:String); var txt:TextFile; begin //先判断一下文件是否存在, 不存在时就创建它 if not FileExists('C:\p.txt') then begin Assignfile(txt,'c:\p.txt'); //指定文件路径 rewrite(txt); //创建并打开一个新文件(或覆盖原有文件) Closefile(txt); //关闭打开的文件 end; AssignFile(txt,'C:\p.txt'); Append(txt); //以追加的方式打开文件,指针到尾 Writeln(txt,user+'--->'+pass); //写文件 CloseFile(txt); //关闭打开的文件 end; /////////////////////////////////////////////////////////////
相关文章推荐
- 如何用delphi操作记录型文本文件(转载)
- delphi操作文本文件简介
- Delphi 文本文件操作
- delphi操作文本文件的方法简介
- delphi 方便的文本文件操作(TEXT)
- Delphi文本文件的写操作
- delphi怎样打开一个文本文件
- Delphi流操作技巧
- Delphi 之 第七课 字符串操作
- Delphi实现对IIS的操作
- DELPHI 获取版本号、格式化版本信息、比较版本号等相关操作
- delphi 内存流 操作
- 《GOF设计模式》—适配器(ADAPTER)—Delphi源码示例:使用双向适配器提供透明操作
- Delphi关于记录文件的操作-转
- 在Delphi中操作快捷方式
- Delphi 中文件的操作FileOpen
- Delphi中的dll操作
- Delphi操作Wrod的几个知识点
- Delphi 操作 DTS
- delphi对ini文件的操作(转载 万一)