Динамические массивы как параметры

← →
Turalyon © (2002-03-14 10:00) [0]

Приветствую всех!
У меня такой вопрос "общего назначения". Можно ли передавать процедурам в качестве параметров динамические массивы, и на сколько это корректно... Учитывая то, что эти процедуры будут его изменять (и размеры и значения)...

← →
Виктор Щербаков © (2002-03-14 10:07) [1]

Передавать в функции можно, ведь Borland говорит, что
Dynamic-array variables are implicitly pointers and are managed by the same reference-counting technique used for long strings.
И даже приводит пример:
type TDynamicCharArray = array of Char; function Find(A: TDynamicCharArray): Integer;

← →
Turalyon © (2002-03-14 10:18) [2]

Сейчас попробывал сделать вот такую штуку...

procedure MyProc; var LArr : Array of MyType; begin DoSomething(LArr); end; ... procedure DoSomething(var LArr : Array of MyType); var k : integer; begin ... SetLength(LArr,k); ... end;

Ругается говорить несовместимые типы.... Если массив вынести в глобальные переменные, то все работает.

← →
Виктор Щербаков © (2002-03-14 10:31) [3]

Типы действительно не совместимые, ты путаешь динамические и открытые массивы. Я ведь не зря пример привел.

← →
Turalyon © (2002-03-14 10:43) [4]

Просвети пожалуйста Виктор, а в чем разница? Я так понял, что нельзя изменять размер переменных передаваемых в процедуры?

← →
Виктор Щербаков © (2002-03-14 10:46) [5]

Правильно будет так:

type TLArr: Array of MyType; procedure MyProc; var LArr : TLArr begin DoSomething(LArr); end; ... procedure DoSomething(LArr: TLAarr); var k : integer; begin ... SetLength(LArr,k); ... end;

Открытый массив в параметрах, значит, грубо говоря, статический (хотя и не известна заранее его размерность).

Случалось вроде, что (по типу)
procedure DoSomething(LArr: TLAarr);
проходит, а вот
procedure DoSomething(var LArr: TLAarr);
не проходит :(

Я не прав?

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