Функции для работы с динамическими массивами

Posted by Chas under Delphi

Я в инете нашёл несколько функций для работы с дин.массивами, но использовать их почему-то не удаётся. Подскажите, что с ними делать, может для них надо подключить какую-то библиотеку или ещё чего?

Suny-o
Библиотека QuickSortStr.rar (GPL2) для быстрой сортировки динамического массива строк, а также добавления и удаления элементов в одномерном и двухмерном динамическом массиве строк.

Архив содержит программу пример.

Причины создания библиотеки:
Ограниченность числа элементов TStringList=129391
Специфичность алгоритма сортировки TStringList — одна буква z ставиться после длинного слова zoom т.е. zoom,z.

Пользоваться функциями сортировки очень просто — пример:

uses

QuickSortStr;

{Type

dinarr=array of string;

dinarr2=array of array of string;

Определен в QuickSortStr.pas}
var

strlist1:dinarr;

strlist2:dinarr2;
//alfavit - строка символов упорядоченная по вашему усмотрению

//Должна содержать все символы которые есть в массиве

//Быстрая сортировка по алфавиту примерно в 5 раз долше

//Чем приведенная ниже ускоренная сортировка по ASCII

//Примечание: критично для массива строк >50000

//Время сортировки для 50000 строк ~1 мин.

QuickSortRNDauto(alfavit,0,length(strlist1)-1,3,strlist1);
//Самый показательный пример

//Сортировка одномерного динамического массива строк strlist1

//от начала до конца

//Примечание: на месте 3 могут быть цифры от 1 до 10 и более

//1.Это трехкратный повтор внутренней процедуры быстрой сортировки

//2.И проверка отсортированности массива, если нет идем на 1

QuickSortFastRNDauto(0,length(strlist1)-1,3,strlist1);
//Тоже самое для подмассива двухмерного массива с индексом 1

QuickSort2FastRNDauto(1,0,length(strlist2[1])-1,3,strlist2);

тема на форуме

Похожие статьи

• Как передать динамический массив Tbitmap в процедуру
• Сдвиг элементов динамического массива после удаления элемента
• Выделить память под динамический массив
• Динамические массивы Turbo Pascal
• Использование нетипизированного указателя для передачи массива
• Как создать двумерный динамический массив?
• Пример заполнения динамического массива
• Создать динамический массив внутри функции так, чтобы он потом не уничтожился
• Избежать переполнение динамического массива