Как динамически выводить изображения на форму?

[Никки]

unit main;
interface
uses
  Windows, SysUtils, Classes, Graphics, Forms,
  Controls, Menus, ComCtrls, ExtCtrls, ImgList;
type
  TFormMain = class(TForm)
    Pole: TPanel;
    ImageList: TImageList;
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  FormMain: TFormMain;
  Fishki:Array[0..15] of TImage;

implementation
{$R *.dfm}
procedure TFormMain.FormCreate(Sender: TObject);
var
        i:word;
begin
        for i:=0 to 10 do begin
                Fishki[i]:=TImage.Create(Pole);
                ImageList.GetIcon(i,Fishki[i].Picture.Icon);
                Fishki[i].Top:=0;
                Fishki[i].Left:=i*50;  //  когда сдесь я указываю всё необходимое изображения почему то не появляются на форме!!
        end;
end;

procedure TFormMain.FormClose(Sender: TObject; var Action: TCloseAction);
var
        i:word;
begin
        for i:=0 to 10 do begin
                Fishki[i].Free;
        end;
end;

end.

Кто поможет.....

[Snoopy]

Fishki[i]:=TImage.Create(Pole);
           Fishki[i].Parent:=Pole;

[Никки]

Спасибо! Работает!