delphi 读写文本文件(函数比较全)

需要两个按钮和两个Richedit控件,采用默认名称即可.

procedure TForm1.Button1Click(Sender: TObject);  //写文件

var wText: TextFile;
begin
  AssignFile(wText, ‘ip.txt‘);
  Rewrite(wText);//创建文件,或者使用ReSet打开文件
  Writeln(wText, richedit1.text);
  CloseFile(wText);
end;

procedure TForm1.Button2Click(Sender: TObject);  //读文件
var rText: TextFile;
    tmp:String;
begin
  richedit2.Clear;//清除原来的内容
  AssignFile(rText, ‘ip.txt‘);
  reset(rText);
  while not EOF(rText) do
  begin
    readln(rText,tmp);
    richedit2.Lines.Add(tmp);
  end;
  closefile(rText);
end;

相关知识内容:

在对文本文件进行任何处理之前,首先要打开此文本文件。声明变量:通过此变量可以来引用一个文本文件。
    打开一个文件需要两步:首先是 AssignFile(),它可以将文件变量与一个文件关联起来。例如:这时,你可以进行第二步:打开文件。有三种方式打开文件:使用R e w r i t e ( )过程创建并打开文件;对于一个已存在的文件,此操作将使文件被覆盖;使用R e s e t ( )过程只读地打开一个文件;使用Append() 过程向已存在的文件追加文本。
    注意Reset()将以可读写方式打开类型文件和无类型文件。可以使用CloseFile()来关闭一个已打开的文件。
    
 本文转载于:http://blog.csdn.net/biku/article/details/1515479

下面是各种调用的函数:
    
    文件的打开与关闭:
     AssignFile:把一个外部文件名和一个文件变量相关联
     Reset:打开一个存在的文件
     Rewrite:创建并打开一个新文件(或覆盖原有文件)
     Append :以添加方式打开一个文件(只适用于文本文件)
     CloseFile:关闭一个打开的文件
     FileOpen:打开一个特定的文件并返回文件句柄
     FileCreate:创建一个给定文件名的文件并返回文件句柄
     FileClose:关闭一个特定句柄的文件
     后边三个文件主要供系统内部使用,在文件复制的编程中也往往会用到。它们操作的对象是文件句柄而不是文件变量。
    
    文件定位:
     Seek:把文件当前位置移到指定部分
     FilePos:返回文件的当前位置
     Eoln:返回行结束标志
     EOF:返回文件结束标志
     FileSeek:改变当前文件指针的位置

http://www.cnblogs.com/taomaomao/archive/2012/03/14/2395664.html

时间: 2024-11-08 22:04:58

delphi 读写文本文件(函数比较全)的相关文章

delphi文件操作(比较全)

Delphi中默认有input和output两个文件变量,使用可以不用定义,直接使用. 但: input:只读.output:只写.用时注意以免引起异常. 文件是由文件名标识的一组数据的集合,文件通常存放在磁盘上.源程序.学生档案记录.图形.音乐等均可以作为文件存储在磁盘上.操作系统是以文件为单位对数据进行管理的,也就是说,如果想读取外存介质上的数据,必须先按文件名找到所指定的文件,然后再从该文件中读取数据.要向外存介质上存储数据,也必须先建立一个文件(以文件名标识),才能向它输出数据.在程序运

17、如何对字符串进行左, 右, 居中对齐 18、如何去掉字符串中不需要的字符 19、如何读写文本文件 20、如何处理二进制文件 21、如何设置文件的缓冲

17.如何对字符串进行左, 右, 居中对齐 info = "GBK" print(info.ljust(20)) print(info.ljust(20,'#')) print(info.rjust(20,'#')) print(info.center(20,"#")) print(format(info,'<20')) print(format(info,'>20')) print(format(info,'^20')) result: GBK GBK

delphi读写INI系统配置文件

delphi读写INI系统配置文件 一.调用delphi内建单元 uses System.IniFiles; 1.使用类TIniFile 2.类TIniFile的主要方法和函数: {$IFDEF MSWINDOWS}   { TIniFile - Encapsulates the Windows INI file interface (Get/SetPrivateProfileXXX functions) }   TIniFile = class(TCustomIniFile)   public

DELPHI日期时间函数(DateUtils单元)

原文出自:http://shao171.blog.163.com/blog/static/238397019201502011844293/ CompareDate 函数 比较两个日期时间值日期部分的大小 CompareDateTime 函数 比较两个日期时间值的大小 CompareTime 函数 比较两个日期时间值时间部分的大小 DateOf 函数 去除日期时间值的时间部分 DateTimeToJulianDate 函数 转换日期时间值为儒略日 DateTimeToModifiedJulian

delphi Format格式化函数

Format是一个很常用,却又似乎很烦的方法,本人试图对这个方法的帮助进行一些翻译,让它有一个完整的概貌,以供大家查询之用: 首先看它的声明:function Format(const Format: string; const Args: array of const): string; overload; 事实上Format方法有两个种形式,另外一种是三个参数的,主要区别在于它是线程安全的, 但并不多用,所以这里只对第一个介绍:function Format(const Format: st

Delphi中 StrToIntDef函数的用法

Delphi中 StrToIntDef函数的用法: 比如我要判断一个文本框里输入的字符串能不能转换为integer类型,如果能,则返回转换后的整型数据,如果不能,则返回整数0,那么我就可以用strtointdef这个函数. 写法如下: 假设edit1.text:='1000'; 则strtointdef(edit1.text,0)返回值为1000. 如果edit1.text:='fdafds',则返回值为0. (如果你用strtoint(edit1.text)当edit1.text:='fdad

Delphi过程、函数传递参数的八种方式

Delphi过程函数传递参数的八种方式 Delphi过程.函数传递参数的八种方式,布布扣,bubuko.com

读写文本文件 ---字符行式读取

File 类 File.OpenWrite 方法 StringWriter 类 File.open //using (StreamWriter sw2 = File.CreateText(cmdFile)) using (StreamWriter sw2 = new StreamWriter(cmdFile,false, Encoding.Default)) //指定写入的编码格式 //-------------------------------------------------------

Delphi的四舍五入函数

一.四舍五入法    四舍五入是一种应用非常广泛的近似计算方法,其有算术舍入法和银行家舍入法两种.    所谓算术舍入法,就是我们通常意义上的四舍五入法.其规则是:当舍去位的数值大于等于5时,在舍去该位的同时向前位进一:当舍去位的数值小于5时,则直接舍去该位.    所谓银行家舍入法,其实质是一种四舍六入五留双(又称四舍六入五奇偶)法.其规则是:当舍去位的数值小于5时,直接舍去该位:当舍去位的数值大于等于6时,在舍去该位的同时向前位进一:当舍去位的数值等于5时,如果前位数值为奇,则在舍去该位的同