Поиск сообщества

DelphiXE8, Android. Задача: загрузить в ImageList иконки 32х32 из базы данных. Проблема: Не получается Transparent никак. Как обычно перелопатил кучу форумов и ссылок и человеко-часов (эх vcl отнял бы 1 минуту...), и удалось написать тестовое приложение. Однако прозрачность никак не работает...иконка, что в тесте в поставке делфи идет, цвет розовый. В дизайне все ок, а вот самому... Закомментировал то что не помогает всеравно, но хотел показать что пробовал ). Проверяю результат по иконке что на кнопке через action. Иконка норм отображается, но с ней и розовый цвет... procedure TForm1.Button4Click(Sender: TObject); var Layer: TLayer; c: TCustomSourceItem; b: TCustomBitmapItem; d: TCustomDestinationItem; begin d := ImageList1.Destination.Add; Layer := ImageList1.Destination[d.Index].Layers.Add; Layer.SourceRect.Rect := TRectF.Create(0, 0, 32, 32); c := ImageList1.Source.Add; Layer.Name := c.Name; //c.MultiResBitmap.TransparentColor := TAlphaColorRec.Fuchsia; b := c.MultiResBitmap.Add; b.Bitmap.SetSize(32,32); b.Bitmap.LoadFromFile('C:\Delphi\Images\GlyFX\glyFX\Icons\Aero\BMP\32x32\eject_blue_32_h.bmp'); //b.Bitmap.Clear(TAlphaColorRec.Fuchsia); Action2.ImageIndex := 3; end;