| Вопрос: Запись переменной в файл | Добавлено: 24.08.04 13:43 |
Автор вопроса:  oleg-ff
|
|
Имеется такая ситуация
Type MYType s as string s1 as string s2 as string End Type Type MYType1 a as string a1 as string a2 as string End Type Type MYType2 d as string d1 as string d2 as string End Type Type MYType3 tp1() as MyType1 tp2() as MyType2 tp3() as MyType3 End Type Dim vr as MyType3 Можно ли как-нибудь загнать переменную vr в бинарный файл |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа: sne Разработчик Offline Client ICQ: 233286456 Вопросов: 34 Ответов: 5445 |
Web-сайт: Профиль | | #1 | Добавлено: 24.08.04 14:46 |
| Если бы у тебя все строки были бы объявлены с известной размерностью, т.е. as string * &h400 то можно было бы прямо брать и сохранять блоком памяти... а так можно только построчно сохранить, с каким-то разделителем... | ||
|
Номер ответа: 2 Автор ответа: CyRax  Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #2 | Добавлено: 24.08.04 22:28 |
| А PUT не пробовал? | ||
|
Номер ответа: 3 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #3 | Добавлено: 25.08.04 08:28 |
|
Сначала задай размерность массивов в типе. Затем
Dim hFile as Byte hFile=FreeFile Open "filename.dat" for Binary as hFile Put hFile,,vr Close hFile Еже ли нужна переменная размерность массивов, то введи Header файла (структуру), в которой указывай ее и еще что-нибудь, а затем сохраняй ее перед vr. |
||
Страница: 1 |