Как одну из картинок ImageList загружать в Image?

← →
i2e (2004-03-30 15:52) [0]

Чую, что просто, как сапог, но то ли вечер поздний, то ли чего - заклинило меня.
Люди, кто знает?

← →
Алхимик © (2004-03-30 19:29) [1]

GetBitmap(Index: Integer; Image: TBitmap);

← →
i2e (2004-03-31 09:04) [2]

Чего-то не могу разобраться, куда его пристроить.
Из ImageList1 пытаюсь грузить картинку с номером "3" в Image1.
Пусто.

tmpImage: TCustomImageList; tmpBitmap: TBitmap; ... tmpImage := TCustomImageList.Create(ImageList1); tmpImage.AddImages(ImageList1); tmpImage.GetBitmap(3, tmpBitmap); Image1.Picture.Bitmap := tmpBitmap;

Чего-то не хватает или совсем лажа? Ну не умею я с изображениями работать..

← →
Mitechka (2004-03-31 10:08) [3]

ImageList: TImageList;
SomeImage: TImage;

ImageList.GetBitmap(3,SomeImage.Picture.Bitmap);
SomeImage.Repaint;

Классы, которые кустом, лучше не надо :)

← →
i2e (2004-03-31 10:45) [4]

А еще можно так:

ImageList.Draw(SomeImage.Canvas, 0,0, 3); // 0,0- координаты. 3- порядковый номер рисунка SomeImage.Repaint; // а эта строка - просто находка :) без нее не перерисовывается. Я не знал.

Этот вариант и предыдущий работают.
Спасибо всем.

Как одну из картинок ImageList загружать в Image? Найти похожие ветки