| указатель_на_файл/поток = переменная, определенная командой OpenFile,
ReadFile или OpenTCPStream (версия 1.52 и выше) Возвращаемое значение – integer-число в диапазоне 0-65535 |
| Как только Вы открыли файл на диске (или поток) для чтения,
используйте эту команду для считывания одного short integer
(16 бит) значения из файла. Заметьте, что каждое записанное значение
использует 2 байта дискового пространства, и первым будет записан
«младший» байт. Чтение за пределами конца файла не вызовет ошибку, но
каждое считанное значение будет равно 0. Потоками можно пользоваться только в версии Blitz Basic 1.52 или выше. |
| ; Чтение и запись файла, используя функции ReadShort и
WriteShort ; Инициализировать несколько переменных для примера Int1% = 10; хранить 10 Int2% = 365; хранить 365 Int3% = 32767; 32767, максимальное положительное значение типа Short Integer в Blitz Basic ) Int4% = -32768; -32768, максимальное отрицательное значение типа Short Integer в Blitz Basic ) ; Открыть файл для записи fileout = WriteFile("mydata.dat") ; Записать информацию в файл WriteShort( fileout, Int1 ) WriteShort( fileout, Int2 ) WriteShort( fileout, Int3 ) WriteShort( fileout, Int4 ) ; Закрыть файл CloseFile( fileout ) ; Открыть файл для чтения filein = ReadFile("mydata.dat") Read1 = ReadShort( filein ) Read2 = ReadShort( filein ) Read3 = ReadShort( filein ) Read4 = ReadShort( filein ) ; Закрыть файл после завершения чтения CloseFile( filein ) Print "Данные типа Short Integer, считанные из файла mydata.dat " Print Read1 Print Read2 Print Read3 Print Read4 WaitKey() |