GetFileWriteAccess - это функция
Доступен ли файл для записи
GetFileWriteAccess( <FullFileName> )
Полезные функции
Функции Delphi