PureBasic

CreateFile()

Синтаксис

Result = CreateFile(#File , Filename$ [, Flags])

Описание


Создаёт пустой файл.

Параметры

#File Номер, чтобы идентифицировать новый файл. В качестве этого параметра можно использовать значение #PB_Any, чтобы сгенерировать этот Номер автоматически.
Filename$ Имя, включая путь к новому файлу. Если имя файла не включает полный путь, оно интерпретируется относительно текущего каталога.
Flags (дополн.) Этот параметр может быть комбинацией следующих значений (с помощью оператора '|'): 
  #PB_File_SharedRead : Открытый файл может быть прочитан другим процессом (только для Windows).
  #PB_File_SharedWrite: Открытый файл может быть записан другим процессом (только для Windows).
  #PB_File_NoBuffering: Внутренняя система буферизации файлов PureBasic будет отключена для этого файла. 
                        FileBuffersSize() Не может использоваться в этом файле.
В сочетании с одним из следующих значений (следующие флаги влияют на поведение функций WriteString(), WriteStringN(), ReadString(), ReadCharacter() и WriteCharacter()): 
  #PB_Ascii  : Все операции чтения/записи строк будут в ascii, если не указано иное.
  #PB_UTF8   : Все операции чтения/записи строк будут в UTF-8, если не указано иное (по умолчанию).
  #PB_Unicode: Все операции чтения/записи строк будут в Unicode, если не указано иное.

Возвращаемое значение

Возвращает не нулевое значение, если файл был успешно создан, в случае ошибки возвращает ноль. Если в качестве параметра #File использовалось значение #PB_Any, то в случае успеха будет возвращен сгенерированный Номер.

Комментарии

Если файл уже существует, он будет перезаписан новым пустым файлом. Функция FileSize() может использоваться для определения наличия файла, таким образом пользователь может быть проинформирован о последствиях, прежде чем перезаписать файл.

Чтобы открыть существующий файл для чтения/записи, используйте функцию OpenFile(). Чтобы открыть файл только для чтения, используйте ReadFile().

Пример

If CreateFile(0, "Text.txt") ; Мы создаем новый текстовый файл...
    For a=1 To 10
        WriteStringN(0, "Line "+Str(a)) ; Мы пишем 10 строк (каждый с символом конца строки)
    Next
    For a=1 To 10
        WriteString(0, "String"+Str(a)) ; И теперь мы добавляем еще 10 строк в той же строке (потому что символ "конец строки" отсутствует)
    Next
    CloseFile(0) ; Закройте ранее открытый файл и таким образом сохраните записанные данные
Else
    MessageRequester("Инфо", "Не может создать файл!")
EndIf

См. также

OpenFile(), ReadFile(), CloseFile()

Поддерживаемые OS

Все

<- CloseFile() - Оглавление File - Eof()->