Страница: 1 |
Страница: 1 |
Вопрос: Сохранение переменной в файл
Добавлено: 23.07.04 00:35
Автор вопроса: De.MON
VB 6.0 категорически отказывается сохранять переменные сложных типов в файлы, считая, что они являются объектами (может и правда - не спорю).
Type A
strString As String
intInteger As Integer
End Type
Type B
strString1 As String
aVar As A
End Type
Dim bVariable As B
...
Put #intFh, 1, bVariable
Идти другим путём очень не хотелось бы, потому что при этом теряется масштабируемость программы.
Помогите, Please...
Ответы
Всего ответов: 5
Номер ответа: 1
Автор ответа:
@CyRax PTR
ICQ: 204447456
Вопросов: 28
Ответов: 664
Web-сайт:
Профиль | | #1
Добавлено: 23.07.04 00:43
Странно, а у меня даже такую сложную структуру сохраняет без проблем:
Private Type Include_Info
Count As Integer
Include() As String
End Type
Private Type ResInclude
Used As Boolean
ResName As String
End Type
Private Type Advanced
Used As Boolean
Index As Integer
End Type
Private Type Advanced_Str
Used As Boolean
Caption As String
Enabled As Boolean
End Type
Private Type New_Bas
Compile As Integer
StartFN As Integer
IncList As Include_Info
Resource As ResInclude
 imVar As Advanced
Register As Advanced
OptionVer As Advanced
Tools As Advanced
Stack As Advanced
 DT As Advanced_Str
NextTime As Integer
End Type
Private Props As New_Bas
Вот так:
Sub Save_NewBas()
FileName = Environ$("WINDIR" & "\VDA_NEW.CFG"
Open FileName For Binary As #1
Put #1, 1, Props
Close 1
End Sub
Номер ответа: 2
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #2
Добавлено: 23.07.04 01:40
Я всегда говорил, да здравствует бинарный доступ к файлам!!! Никогда другим и не пользовался, всегда и во всем его хватает...
Номер ответа: 3
Автор ответа:
@CyRax PTR
ICQ: 204447456
Вопросов: 28
Ответов: 664
Web-сайт:
Профиль | | #3
Добавлено: 23.07.04 01:52
Вообще то наверное лучше пользоваться Random.
Это у меня просто привычка использовать Binary.
Номер ответа: 4
Автор ответа:
Fallout
Вопросов: 10
Ответов: 387
Web-сайт:
Профиль | | #4
Добавлено: 23.07.04 08:56
нет самый быстрый это Binary.... Random медлеенее.. да и менее унифицированый... а привычка у тебя хорошая +) не порть...
Номер ответа: 5
Автор ответа:
De.MON
Вопросов: 8
Ответов: 9
Профиль | | #5
Добавлено: 25.07.04 02:20
Всем спасибо! Разобрался. Я не придал этому значения, а структура включала в себя enum, именно из-за этого VB и не хотел её сохранять. Учтём