como cargar varias imagenes en varios image1.picture

[[cHackAll]]

La respuesta es crear los objetos en tiempo de ejecución; necesitas dos variables y un vector... la primera variable es el índice del vector; la segunda (que puedes prescindir) es la posición en coordenadas de la nueva imagen; la que le toca y el tercero es (como ya lo comentaba) el vector de TImage.

Cada vez que añades una imagen le haces:

Código Delphi [-]
 Images[i] := TImage.Create(Self);
 Images[i].Picture.Loadfromfile( ...
 Images[i].visible := true;
 Images[i].parent := Form1;
 Images[i].AutoSize := True;
 Images[i].left := Xactual;
 Images[i].Top := 100;
 Inc(Xactual, Images[i].Width + 40);
 Inc(i);

En fin; la idea creo que ya la tienes.

Saludos