Как присвоить bitmap из ImageList в TImage?

← →
Erik © (2004-04-02 00:27) [0]

Я попробовал через Image.Picture.Bitmap но вышло кириво. Не все цвета перенеслись.

← →
Erik © (2004-04-02 10:04) [1]

Чегото тихо, наверное вчера перепраздновались. :)
Вот точный код
imIcon.Picture.Bitmap.Canvas.FillRect(imIcon.Picture.Bitmap.Canvas.ClipRect);
IMain.GetIcon(imIcon.Picture.Bitmap, Tag);

procedure TMainForm.GetIcon(Icon: TBitmap; Index: Integer);
begin
ilSelectionBar.GetBitmap(Index, Icon);
end;
ilSelectionBar: TImageList
imIcon: TImage;
Что с передачей цветов проблемы я уже писал. И еще в случае перерисовки окна, картинка останится?

Picture.Graphic

Как присвоить bitmap из ImageList в TImage? Найти похожие ветки