Delphi-PRAXiS - Delphi Zufallbild auf entstehnde Images

Hallo,
ich möchte eine Art MEMO Spiel entwerfen, ich habe nun folgendes geschrieben.

Delphi-Quellcode:

			procedure TForm1.Button3Click(Sender: TObject);

var bilder: array[1..6] of TImage;

var i,z,y,zufallbild,zufallliste:integer;

begin

randomize;

i:=1; z:=0; y:=0;

for i:=1 to 6 do

        begin

        zufallliste:=random(3);

        zufallbild:=random(17);

        bilder[i]:=TImage.Create(self);

        bilder[i].Height:=100;

        bilder[i].Width:=100;

                if i > 3 then

                        begin bilder[i].Top:=140; end else

                begin

                bilder[i].Top:=20;

                end;

                if i > 3 then

                        begin z:=z+1; bilder[i].Left:=150*z; end else

                begin

                y:=y+1;

                bilder[i].Left:=150*y;

                end;

        if zufallliste >= 1 then begin ImageList1.GetBitmap(zufallbild,bilder[i].Picture.Bitmap);

        end else

        if zufallliste <= 2 then

        begin ImageList2.GetBitmap(zufallbild,bilder[i].Picture.Bitmap);

        end;

        end;

end;

end.

Nun habe ich überprüft ob das Programm entsprechend .Left .Top richtig setzt -> funktioniert
Ich habe 2 ImageList und beide sind auch gefüllt doch leider ist es nicht möglich irgendwie auf die entstehenden Images, BitMaps zupacken.
Wenn ich ein bereits erschaffenes Image habe und dort etwas hineinlade geht das doch wenn ich die erst auf (create) erstellt geht das nicht, hat jemand eine Idee.

Vielen Dank
Fire