Ungültige Grafikgröße bei Imagelist!

[maximi]

Ich habe ein Problem. Das ist der Code:

Delphi-Quellcode:

...
var animationen:Array [0..10] of TImagelist;
...
  if(OpenPictureDialog1.Execute) then
  begin
    Image1.Picture.Bitmap.LoadFromFile(OpenPictureDialog1.FileName);
    animationen[0].Width := 200;
    animationen[0].Height := 200;
    button3.Enabled := true;
    for i := 0 to max do
      if(bilder < i) then
      begin
        animationen[0].Add(image1.picture.bitmap,image1.Picture.Bitmap);
        inc(bilder);
        break;
      end;
  end;

Ich bekomme eine Meldung, wenn meine "animationen" größer sind als das Bild, die Meldung "Ungültige Grafikgröße".
Danke!
Max

[Sharky]

Zitat von maximi:

...Ich bekomme eine Meldung, wenn meine "animationen" größer sind als das Bild, die Meldung "Ungültige Grafikgröße".
Danke!
Max

Hai Max,
kann es daran liegen?

Zitat von Onlinehilfe:

TImageList repräsentiert eine Kollektion von Bildern mit identischer Größe.

[maximi]

Ja, aber in einer Imagelist kann man doch auch die Bilder stretchen!! muss ich das machen, bevor ich die Bilder in die Imagelist lade?

[maximi]

Mein Bild hat eine Größe von 100 *100. Meine Imagelist hat aber eine Größe von 200 *200. Wie kann ich dieses Bild in die Imagelist laden, ohne dass ich die Meldung bekomme: "Ungültige Grafikgröße"?

Danke!