Добавить изображение PNG в список изображений во время выполнения с помощью Delphi XE

Мне нужно добавить во время выполнения изображение в формате PNG в TImageList . Я просмотрел функции, реализованные в TCustomImageList , но они позволяют добавлять только

• растровых изображений,
• значков или
• изображений из другого списка изображений

Например:

function Add(Image, Mask: TBitmap): Integer;
function AddIcon(Image: TIcon): Integer;
function AddImage(Value: TCustomImageList; Index: Integer): Integer;
procedure AddImages(Value: TCustomImageList);
function AddMasked(Image: TBitmap; MaskColor: TColor): Integer;

Как я могу добавить изображение PNG в компонент ImageList без преобразования этого изображения в BMP?

IDE уже может добавить PNG в ImageList во время разработки:

Теперь нам нужно сделать это во время выполнения.