Понимание разницы в сортировке файлов в Windows Explorer и терминалах Linux

Delphi , Базы данных , Сортировка и Фильтр

В статье мы рассмотрим разницу в поведении сортировки файлов в Windows Explorer и терминалах Linux, а также научимся добиваться естественной сортировки в Delphi, подобной той, что используется в Windows Explorer.

Введение

При работе с файлами в разных операционных системах и программных средах мы можем столкнуться с разными алгоритмами сортировки. В этой статье мы рассмотрим две наиболее популярные ОС: Windows и Linux, а также среду разработки Delphi.

Сортировка в Windows Explorer

Windows Explorer использует алгоритм естественной сортировки (natural sort), который учитывает не только лексическую последовательность символов, но и порядок чисел, содержащихся в названиях файлов. Например, если у нас есть файлы с именами test_1_test.txt, test_2_test.txt, test_11_test.txt и test_12_test.txt, то Windows Explorer отобразит их в следующем порядке:

• test_1_test.txt
• test_2_test.txt
• test_11_test.txt
• test_12_test.txt

Сортировка в терминалах Linux

В терминалах Linux используется обычный алфавитный порядок сортировки. Чтобы получить естественную сортировку, нужно использовать опцию -v (в обратном порядке) с командой ls. Например, для вывода файлов в естественном порядке мы можем использовать команду ls -v.

Сортировка в Delphi

В Delphi для естественной сортировки можно использовать функцию StrCmpLogicalW из Windows API. Однако, если вы хотите добиться естественной сортировки в коде на Object Pascal, вам придется использовать рукописные функции или сторонние библиотеки.

Один из вариантов – воспользоваться оберткой для функции сравнения строк в естественном порядке, созданной Мартином Пулом (Martin Pool). Еще один вариант – реализовать алгоритм сортировки вручную, используя коды, доступные на сайте Dave Koelle.

Пример естественной сортировки в Delphi

Давайте напишем простой пример естественной сортировки в Delphi, используя обертку для функции сравнения строк в естественном порядке, созданную Мартином Пулом.

type
  TMyStringList = class(TStringList)
  protected
    function CompareStrings(const S1, S2: string): Integer; override;
  end;

function StrCmpLogicalW(P1, P2: PWideChar): Integer;  stdcall; external 'Shlwapi.dll';

function TMyStringList.CompareStrings(const S1, S2: string): Integer;
begin
  Result:= StrCmpLogicalW(PChar(S1), PChar(S2));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  SL: TMyStringList;
begin
  SL:= TMyStringList.Create;
  try
    SL.Add('test_1_test.txt');
    SL.Add('test_2_test.txt');
    SL.Add('test_11_test.txt');
    SL.Add('test_12_test.txt');
    SL.Add('test_21_test.txt');
    SL.Add('test_22_test.txt');
    SL.Sort;
    Memo1.Lines:= SL;
  finally
    SL.Free;
  end;
end;

В этом примере мы создаем наследник класса TStringList с переопределенной функцией сравнения CompareStrings. В этой функции мы используем функцию StrCmpLogicalW из Windows API для сравнения строк в естественном порядке. После добавления файлов в список SL мы вызываем метод Sort, и список автоматически сортируется в естественном порядке.

Заключение

В этой статье мы рассмотрели разницу в поведении сортировки файлов в Windows Explorer и терминалах Linux, а также научились добиваться естественной сортировки в Delphi, подобной той, что используется в Windows Explorer. Используя рукописные функции или сторонние библиотеки, мы можем добиться естественной сортировки в наших приложениях на Object Pascal.

Создано по материалам из источника по ссылке.

Статья объясняет отличие сортировки файлов в Windows Explorer и терминалах Linux, а также показывает, как добиться естественной сортировки в Delphi, подобной той, что используется в Windows Explorer.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Сортировка и Фильтр ::