Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Большие текстовые файлы [D7, XP]


Yusuf ©   (2006-08-05 20:13:00) 

Доброго времени суток.

Подскажите, пожалуйста, есть ли способ быстро работать с большими текстовыми файлами (около 17 Мб), при чем текстовый файл представляет собой что-то вроде базы данных. Запись в файле ведется следующим образом (пример):

Работник = {
 возраст = 25
 пол = муж
 должность = уборщик
 }
...

Автомобиль = {
 Марка = ВАЗ21010
 Номер = х001хх
 }
...

Заранее благодарю.


KilkennyCat   (2006-08-06 15:24:00) [1]

> [9] Ketmar ©   (06.08.06 15:09)

:)


> Yusuf ©   (06.08.06 11:28)


Если воспользоваться предложением [8], то типизированный файл - наиболее просто. Мой же совет [6] практически этому равен, усложнен лишь требованием сабжа к формату файла.


Ketmar   (2006-08-06 15:09:00) [2]

> [7] Yusuf ©   (06.08.06 11:28)


> поиск ведется в конец

долго думал. пытался представить. не смог.


Anatoly Podgoretsky   (2006-08-06 14:53:00) [3]

Пересмотреть идеологию.


Yusuf   (2006-08-06 11:28:00) [4]

1. Чаще всего поиск ведется в конец.
2. В каждом блоке может быть разный набор даныых. Например, в одном у работника возраст отмечен, в другом - нет.
3. Добавление данных не происходит.


KilkennyCat   (2006-08-06 10:39:00) [5]

Зафиксировать размер каждой записи, например, дополнив пробелами.


Virgo_Style   (2006-08-06 09:00:00) [6]

imho 17Mb - уже достаточно приличный размер.
Я бы рекомендовал прочитать статью про оптимизацию работы со строками, в свое время она мне весьма помогла.
При возможности - переделать для работы с БД.
Конечно, неплохо бы [1], для более детальных советов надо описать типичные задачи, например, нужен ли поиск, как часто и куда (в конец или в середину) происходит добавление данных, и т.п.


Пусик   (2006-08-05 23:45:00) [7]


> Yusuf ©   (05.08.06 20:13) 


Для файла такого небольшого размера вполне возможно для обработки воспользоваться TStringList.

var
 L: TStringList:
 i: Integer;
begin
 L := TStringList.Create;
 try
   L.LoadFromFile('MyFile.txt');
   for i := 0 to L.Count-1 do
   begin
//Обработка построчно
   end;
 finally
   L.Free;
 end;


Также можно, не загружая весь файл целиком, рабоьать с ним построчно.
См. TextFile, ReadLn, WriteLn
+ поиск по форуму.


Loginov Dmitry   (2006-08-05 21:10:00) [8]

Для начала: использовать функции для записи в файл и для чтения из него.


Yusuf   (2006-08-05 21:01:00) [9]

А подробнее можно?


Ketmar   (2006-08-05 20:59:00) [10]

есть. написать отптимизированный код.


Наверх

Титульная страница Поиск, карта сайта Написать письмо