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 :wink: )

Dankö 8)

[fkerber]

Hi!

Du musst nach dem Wechseln des Bildes noch

Delphi-Quellcode:

Image1.Refresh;

Machen, vorher aber Image1 nochmal "leeren", sonst legen sich die Bilder übereinander.

[F.W.]

Wie geht denn das mit dem leeren?