Jak uzyskać efekt przezroczystości dla obrazków dodawanych do ImageList?
var
Bitmap : TBitmap;
HND : THandle;
begin
Bitmap := TBitmap.Create;
HND := LoadLibrary('graphics.dll');
if HND <> 0 then
begin
Bitmap.LoadFromResourceName(HND,'ID_BITMAP_01');
Bitmap.TransparentColor := clFuchsia;
Bitmap.Transparent := true;
ImageList1.Add(Bitmap,nil);
FreeLibrary(HND);
end;
Bitmap.Free;