[[Lepe]]

Código Delphi [-]

 for i:=low(ArPaneles) to high(ArPaneles) do // No uses el tipo de datos, sino la variable.
begin
   PnlImagen := TPanel.Create(PnlImagenes);
   PnlImagen.Parent := PnlImagenes;
   PnlImagen.Visible := true;

   Arpaneles[i] := pnlImagen; // guardas la referencia al panel creado. OJO ES UN PUNTERO.

   if i=0 then
     TamPanel(x,y,PnlImag) //Procedimiento que fija longitudes del panel
   else
     if i=1 then
       TamPanel(x div 2,y div 2,PnlImagen);

procedure TForm.CreaImagen(NumImag : Integer);
var
 i : integer;
begin
 
 for i:=0 to NUmImag-1 do
  begin
   Img := TImage.Create(ArPaneles[NImagenes]); //ahora si tiene un valor.
   Img.Parent := ArPaneles[NImagenes];//y aqui
   Img.Visible := true;
   Img.Align := alclient;
   Img.Stretch := true;
 end;
end;

Saludos