| 
| 
 | Вопрос # 4 515/ вопрос открыт / | 
 |  Доброго времени суток, уважаемые эксперты!
 имееться массив записей:
 
 type
 DataBase = Array[0..1000] of Record
 Name, ID, Address:string;
 Number, Count:integer;
 end;
 
 как сохранить его в фаил и загрузить из файла?
 
|  |   Вопрос задал: DimonZ (статус: Посетитель)Вопрос отправлен: 19 августа 2010, 15:40
 Состояние вопроса: открыт, ответов: 1.
 |  Ответ #1. Отвечает эксперт: min@y™ Очень просто. Берёшь TFileStream и пишешь в него в цикле все записи массива. Странно, что он у тебя статический, лучше бы воспользоваться динамическим. Структура файла будет такая:1. Кол-во записей - 4 байта.
 2. Длина поля Name 1-й записи - 4 байта.
 3. Поле Name - X байт.
 4. Длина поля ID 1-й записи - 4 байта.
 5. Поле ID - Y байт.
 6. Длина поля Address 1-й записи - 4 байта.
 7. Поле Address - Z байт.
 8. Поле Number - 4 байта.
 9. Поле Count - 4 байта.
 ... и т.д.
 Чтение делается также - для строковых типов сначала читается длина данных, затем выделяется память и в неё читается очередной блок из файла.
 
|  | Ответ отправил: min@y™ (статус: Доктор наук)Время отправки: 19 августа 2010, 16:05
 
 |  
 Мини-форум вопросаВсего сообщений: 2; последнее сообщение — 19 августа 2010, 16:39; участников в обсуждении: 2. 
|   | DimonZ (статус: Посетитель), 19 августа 2010, 16:39 [#2]:Спасибо за ответ , но так как я ещё чайник в программировании можно хотябы пример сохранения в фаил.
 |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |