CreateFile(FileName, Mode : String) : File
Создать или открыть файл.

Функция CreateFile открывает или создает файл в режиме доступа Mode, список режимов перечислен в таблице:

R	Открыть файл только для чтения.
W	Для чтения и записи.
A	Для чтения и записи. Указатель находится в конце файла.
C	Создать новый файл. Если файл существует, то он будет очищен. Файл открывается для чтения и записи.

При работе с файлами больше 2 Гб, чтение свойств Size и Position вызывает исключение.

Пример:

Procedure OnCreate;
Var
  F : File;  
Begin   
  F := CreateFile('c:\test', 'w');
  F.WriteLn('Test1');
  F.WriteLn('Test2');
  F.WriteLn('Test3');
  F.WriteLn('Test4');  
  Warning('Размер файла '+ToStr(F.Size), '');
  F.Position := 0; //Установка указателя чтения записи на начало файла
  While Not F.Eof Do
    Alert('Строка фалйа: '+F.ReadLn, '');
  F.Size := 4; //Изменение размера файла
End;

© RTIT