Dynamicznie tworzone komponęty X100

Jak Zrobic dynamicznie np Komponęt Timage, tak zeby by mozna bylo go pomnozyc razy 100 . Kazdy z iną nazwą nap . image1,image2 ,... . kazdy mial to samo zdaze onmousedow.

var
Obrazek : array[0..99] of TImage;

For I := 0 to 99 do begin
Image[I] := TImage.Create(Self);
Image[I].Parent := Form1;
Image[I].Name := 'Image' + IntToStr(I);
end;--Pozdrawiam {hello}
Tomasz K.

dzieki to rozwiązuje moj problem:)
{brawo}