bild aus imagelist in Image

[bitsetter]

Noch eine andere Möglichkeit:

Delphi-Quellcode:

var
  Bild: TBitmap;
begin
  Bild:= TBitmap.Create;
  try
    imagelist1.GetBitmap(0, Bild);
    image1.Picture.Bitmap.Assign(Bild);
  finally
    Bild.Free;
  end;

Das geht sogar auch, ist bestimmt nicht so gut.

Delphi-Quellcode:

  
  image1.Picture.Bitmap:= nil;
  imagelist1.GetBitmap(0, image1.Picture.Bitmap);