Несколько параметров в SetLength

[Alex Cones]

Вот код, который я нашел в System:

procedure       _SetLength(s: PShortString; newLength: Byte);
begin
  Byte(s^[0]) := newLength;   // should also fill new space
end;

Что тогда происходит при таком запросе:

Var
 R : Array of Array of Single;

Begin
 SetLength(R, $F, $F);

Что-то я не врубаюсь, что происходит при задании длина сразу для нескольких параметров.

[Скандербег]

Несколько параметров - это для многомерных массивов.

For dynamic arrays, SetLength may take more than one length parameter (up to the number of array dimensions). Each parameter specifies the number of elements along a particular dimension.

[Alex Cones]

Ну это и ежу понятно. мне интересно другое. Выше я предоставил код функи. КУДА отправляется второй параметр? Там же для него места нет.

[NikLik]

А вас не смущает то, что приведённые вами функции имеют разные названия?

{ Predefined constants, types, procedures,}
{ and functions (such as True, Integer, or }
{ Writeln) do not have actual declarations.}
{ Instead they are built into the compiler }
{ and are treated as if they were declared }
{ at the beginning of the System unit. }

[Alex Cones]

Кроме этой _set... другой set... я в system не нашел.

Все равно. как может процедура принимать больше параметров, чем в ней указано? Если бы были несколько одинаковых функций (overload), то
1) Они бы высвечивались при наборе параметров.
2) Их бы пришлось писать около десятка тысяч - ведь я могу нарисовать и десятимерный массив и стомерный.

[Selestis]

Приведенный вами код не компилируется, если параметров больше чем положено. SetLength встроена в компилятор, вы не найдете её объявления, и delphi перед компиляцией смотрит, соответствует ли кол-во параметров размерности массива.

[Alex Cones]

Т.е. это не просто процедура, а самогенерирующаяся? И создать что-то подобное не получится?

[Selestis]

Вроде того, насколько я знаю. А вы хотите создать свою SetLength?

[Alex Cones]

Я хотел рассмотреть возможность использовать разное количество параметров для одной процедуры. Мало ли, где это может пригодиться.

[eoln]

Оно там есть. Посмотри процедуру _DynArraySetLength. SetLength является "заголовком" для неё. Размерность массива устанавливает _DynArraySetLength в числе параметров у которого есть упакованный тип tdynarraytypeinfo отвечающий за тип, размер элемента в массиве и указатель на следующую структуру в случае многомерных массивов.
Но как указано в документации "Она никогда не должна быть необходимой для вызова этой функции непосредственно, а стандартные SetLength функция должна использоваться вместо." (перевод с англ.)