How to pass a bitmap parameter to a COM object?

[aruizdeinfante]

Hello
I'm using a COM control in VC++, and the way to pass a picture to the
control is throught this function
void SetObjImage(LPD ISPATCH ObjImage);

I have found the way to pass this parameter creating an image throught
CBitmap and CPictureHolder classes:

CPictureHolder pictholder ;
CBitmap bmpAux ;
bmpAux.LoadBitm ap (IDB_BITMAP1) ;
pictholder.Crea teFromBitmap((H BITMAP)bmpAux.D etach(), NULL, TRUE);
m_obj.SetObjIma ge (pictholder.Get PictureDispatch ()) ;

but now I want to get the images from a CImageList

// now IDB_BITMAP2 has more than a image
COLORREF crMask = ::GetSysColor (COLOR_HIGHLIGH T) ;
CImageList *ImgLst = new CImageList () ;
ImgLst->Create (IDB_BITMAP2, 16, 100, crMask) ;
IMAGEINFO imgInfo ;
// Get the first image from the list
if (ImgLst->GetImageInfo (0, &imgInfo)) {
HBITMAP hbm = (HBITMAP)imgInf o.hbmImage ;
pictholder.Crea teFromBitmap (hbm, NULL, TRUE) ;
m_obj.SetObjIma ge (pictholder.Get PictureDispatch ()) ;
} ;
delete ImgLst ;

This code doesn't works. It seems that anything is added to the
control, but I can't see the image.
Somebody knows why? How can I do this?
Thank you in advance.

[Sharad Kala]

<ar************ @yahoo.es> wrote in message

Hello
I'm using a COM control in VC++, and the way to pass a picture to the
control is throught this function
void SetObjImage(LPD ISPATCH ObjImage);

Off-topic.
Please read this - http://www.slack.net/~shiva/welcome.txt . By not posting
and replying to them we maintain the signal to noise ratio on this
newsgroup.

Thank you.