- Код: Выделить всё
function SearchDublicates(const PCh: TCharMtDesc; PrLen: byte): TIndexes;
{TIndexes = array of array of word}
const
IndexInc = 16;
{...}
begin
SetLength(Result, IndexInc);
{здесь постепенно массив заполняться согласно алгоритму,
одномерные массивы из которых состоит Result имеют
разную длину которая вычисляется по мере исполнения}
{...}
{по окончанию алгоритма неиспользованная часть Result обрезается вот так}
SetLength(Result, GroupCnt); {GroupCnt <= Lenght(Result)}
end;
Так вот там где происходит отрезание излишков происходит SIGSEGV. В чем проблема?
Добавлено спустя 2 часа 11 минут 30 секунд:
Я разобрался, у меня была ошибка в описании типа динамического массива.
- Код: Выделить всё
SetLength(Result, GroupCnt); {это работает как надо}