如何在运行时将 TBitmap 对象添加到 TImageCollection 以与 TVirtualImageList 一起使用？

Question

我需要在运行时从

TImageCollection

对象加载一个

TVirtualImageList

以与

TBitmap

一起使用。您如何将它们加载到集合中并分配它们，以便

TVirtualImage

列表将为给定的索引/大小选择正确的图形？

背景是我需要将图标资源放入集合中，这意味着通过

TIcon

将

TBItmap

分配给

Assign()

TIA!!