Delphi用于读写的三种文件类型.pdfVIP

Delphi用于读写的三种文件类型 一.旧pascal文件类型 用旧文件变量表示的文件类型,比如 f:text,f:file. 定义了三类:有类型,无类型,字符类型以及一些delphi 的文件操作函数.比如:assignprn,writeln,这些文件类和windows文件句柄不兼容 二.windows文件句柄(handle) 面向对象的pascal的文件句柄封装了windows文件句柄类型,文件操作函数库则封装了windows api函数,比 如fileread就是调用了windows api 函数readfile,delphi提供了一个windows api操作接口如果熟悉 windows api，可以用windows文件句进行文件操作. 三.文件流(file streams) 文件流是tfilestream类的对象实例,文件流是高层的文件操作类型,tfilestream提供了一个句柄属性.用此 属性可操作windows文件句柄类型. 如何选择文件类型 windows文件句柄是较底层的文件操作类型,提供了灵活的同步及异步文件读写控制,以下提供用windows文件 句柄类型对文件同步及异步操作的伪代码描述: 同步操作: bresult = readfile(hfile, inbu er, nbytestoread, nbytesread, null) ; // check for eof if (bresult nbytesread == 0, ) { // we’re at the end of the file } 步操作: // set up overlapped structure fields goverlapped.o set = 0; goverlapped.o sethigh = 0; goverlapped.hevent = null; // attempt an asynchronous read operation bresult = readfile(hfile, inbu er, nbytestoread, nbytesread, 1 goverlapped) ; // if there was a problem, or the async. operation’s still pending ... if (!bresult) { // deal with the error code switch (dwerror = getlasterror()) { case error_handle_eof: { // we’re reached the end of the file // during the call to readfile // code to handle that } case error_io_pending: { // asynchronous i/o is still in progress // do something else for a while godosomethingelse() ; // check on the results of the asynchronous read bresult = getoverlappedresult(hfile, goverlapped, nbytesread, false) ; // if there was a problem ... if (!bresult) { 2 // deal with the error code switch (dwerror = get