Страница: 1 |
Как можно некоторые переменные запихнуть в любой тип файла, а потом достать их оттудава. Если можно на примере.
Попробуй такой код TYPE TestRecord DIM MyClass AS TestRecord OPEN "FINAL.DAT" FOR RANDOM AS #1 LEN = LEN(MyClass) Страница: 1 |
Вопрос: Сохранение и загрузка с файла
Добавлено: 21.10.02 02:39
Автор вопроса: Drag
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #1
Добавлено: 24.10.02 16:01
Student AS STRING * 20
Score AS SINGLE
END TYPE
MyClass.Student = "MarySa"
MyClass.Score = 99
PUT #1, 1, MyClass
CLOSE #1
OPEN "FINAL.DAT" FOR RANDOM AS #1 LEN = LEN(MyClass)
GET #1, 1, MyClass
PRINT "STUDENT:", MyClass.Student
PRINT "SCORE:", MyClass.Score
CLOSE #1
KILL "FINAL.DAT"