Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Сохранить структуру с данными в файл


Автор: swetik1981 6.9.2009, 15:13
В программе имеется структура данных, используемых при работе программы. Урощенно она выглядит так:

Type Stolby
NAME As String
Numer As Integer
Type As DataTypeEnum
End Type

Type BazaFiles
strType As String
OK() As Boolean
STOLBS() As Stolby
End Type

Type BazaProject
bFiles() As BazaFiles
NAME As String
End Type

Public myProject as BazaProject

Это очень упрощённая схема. В действительности она раза в три больше. Но суть не в этом. Надо как-то быстро сохранить данные в файл.

Напрашивается мысль делать это так:

Open "C:\Projects" For Random As #1
Put #1, ,myProject
close

Получаю ошибку:
Can't Get or Put an object reference variable or a variable of user-defined type containing an object reference
То есть при наличии вложенных типов сохранить их подобным образом в файл нельзя. 
Но может кто подскажет, как это сделать? Не развёртывать же всю структуру и сохранять каждый параметр по-отдельности?

Автор: Akina 6.9.2009, 22:01
Цитата(swetik1981 @  6.9.2009,  16:13 Найти цитируемый пост)
Не развёртывать же всю структуру и сохранять каждый параметр по-отдельности? 

Именно это и нужно делать. For Each в руки...

Автор: swetik1981 6.9.2009, 23:02
Цитата(Akina @ 6.9.2009,  22:01)

Именно это и нужно делать. For Each в руки...

Если можно - по-подробнее

Автор: Akina 7.9.2009, 07:50
 smile А что собсно нужно подробнее? 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)