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