- 1、本文档共15页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Free Pacal Dos单元函数过程类型常数详解(免费)
索引:常量 类型 变量 函数和过程
常量:
文件属性:
文件属性中使用FindFirst常数,FindNext,以确定搜索什么样的特殊文件类型,除了正常的文件。这些标志也用在SetFAttr和GetFAttr程序来设置和检索文件的属性。对于他们的定义如下表:
常数 描述 值 readonly 只读文件 $01 hidden 隐藏文件 $02 sysfile 系统文件 $04 volumeid 卷标 $08 directory 目录 $10 archive 存档 $20 anyfile 上述任何特殊文件 $3F fmXXXX
这些变量用于TextRec记录的Mode变量,提供文件输入输出操作中文件的模式,它们的定义如下表:
常数 描述 值 fmclosed 文件被关闭 $D7B0 fminput 文件只读 $D7B1 fmoutput 文件只写 $D7B2 fminput 文件可读可写 $D7B3 其他:
以下变量不可移植,不应当被使用。它们为了兼容而存在。
{Bitmasks for CPU Flags}
fcarry = $0001;
fparity = $0004;
fauxiliary = $0010;
fzero = $0040;
fsign = $0080;
foverflow = $0800;
类型:
以下字符串类型被定义用于易于操作的文件名:
ComStr = String[255]; {用于命令行}
PathStr = String[255]; {用于完整的文件路径}
DirStr = String[255]; {用于目录和(DOS)驱动器字符串}
NameStr = String[255]; {用于文件名}
ExtStr = String[255]; {用于文件拓展名}
SearchRec = Packed Record
Fill : array[1..21] of byte;
{ Fill在Linux下代替以下声明}
Attr : Byte; {找到的文件属性}
Time : LongInt; {找到的文件的最后修改日期}
Size : LongInt; {找到的文件的大小}
Reserved : Word; {将来使用}
Name : String[255]; {找到的文件名}
SearchSpec: String[255]; {搜索模式}
NamePos: Word; {路径的结尾,文件名称的开始}
End;
在Linux下,Fill数组替换以下:
SearchNum: LongInt; {追踪这是哪个搜索}
SearchPos: LongInt; {目录位置}
DirPtr: LongInt; {阅读目录的目录指针}
SearchType: Byte; {0=normal, 1=open will close}
SearchAttr: Byte; {我们在寻找的属性}
Fill: Array[1..07] of Byte; {将来使用}
这是因为Unix下的搜索机制和Dos的不同,所以以下要被模仿:
const
filerecnamelength = 255;
type
FileRec = Packed Record
Handle,
Mode,
RecSize : longint;
_private : array[1..32] of byte;
UserData : array[1..16] of byte;
name : array[0..filerecnamelength] of char;
End;
FileRec用于类型化和非类型化文件的内部表示。
const
TextRecNameLength = 256;
TextRecBufSize = 256;
type
TextBuf = array[0..TextRecBufSize-1] of char;
TextRec = Packed Record
Handle,
Mode,
bufsize,
_private,
bufpos,
bufend : longint;
bufptr : ^textbuf;
openfunc,
inou
文档评论(0)