Timagelist -> Timage

[danku]

hi. ich will sobald ein bestimmtes ereignis eintrifft eine animation in form von einer timagelist starten. in der imagelist sind logischerweise mehrere bilder für die animation.
ich wollt die imagelist in ein "normales" image laden.

Delphi-Quellcode:

image1.Canvas.assign(imagelist2);

der compiler streikt. warum?

[mkinzler]

Du kannst auch nicht eine ImageList mit einem Image gleichsetzen.

[danku]

hm und welche andere alternative habe ich das ich timagelist anzeigen kann?

[mkinzler]

Du kannst keine ImageList anzeigen, du kannst höchstens die Bilder in der ImageList anzeigen. Schau mal z.B. nach ImageList.GetImages

[danku]

und wie kann ich die bilder von der imagelist in einem timage anzeigen?

[Hawkeye219]

Zitat:

Zitat von mkinzler

Schau mal z.B. nach ImageList.GetImages

Also ist der folgende Code ein guter Anfang:

Delphi-Quellcode:

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

Gruß Hawkeye

[danku]

ich hab im forum mal geschaut aber das problem war immer
das nur ein bild ausgewählt werden konnte..

genauso ist es bei
ImageList1.GetBitmap(0, Image1.Picture.Bitmap);

[Hawkeye219]

Ok, hier noch ein Versuch:

Delphi-Quellcode:

var 
  i : Integer;
begin
  with ImageList1 do
    begin
      Image1.Width := Count * Width;
      Image1.Height := Height;
      for i := 0 to Count - 1 do
        Draw (Image1.Canvas, i * Width, 0, i);
    end;
end;

Gruß Hawkeye

[Evian]

ich würd noch nen Sleep reinmachen, oder gleich nen Timer nutzen. Sonst sieht man nähmlich nicht wirklich was.

[Hawkeye219]

Zitat:

Zitat von Evian

ich würd noch nen Sleep reinmachen, oder gleich nen Timer nutzen. Sonst sieht man nähmlich nicht wirklich was.

Mit meinem Code wollte ich Daniel nur die Richtung aufzeigen, das eigentliche Problem möchte er sicher selbst lösen. Wenn du dir den 2. Parameter des Draw-Aufrufs anschaust, wirst du feststellen, daß ein Sleep an dieser Stelle nicht notwendig ist.

Gruß Hawkeye