Ich hab noch einen Fehler gefunden, aber den soll der TE selbst beheben
denkst du denn, der TE weiß, dass die ImageList bei 0 anfängt zu nummerieren?
es muss (für den TE) so lauten:
Delphi-Quellcode:
ImageList1.GetBitmap(Wurf1-1,Image1.Picture.Bitmap); //<-- Wenn Bitmaps in der Liste sind...
ImageList1.GetBitmap(Wurf2-1,Image2.Picture.Bitmap); //<-- Natürlich auch für das 2. Image
Noedel