[0nni]

Код:

 imglist := ImageList_Create(8, 8, ILC_COLOR32 or  ILC_MASK or ILC_COLOR, 0, 0);
  ImageList_Add(imglist, LoadBitmap(HInstance, 'icons'), 0);

Если же вы работаете с VCL разумнене будет использовать TImageList