Delphi - ?Como agrego elementos image durante la ejecusion

Dios les Bendiga hermanos:

Necesito saber como puedo generar muchas veces el componente (image) durante la ejecusion del formulario.
Me refiero a esto para que me entiendan: image1, image2, image3, image4, image(n)... y que todos los elementos image que se van generando caigan en una coordenada determinada en el formulario.
Necesito que se genere muchas veces ese componente y que se vayan agregando al formulario mientras se crean automaticamente. Necesito aplicar esto para un programa que simula un proceso y necesito que cada vez que se genere un elemento (image), ponerle una imagen pequena.
ESPERO SU AYUDA, DIOS TE BENDIGA MUCHO.

[email protected]

Aquí te dejo el código, a ver si te sirve:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, JPEG;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
Contador: integer; //Para el nombre de la imagen
Izq, Alt: integer; //Coordenadas de la imagen
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject); //Creamos la imagen
var
MiImagen: TImage;
begin
MiImagen:=TImage.Create(Self);
MiImagen.Parent:=Self;
MiImagen.Name:='Imagen'+IntToStr(Contador);
MiImagen.Left:=Izq;
MiImagen.Top:=Alt;
MiImagen.Picture.LoadFromFile('C:/1.jpg');
MiImagen.Show;
inc(contador);
inc (Izq, 20);
inc (Alt, 10);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Contador:=0;
Izq:=0;
Alt:=0;
end;

end.

Saludos.