TFileStream.Create opens a file with read-only access.
Source position: classesh.inc line 76
const fmOpenRead = 0;