Über die Methode
TImageList.GetBitmap kannst du ein Bild der ImageList in ein TBitmap kopieren. Die Methode hat auch einen Rückgabewert, der angibt, ob keine Fehler aufgetreten sind:
Delphi-Quellcode:
if not ImageList1.GetBitmap(i, Image1.Picture.Bitmap) then
// Irgendetwas schiefgegangen