Сравнение данных в текстовых файлах

[SNUPY]

SQL-запросами

Ну вот тогда загоняете все данные по файлам в какую-нибудь FireBird Emdebed или SQLite и делаете запрос =))
Как вариант забить в гугл: "Поиск одинаковых элементов массива".

[Serge_Bliznykov]

Пытаюсь думать немного, но не все получается - вот и спрашиваю кое-какие моменты.

ясно.
ну желаю успехов, чтобы всё получилось.

Будут проблемы - обращайтесь!

Сообщение от SNUPY

Как вариант забить в гугл: "Поиск одинаковых элементов массива".

да ну. в данном случае элементы уже отсортированы! Поэтому алгоритм вырождается в банальное сравнение текущего элемента с предыдущим!!

[zhukovms]

Serge_Bliznykov
да ну. в данном случае элементы уже отсортированы! Поэтому алгоритм вырождается в банальное сравнение текущего элемента с предыдущим!!Не могу сообразить как сделать алгоритм сравнения строк в файлах

[Serge_Bliznykov]

Не могу сообразить как сделать алгоритм сравнения строк в файлах

Да забудь Вы уже про файлы. Всё. После выполнения процедуры DirSearch у Вас есть заполненные структуры данных.
Вот с ними и надо работать!

var
  PrevFName : string;
....
    DirSearch('C:\testLas\', '*.las', TFileNames, TFAreasNames);
    // сортировка по наименованию площади
    TFAreasNames.Sort;

    // выполнить поиск совпадений.
    PrevFName := '##$no prevvalues$##';
    for i := 0 to TFAreasNames.Count-1 do begin
      if TFAreasNames.Strings[i] = PrevFName then begin
          // совпадение найдено. Выводим его
          ......
      else 
         // текущее и предыдущие наименования не совпадают
         PrevFName := TFAreasNames.Strings[i];
    end;

допишите код вывода и всё. финита ля комедия.

[zhukovms]

Serge_Bliznykov, извиняюсь за назойливость, можете объяснить как переменная TFAreasNames берет из файла строчку с площадью? Никак не могу понять.
Вывод сделал совпадающих файлов с площадью, но не могу понять как сравнивается