А длинна массива на текущий момент нам всегда известна функциями Length и High.

А вот и нет как раз
Не всегда.
Или делать лишний цикл - один раз прогнать цикл для получения количества элементов, а второй раз для заполнения массива ?

Так это же - сами понимаете - дебилизм.......

Ну не пойдет код !!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
type
TStringArray = array of String;

procedure MyProc( Param: Integer; var Arr: TStringArray);
var
i: Integer;
begin
SetLength( Arr, Param);
for i := 0 to Param - 1 do
begin
Arr[ i] := 'String ¹ ' + IntToStr( i);
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
ArrSize: Integer;
Arr: TStringArray;
i: Integer;
begin
ArrSize := 12;
MyProc( ArrSize, Arr);
Memo1.Lines.Clear;
for i := 0 to ArrSize - 1 do
begin
Memo1.Lines.Add( Arr[ i]);
end;
end;
=============================
На строке
SetLength( Arr, Param);
Проверьте !

Low и High здесь не нужны.
И что вы все явно размерность прередаете.
Ну НЕ ЗНАЕТЕ вы сколько элементов будет в массиве.
Только в цикле это выяснится.......

Здесь писали о структурах с фоксом - .....
Если Паскаль не может массив передать и наполнить, куда ему уж до структур,

Не скажу, что крут, но сами видите - гибче

Остроумно
Но подождите, первую версию освою, потом вторую, пока до пятой дойду, воды много утечет...
Пятая же, как говорили - самая последняя - самая свежая Дельфи вроде как.....

Вроде как Дельфи 5,5 есть, но все пиратские....
Официально в Борланде 5,5 не было....

2 Alex_k

Так я ж и прошу помочь....
Но а насчет "не умеешь" - согласен, но насчет передачи массивов в процедуру - что мой, что здесь еще писалось 3 кода - все практически одинаковые, по крайней мере - механизхм одинаков,
И все равно - нигде не работает....

Спасибо за ссылку
Написал туда.
Надеюсь, помогут. Программеры должны помагать один одному.....
Спасибо большое

просто чувствуешь. что не потянешь, поэтому и боишься....
не уверен в себе.
Дельфишники обычно любят судить о том, что не знают как выглядит....