Доступ к файлам faReadOnly

← →
User (2008-07-09 18:58) [0]

... потерялся я в простом вопросе:
стоит задача прочитать из какого-либо файла по несколько байтов, для чего задается проверка на "доступность":
{$I-} Reset(iFile); {$I+} if IOResult = 0 then ...
тут без проблем, но далее суть неувязки:
IOResult <> 0 выдает как для несуществующих файлов, запущенных приложений, так и для файлов с аттребутом faReadOnly (может и с faHidden и faSysFile, не проверял). Без такой проверки всё равно выдает ошибку 103 - оно то и правильно, но...
Как отделить "мух от катлет" и прочитать (не записать) байтики из файлов (они всё-таки только для чтения, а не для записи)?
Не менять же аттрибуты файлов, а потом их возвращать ...

← →
Поросенок Винни-Пух © (2008-07-09 19:03) [1]

with TFileStream.Create(".....",fmOpenRead) do .....

← →
Германн © (2008-07-09 19:20) [2]

FileMode

← →
User (2008-07-09 20:49) [3]

... а ларчик просто открывался ...
FileMode - то что надо! Благодарю ....

Доступ к файлам faReadOnly Найти похожие ветки