combobox skifter ikke billedet

Hvorfor kan jeg ikke få billedet til at skifte alt efter hvilke Itemindex der vælges i combobox?


procedure TForm1.ComboBox1Change(Sender: TObject);
begin
If combobox1.ItemIndex = 0 then
ImageList1.GetBitmap(0,Image1.Picture.Bitmap)
else
ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
end;