Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> array of record в файл 
:(
    Опции темы
arcsupport
Дата 17.8.2010, 10:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 725
Регистрация: 24.10.2008

Репутация: нет
Всего: 2
Есть такая вещь:
Код

ddd : array [1..512] of record
a : string;
b : TList of string;
c : integer;
end;
Как это дело наиболее компактно записать в файл?
PM MAIL   Вверх
xkor
Дата 17.8.2010, 10:33 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 51
Регистрация: 8.1.2007
Где: Питер

Репутация: 2
Всего: 4
arcsupport, TList of string это что? Не припоминаю такой конструкции.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
Matematik
Дата 17.8.2010, 22:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 7
Всего: 50
Компактно - это как? Маленький размер выходного файла или кода немного?
Если первое, xml\json\etc в gzip - универсально и файлик маленький.
Второе не получится с такой структурой
Код

record
a : string;
b : TList of string;
c : integer;
end;

Со string в записи придется извращаться.
Цитата(xkor @  17.8.2010,  10:33 Найти цитируемый пост)
TList of string это что? Не припоминаю такой конструкции. 

Аналогично.
PM MAIL WWW ICQ   Вверх
amsoft
Дата 18.8.2010, 09:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 201
Регистрация: 17.10.2009
Где: KZ, Astana

Репутация: 1
Всего: 4
Цитата(Matematik @  18.8.2010,  01:29 Найти цитируемый пост)
Со string в записи придется извращаться.

Под извращением понимается объявление строковой переменной заданной длины:
Код

a: string[32];

Фиксированная длина строки нужна, чтобы определить размер сохраняемой/считываемой записи
--------------------
"Кто бы ты ни был - не думай о себе слишком"Дельфин
PM   Вверх
Matematik
Дата 18.8.2010, 11:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 7
Всего: 50
amsoft, 
Цитата(amsoft @  18.8.2010,  09:27 Найти цитируемый пост)
Под извращением понимается объявление строковой переменной заданной длины:

Подойдет ли фикс. длина автору?
PM MAIL WWW ICQ   Вверх
amsoft
Дата 18.8.2010, 14:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 201
Регистрация: 17.10.2009
Где: KZ, Astana

Репутация: 1
Всего: 4
образец сохранения записи в файл:

Код

var
MyRec: record
       s1: string[8];
       s2: string[32];
       end;
NewFile: TFileStream;
...
NewFile := TFileStream.Create(<имя файла>,fmCreate);
NewFile.Position := 0;
NewFile.WriteBuffer(MyRec,SizeOf(MyRec));
NewFile.Free;


Это образец сохранения одной записи в файл. Если у тебя массив таких записей, то просто пробегай в цикле по массиву и сохраняй так каждый элемент.
--------------------
"Кто бы ты ни был - не думай о себе слишком"Дельфин
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0580 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.