Перейти на главную   
  helloworld.ru - документация и книги по программированию  
helloworld.ru - документация и книги по программированию
    главная     хостинг    
Поиск по сайту:  
Смотрите также
Языки программирования
C#
MS Visual C++
Borland C++
C++ Builder
Visual Basic
Quick Basic
Turbo Pascal
Delphi
JavaScript
Java
PHP
Perl
Assembler
AutoLisp
Fortran
Python
1C

Интернет-технологии
HTML
VRML
HTTP
CGI
FTP
Proxy
DNS
протоколы TCP/IP
Apache

Web-дизайн
HTML
Дизайн
VRML
PhotoShop
Cookie
CGI
SSI
CSS
ASP
PHP
Perl

Программирование игр
DirectDraw
DirectSound
Direct3D
OpenGL
3D-графика
Графика под DOS

Алгоритмы
Численные методы
Обработка данных

Сис. программирование
Драйверы

Базы данных
MySQL
SQL

Другое

Хостинг


Друзья
demaker.ru
Реклама

Лучший хостинг. Аренда серверов




helloworld.ru

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;


[ Оглавление ]









helloworld.ru © 2001-2021
Все права защищены