[Delphi] Obrazek

Oto kawałek kodu:

Bmp:=TBitmap.Create;
ImageList1.GetBitmap(0,Bmp);
Image1.Left:=random(600);
Image1.Top:=random(350);
Image1.Height:=135;
Image1.Width:=100;
Image1.Picture.Bitmap:=Bmp;

Jak zrobić by po klknięciu na Image1 zmienił się na inny obrazek? [???]

ImageList1.GetBitmap(0,Image1.Picture.Bitmap);

--
Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.