| указатель_на_файл/поток = переменная, определенная командой OpenFile,
WriteFile или OpenTCPStream (версия 1.52 и выше) integer_число = целое число (может быть использовано дробное число, но оно будет преобразовано в тип integer перед сохранением, сохранится только его целочисленная часть) |
| Как только Вы открыли файл на диске (или поток) для записи,
используйте эту команду, чтобы записать одно short integer
(16 бит) значение в файл. Заметьте, что каждое записанное значение
использует 2 байта дискового пространства, и первым будет записан
«младший» байт. Диапазон записываемых значений – от 0 до 65535. Потоками можно пользоваться только в версии 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() |