Работа с динамическим массивом в подпрограмме

[promer]

Добрый день!
Работаю в Delphi 5

Определяю функцию:

function KDLD(var r_d: array of s_r_d): Boolean;
{********************************** ***********************
* В этой функции пытаюсь заполнить динамический массив, *
* и вернуть его вызывающей программе *
*********************************** **********************}
begin
SetLength(r_d, 0); // <- на этой строке компилятор дает: "Incompatible types
........
end;

Вопрос: как можно работать с динамическим массивом в процедуре (функции)?
Заранее благодарен за советы....

[Serge_Bliznykov]

тут путаница у Вас возникает.
дело в том, что когда Вы пишете

var xx : array of yyyy;

то это описание динамического массива

а когда Вы пишете

procedure ZZZ(var xx : array of yyyy);

то это массив-параметер открытого типа (см. в справке Open array parameters)

Вопрос: как можно работать с динамическим массивом в процедуре (функции)?

объявить нужный тип.
вот так, например

type MyDynArrayType = array of  s_r_d;
...

function KDLD(var r_d: MyDynArrayType): Boolean;
....

[promer]

Сработало! Спасибо за подсказку ....