ImageList

[Deven]

Hi zusammen

Ich habe eben eine Form gemacht, darauf ein Image und eine ImageList + 2 Buttons

Auf den Buttons habe ich folgendes geproggt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
ImageList1.Draw(Image1.Canvas,0,0,0);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ImageList1.Draw(Image1.Canvas,0,0,1);
end;

Kann mir jemand sagen warum das bild nicht ausgetauscht wird?

Wenn ich Button eins als erstes klicke ist ein bild im Image1 wenn ich dann Button2 drücke ändert sich das Bild aber nicht?

(Ja! es sind zwei verschiedene Bilder )

Dankö 8)