* imagelist_cocreateinstance, a vista function added.

packages/winunits-base/src/commctrl.pp

@@ -632,6 +632,7 @@ CONST
 
 function ImageList_Create(cx:cint;cy:cint;flags:UINT;cInitial:cint;cGrow:cint):HIMAGELIST; stdcall; external commctrldll name 'ImageList_Create';
 function ImageList_Destroy(himl:HIMAGELIST):BOOL; stdcall; external commctrldll name 'ImageList_Destroy';
+function ImageList_CoCreateInstance(const rclsid:TCLSID; unkOuter:IUnknown; const riid:TIID;out ppv):HRESULT;stdcall; external commctrldll name 'ImageList_CoCreateInstance';
 
 function ImageList_GetImageCount(himl:HIMAGELIST):cint; stdcall; external commctrldll name 'ImageList_GetImageCount';
 {$ifdef ie3plus}