| файл$ = любой допустимый путь и имя файла. Возвращаемое значение – указатель на файл, который является целым значением (integer-число) |
| Эта
команда открывается определенный файл и подготавливает его для чтения.
Используйте ее для чтения ваших файлов конфигурации, сохраненных данных
игры и т.п. Она также полезна для считывания пользовательских типов
данных из файла. Указатель на файл, который возвращает функция,
является integer-числом. Операционная система использует его
для определения, из какого именно файла надо считывать. Указатель на
файл также должен быть использован с такими функциями, как ReadInt().
Если не удалось открыть файл (например, если он не существует),
указатель на файл будет равен 0. |
| ; Считывание и запись пользовательских типов в файлы,
используя ReadFile, WriteFile и CloseFile ; Инициализация некоторых переменных для примера Type HighScore Field Name$ Field Score% Field Level% End Type Best.HighScore = New HighScore BestName = "Марк" BestScore = 11657 BestLevel = 34 ; Открыть файл для записи fileout = WriteFile("mydata.dat") ; Записать информацию в файл WriteString( fileout, BestName ) WriteInt( fileout, BestScore ) WriteByte( fileout, BestLevel ) ; Закрыть файл CloseFile( fileout ) ; Открыть файл для считывания filein = ReadFile("mydata.dat") ; Считать наилучший результат (score) из файла Greatest.HighScore = New HighScore GreatestName$ = ReadString$( filein ) GreatestScore = ReadInt( filein ) GreatestLevel = ReadByte( filein ) ; Закрыть файл, как только считывание закончилось CloseFile( filein ) Print "Рекорд (HighScore), считанный из файла mydata.dat " Write "Name = " Print GreatestName Write "Score = " Print GreatestScore Write "Level = " Print GreatestLevel WaitKey() |