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