Image von TImageList bekommen

[xZise]

Ich würde gerne mit den Bildern aus einer ImageList zeichnen.
Es gibt zwar die Möglichkeit

Delphi-Quellcode:

TImageList.GetBitmap

Aber die ist bei (bis zu 3 * 256 Bildern) ziemlich zwecklos: Erstmal alle Bilder in Bitmaps laden und dann damit Arbeiten...
Ich dachte eher daran:

Delphi-Quellcode:

if TImageList.Count > Index then
  TImage.Canvas.Draw(X, Y, TImageList.Bitmap(Index));

Wobei Index die Position des Bildes in TImageList ist.

Im Grunde genommen ist (höchstwahrscheinlich), die "GetBitmap"-Methode ähnlich/gleich.

Welche Prozedur Empfehlt ihr?

[mkinzler]

Zitat:

ber die ist bei (bis zu 3 * 256 Bildern) ziemlich zwecklos: Erstmal alle Bilder in Bitmaps laden und dann damit Arbeiten...

Es reicht dir doch eine Referenzvariable für alle Bitmaps.

[Hawkeye219]

Zitat:

Zitat von mkinzler

Es reicht dir doch eine Referenzvariable für alle Bitmaps.

Oder ein Blick in die Delphi-Hilfe: TImageList.Draw

Gruß Hawkeye

[xZise]

Habe ich es also richtig erstanden, dass ich sie dynamisch laden soll? z.B. so:

Delphi-Quellcode:

var
  i : Byte;
  bm : TBitMap;
begin
  bm := TBitMap.Create;
  for i := 0 to 25 do
    if ImageListBla.GetBitMap(i, bm) then
      ImageBla.Canvas.Draw(Random(30), Random(30), bm)
end;

?
Da ist leider so, nicht ganz möglich, weil ich eine "Karte" zeichne, und dann auf mehere (256) gleichzeitig Zugriff haben muss (oder, ich mache es langsamer, indem ich jeweils immer nur ein Bitmap zeichne... Aber ich denke, es sollte auch anders funktionieren)

[Neutral General]

Delphi-Quellcode:

for i := 0 to 25 do 
 ImageList1.Draw(Image1.Canvas,0,0,random(ImageList1.Count));

so eher (hoffe die Parameter stimmen)

Gruß
Neutral General

[xZise]

Weiß ich jetzt nicht, aber der Beitrag bezog sich auf mkinzler.
Das mit Draw sieht gut aus (in der Hilfe nix gefunden, aber Codevervollstädigung ;) )!