TFileStream怎么打开已经被打开的文件？(例如程序自身)
我用TFileStream打开程序自身出错，各种参数都试过，例如fmOpenRead,fmShareDenyNone等
都报共享错误，被其他程序打开
那么TFileStream怎么打开正在使用中的程序呢？例如可执行文件自身

[解决办法]
__fastcall TFileStream(const AnsiString FileName, Word Mode);

Mode使用fmShareDenyNone