Динамические массивы

← →
SkyRanger (2003-10-26 11:40) [0]

Пытался написать функцию для добавления нового значения в динамический массив

procedure AddPointToPointsArray(arr : DynVectorsArray; val : TGLVector);
Begin
SetLength(arr,Length(arr)+1);
arr[High(arr)]:=val;
End;

Тут явно проблема с передачей в функцию массива всего, так как при отладке видно, что массив пустой, хотя на самом деле это не так. А когда проходит программа вторую строчку массив опять становится пустым, т.е. вообще БЕЗ элементов, несмотря на то, что предыдущая строка устанавливает длину массива +1.
Где тут косяк и как правильно передать динамический массив внутрь этой функции???

← →
MBo (2003-10-26 11:42) [1]

AddPointToPointsArray( var arr : DynVectorsArray; val : TGLVector);

← →
SkyRanger (2003-10-26 11:50) [2]

Ааа ну да... Это же блин ссылка на массив по адресу на которую она указывается мы работаем с данными!
ГЫ! :) Заработало, спасибо!

Динамические массивы Найти похожие ветки