Timagelist -> Timage

[danku]

über den letzten kommentar von dir sage ich mal nix...

im bezug auf den timer: das habe ich probiert mit einem interval von 100000.
funzt trotzdem nicht.

Delphi-Quellcode:

 ...
                  i:=0;
                  Image1.Picture.Assign(nil);
                  ImageList2.GetBitmap(i, Image1.Picture.Bitmap);
                  if i<ImageList2.count then inc(i)
                  else i:=0;

//Das steht im Timer:
var i:byte;
begin
I:=0;
Image1.Picture.Assign(nil);
    ImageList2.GetBitmap(i, Image1.Picture.Bitmap);
    if i<ImageList2.count-1 then inc(i)
        else i:=0;