• fmCreate = $FF00
• fmOpenRead = 0
• fmOpenWrite = 1
• fmOpenReadWrite = 2
• fmShareCompat = 0
• fmShareExclusive = $10
• fmShareDenyWrite = $20
• fmShareDenyRead = $30
• fmShareDenyNone = $40

Ссылки: TFileStream.Create