Проблема с Imagelist

← →
Владимир (2004-06-08 18:49) [0]

Народ помогите пожалуйста разобраться в такой штуке:
Заполняю Imagelist картинками Tbitmap
image1.add(bitmap,nil)
затем присваиваю кнопкам toolbar"a иконки из Imagelist
toolbutton1.imageindex:=0;
картинка на этой кнопе не имеет прозрачного цвета, если каждой кнопке присваивать свои значения imagelist и imagelist загрузить картинками на этапе выполнения создания программы (т.е. не програмно), то все цвета картинок на toolbar"a, совпадающие с координатой 1:1 становятся прозрачными. Как вернуть прозрачный цвет?

← →
TUser © (2004-06-08 18:55) [1]

См свойство DrawingStyle у TImageList"а

← →
Владимир (2004-06-08 19:37) [2]

> См свойство DrawingStyle у TImageList"а

Не помогает.

← →
grom (2004-06-09 09:05) [3]

можно написать премерно так
procedure TForm1.Button1Click(Sender: TObject);
var col:TColor ;
begin
col:=Image1.Picture.Bitmap.TransparentColor;
ImageList1.AddMasked(Image1.Picture.Bitmap,col);
ToolButton1.ImageIndex:=0;
end;
должно работать

Проблема с Imagelist Найти похожие ветки