|
|
III. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С ФАЙЛАМИ
5. Функции и процедуры низкоуровневого доступа к файлам
Функция FileOpen( const FileName: string; Mode: Integer ): Integer;
Модуль: SysUtils
Описание Функция открывает файл с именем FileName в режиме доступа, определенном параметром Mode. Значение режима доступа задается с помощью одной из констант fmOpen и одной из констант fmShare (см. таблицу ниже). Между указанными константами ставится оператор OR. Если файл успешно открыт, то функция возвращает дескриптор файла, иначе возвращается значение -1.
Константа |
Значение |
Описание |
fmOpenRead |
$0000 |
Только чтение |
fmOpenWrite |
$0001 |
Только запись |
fmOpenReadWrite |
$0002 |
Открытие для чтения и записи |
fmShareCompat |
$0000 |
Совместный доступ, посредством FCBs (File Control Blocks) |
fmShareExclusive |
$0010 |
Никакие другие приложения не могут открывать файл ни в каком режиме |
fmShareDenyWrite |
$0020 |
Другие приложения могут открывать файл только для записи |
fmShareDenyRead |
$0030 |
Другие приложения могут открывать файл только для чтения |
fmShareDenyNone |
$0040 |
Полный доступ для других приложений |
|
Данная функция использует низкоуровневый доступ к файлам, поэтому, во избежание возникновения проблем, рекомендуется вместо нее использовать процедуры AssignFile-Rewrite и AssignFile-Reset
Пример
var
FileHandle: Integer;
Data: string;
begin
...
FileHandle:= FileOpen('myfile.zzz', fmOpenWrite or fmShareDenyNone);
Date:= DateTimeToStr(FileDateToDateTime( FileGetDate(FileHandle)));
...
end;
|
[ Оглавление ]
|