[Black Raider]

Попробуй так

Код:

for i := 0 to Form1.ComponentCount - 1 do
  if Form1.Component[i] is TPanel then
    begin
      SetLength(ArPanel, High(ArPanel) + 2);      //Установка размера массива большего на 1
      ArPanel[High(ArPanel)] := Form1.Controls[i];
    end;