如果不指定共享模式，则默认值为fmShareExclusive。

http://www.xuebuyuan.com/1948603.html

TFileStream类是TStream类的子类，它继承了TStream类的属性和方法。使用TFileStream类进行文件存取操作，首先要建立TFileStream类的实例。其构造方法Create声明如下：

constructor Create(const FileName; string; Mode: Word);

其中，参数FileName为包括路径的文件全名；Mode为文件打开方式，包括打开模式和共享模式，其取值和含义见表9-3。

表9-3 Mode参数的取值和含义

模   式	取   值	含   义
打开模式	fmCreate	用指定的文件名打开它，若文件已存在则打开
	fmOpenRead	以只读方式打开指定文件
	fmOpenWrite	以只写方式打开指定文件
	fmOpenRreadWrite	以读写方式打开指定文件
共享模式	fmShareCompat	共享模式与FCBs相兼容
	fmShareExclusive	独占方式打开指定文件
	fmShareDenyWrite	不允许别的程序以写的方式打开
	fmShareDenyRead	不允许别的程序以读的方式打开
	fmShareDenyNone	别的程序可以任何方式打开

例如，希望以只读的方式打开'E:\Temp\A.dat'文件，且不允许其他程序同时对该文件进行写操作，创建TFileStream类实例的语句如下：

f=TFileStream.Create('E:\Temp\A.dat', fmOpenRead or fmShareDenyWrite);

如果不指定共享模式，则默认值为fmShareExclusive。如果打开文件失败，则产生异常。