TFileStream.Create - 打开读写但允许其他人只读

Question

当同一个 exe 可能已经在读/写模式下打开了同一个文件（网络共享）时，我需要以只读模式打开一个文件。我必须至少允许其他用户读取该文件。

许多不同的用户在他们的机器上指向同一个共享文件时会同时启动 EXE。

我正面临"Cannot open file '<file>'. The process cannot access the file because it is being used by another process" 错误。

有什么办法可以解决吗？

以读/写模式打开的代码

TFileStream.Create(<file>, fmOpenReadWrite or fmShareDenyNone);

以只读模式打开的代码

TFileStream.Create(<file>, fmOpenRead);

Answer 1

根据this table（不要查找current version with messed up layout semantics）第二次调用必须至少具有相同的共享：

First call to CreateFile	Valid second calls to CreateFile
GENERIC_READ | GENERIC_WRITE with FILE_SHARE_READ | FILE_SHARE_WRITE	GENERIC_READ with FILE_SHARE_READ | FILE_SHARE_WRITE
	GENERIC_WRITE with FILE_SHARE_READ | FILE_SHARE_WRITE
	GENERIC_READ | GENERIC_WRITE with FILE_SHARE_READ | FILE_SHARE_WRITE

这意味着：第二次调用必须至少共享相同的内容。所以你必须调用

TFileStream.Create('filename', fmOpenRead or fmShareDenyNone);

...如果你想成功。

为什么这有意义？因为当第三个调用者想要打开文件时，操作系统不会维护第一个和第二个打开文件的时间列表，因此没有“第一个开启者比第二个开启者更正确”。如果第二个调用者将其从“全部共享”降低到“共享读取”，那么为什么第三个调用者要坚持这一点，而不是第一个调用者的“全部共享”模式？