| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1119 人关注过本帖
标题:要对文本进行操作,DELPHI中如何建立连接呢?
只看楼主 加入收藏
taituby
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2005-1-29
收藏
 问题点数:0 回复次数:1 
要对文本进行操作,DELPHI中如何建立连接呢?
我要对文本进行没一行进行读取,先要建立连接
我使用的方法是:var fil:string :=E:\图书馆\新建文件\file.txt(文本地址)
可是不能通过编译,请教原因
搜索更多相关主题的帖子: DELPHI 文本 
2005-05-31 11:32
sun_catboy
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-12-17
收藏
得分:0 

文本文件类型的变量用如下方法声明:

var

TextFileVar: Text ;

文本文件是以行为单位进行读、写操作的。由于每一行长度不一定相同,不能计算出给定行在文件中的确切位置,因而只能顺序地读写。而且文本文件只能单独为读或写而打开,在一个打开的文本文件上同时进行读、写操作是不允许的。

文本文件的打开需要两个步骤:(1). 文件变量与文件名关联;(2). 初始化读写。

关联文件变量与文件名调用AssignFile标准过程:

AssignFile ( TextFileVar , FileName ) ;

FileName 既可以是全路径名,也可以仅是文件名。对于后者系统将在当前目录下查找。

AssignFile是Delphi新提供的一个函数,其功能等价于Object Pascal中的Assign。而Assign在Delphi中更多地被用作一个方法名。

初始化读写有三种方式:

1. Reset : 为读打开文件并把文件指针移动到文件首;

2. Rewrite : 为写创建一个新文件;

3. Append : 为写打开存在的文件并把文件指针定位在文件尾。

当使用Reset或Append过程而文件不存在时将会引发一个I/O异常。

文件的关闭很简单,只须调用CloseFile过程即可。

虽然Delphi应用程序在退出时会自动关闭所有打开的文件,但自己动手关闭文件可以确保释放文件句柄,并使程序的可移植性增强。

为保持兼容,Delphi也允许用户用Assign建立关联,Close关闭文件。

从文本文件中读取信息用Read、Readln两个标准过程。

当读入数值时,Read、Readln假定数值是用一个或多个空格分开的,而不是逗号、分号或其它字符。对如下一条语句:

Read ( TextFileVar , Num1 , Num2 , Num3 ) ;

如果文件中的数值是:

100200300

则能够成功读入,而若文件中的数值是

100200,300

则Read读入“200,”并试图把它转化成一个数值时会引发一个异常。

当读入字符是字符串时,Read、Readln过程总是读取尽可能多的字符填充到字符串变量中或一直读到行结束符为止。因此从文本文件中读取格式化的字符串数据,必须声明与其长度相匹配的字符串变量。如果要从文件中读取单词,必须先把文件中的每一行读入字符串,然后再从字符串中逐个分析出单词。或者一次只从文本文件中读入一个字符并测试每个字符后是否是单词断开处。

格式化字符串之间的分隔符应读入到一个临时变量中,而字符串与数值、数值与数值间的分隔符读入时会自动识别剔除。对如下一行数据:

2005-12-18 10:07
快速回复:要对文本进行操作,DELPHI中如何建立连接呢?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013997 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved