2 * ImageList implementation
4 * Copyright 1998 Eric Kohl
5 * Copyright 2000 Jason Mawdsley
6 * Copyright 2001, 2004 Michael Stefaniuc
7 * Copyright 2001 Charles Loep for CodeWeavers
8 * Copyright 2002 Dimitrie O. Paun
9 * Copyright 2009 Owen Rudge for CodeWeavers
11 * This library is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU Lesser General Public
13 * License as published by the Free Software Foundation; either
14 * version 2.1 of the License, or (at your option) any later version.
16 * This library is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * Lesser General Public License for more details.
21 * You should have received a copy of the GNU Lesser General Public
22 * License along with this library; if not, write to the Free Software
23 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
27 * This code was audited for completeness against the documented features
28 * of Comctl32.dll version 6.0 on Sep. 12, 2002, by Dimitrie O. Paun.
30 * Unless otherwise noted, we believe this code to be complete, as per
31 * the specification mentioned above.
32 * If you discover missing features, or bugs, please note them below.
35 * - Add support for ILD_PRESERVEALPHA, ILD_SCALE, ILD_DPISCALE
36 * - Add support for ILS_GLOW, ILS_SHADOW, ILS_SATURATE
37 * - Thread-safe locking
54 #include "commoncontrols.h"
55 #include "wine/debug.h"
56 #include "wine/exception.h"
58 WINE_DEFAULT_DEBUG_CHANNEL(imagelist
);
60 #define MAX_OVERLAYIMAGE 15
64 const struct IImageListVtbl
*lpVtbl
; /* 00: IImageList vtable */
66 INT cCurImage
; /* 04: ImageCount */
67 INT cMaxImage
; /* 08: maximages */
68 INT cGrow
; /* 0C: cGrow */
72 UINT flags
; /* 1C: flags */
73 COLORREF clrFg
; /* 20: foreground color */
74 COLORREF clrBk
; /* 24: background color */
77 HBITMAP hbmImage
; /* 28: images Bitmap */
78 HBITMAP hbmMask
; /* 2C: masks Bitmap */
79 HDC hdcImage
; /* 30: images MemDC */
80 HDC hdcMask
; /* 34: masks MemDC */
81 INT nOvlIdx
[MAX_OVERLAYIMAGE
]; /* 38: overlay images index */
83 /* not yet found out */
90 LONG ref
; /* reference count */
93 #define IMAGELIST_MAGIC 0x53414D58
95 /* Header used by ImageList_Read() and ImageList_Write() */
97 typedef struct _ILHEAD
112 /* internal image list data used for Drag & Drop operations */
117 /* position of the drag image relative to the window */
120 /* offset of the hotspot relative to the origin of the image */
123 /* is the drag image visible */
125 /* saved background */
129 static INTERNALDRAG InternalDrag
= { 0, 0, 0, 0, 0, 0, FALSE
, 0 };
131 static HBITMAP
ImageList_CreateImage(HDC hdc
, HIMAGELIST himl
, UINT count
);
132 static HRESULT
ImageListImpl_CreateInstance(const IUnknown
*pUnkOuter
, REFIID iid
, void** ppv
);
133 static inline BOOL
is_valid(HIMAGELIST himl
);
136 * An imagelist with N images is tiled like this:
148 static inline UINT
imagelist_height( UINT count
)
150 return ((count
+ TILE_COUNT
- 1)/TILE_COUNT
);
153 static inline void imagelist_point_from_index( HIMAGELIST himl
, UINT index
, LPPOINT pt
)
155 pt
->x
= (index
%TILE_COUNT
) * himl
->cx
;
156 pt
->y
= (index
/TILE_COUNT
) * himl
->cy
;
159 static inline void imagelist_get_bitmap_size( HIMAGELIST himl
, UINT count
, SIZE
*sz
)
161 sz
->cx
= himl
->cx
* TILE_COUNT
;
162 sz
->cy
= imagelist_height( count
) * himl
->cy
;
165 static inline int get_dib_stride( int width
, int bpp
)
167 return ((width
* bpp
+ 31) >> 3) & ~3;
170 static inline int get_dib_image_size( const BITMAPINFO
*info
)
172 return get_dib_stride( info
->bmiHeader
.biWidth
, info
->bmiHeader
.biBitCount
)
173 * abs( info
->bmiHeader
.biHeight
);
177 * imagelist_copy_images()
179 * Copies a block of count images from offset src in the list to offset dest.
180 * Images are copied a row at at time. Assumes hdcSrc and hdcDest are different.
182 static inline void imagelist_copy_images( HIMAGELIST himl
, HDC hdcSrc
, HDC hdcDest
,
183 UINT src
, UINT count
, UINT dest
)
189 for ( i
=0; i
<TILE_COUNT
; i
++ )
191 imagelist_point_from_index( himl
, src
+i
, &ptSrc
);
192 imagelist_point_from_index( himl
, dest
+i
, &ptDest
);
194 sz
.cy
= himl
->cy
* imagelist_height( count
- i
);
196 BitBlt( hdcDest
, ptDest
.x
, ptDest
.y
, sz
.cx
, sz
.cy
,
197 hdcSrc
, ptSrc
.x
, ptSrc
.y
, SRCCOPY
);
201 static void add_dib_bits( HIMAGELIST himl
, int pos
, int count
, int width
, int height
,
202 BITMAPINFO
*info
, BITMAPINFO
*mask_info
, DWORD
*bits
, BYTE
*mask_bits
)
206 int stride
= info
->bmiHeader
.biWidth
;
207 int mask_stride
= (info
->bmiHeader
.biWidth
+ 31) / 32 * 4;
209 for (n
= 0; n
< count
; n
++)
213 imagelist_point_from_index( himl
, pos
+ n
, &pt
);
215 /* check if bitmap has an alpha channel */
216 for (i
= 0; i
< height
&& !has_alpha
; i
++)
217 for (j
= n
* width
; j
< (n
+ 1) * width
; j
++)
218 if ((has_alpha
= ((bits
[i
* stride
+ j
] & 0xff000000) != 0))) break;
220 if (!has_alpha
) /* generate alpha channel from the mask */
222 for (i
= 0; i
< height
; i
++)
223 for (j
= n
* width
; j
< (n
+ 1) * width
; j
++)
224 if (!mask_info
|| !((mask_bits
[i
* mask_stride
+ j
/ 8] << (j
% 8)) & 0x80))
225 bits
[i
* stride
+ j
] |= 0xff000000;
227 bits
[i
* stride
+ j
] = 0;
231 himl
->has_alpha
[pos
+ n
] = 1;
233 if (mask_info
&& himl
->hbmMask
) /* generate the mask from the alpha channel */
235 for (i
= 0; i
< height
; i
++)
236 for (j
= n
* width
; j
< (n
+ 1) * width
; j
++)
237 if ((bits
[i
* stride
+ j
] >> 24) > 25) /* more than 10% alpha */
238 mask_bits
[i
* mask_stride
+ j
/ 8] &= ~(0x80 >> (j
% 8));
240 mask_bits
[i
* mask_stride
+ j
/ 8] |= 0x80 >> (j
% 8);
243 StretchDIBits( himl
->hdcImage
, pt
.x
, pt
.y
, himl
->cx
, himl
->cy
,
244 n
* width
, 0, width
, height
, bits
, info
, DIB_RGB_COLORS
, SRCCOPY
);
246 StretchDIBits( himl
->hdcMask
, pt
.x
, pt
.y
, himl
->cx
, himl
->cy
,
247 n
* width
, 0, width
, height
, mask_bits
, mask_info
, DIB_RGB_COLORS
, SRCCOPY
);
251 /* add images with an alpha channel when the image list is 32 bpp */
252 static BOOL
add_with_alpha( HIMAGELIST himl
, HDC hdc
, int pos
, int count
,
253 int width
, int height
, HBITMAP hbmImage
, HBITMAP hbmMask
)
257 BITMAPINFO
*info
, *mask_info
= NULL
;
259 BYTE
*mask_bits
= NULL
;
262 if (!GetObjectW( hbmImage
, sizeof(bm
), &bm
)) return FALSE
;
264 /* if either the imagelist or the source bitmap don't have an alpha channel, bail out now */
265 if (!himl
->has_alpha
) return FALSE
;
266 if (bm
.bmBitsPixel
!= 32) return FALSE
;
268 SelectObject( hdc
, hbmImage
);
269 mask_width
= (bm
.bmWidth
+ 31) / 32 * 4;
271 if (!(info
= HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO
, bmiColors
[256] )))) goto done
;
272 info
->bmiHeader
.biSize
= sizeof(BITMAPINFOHEADER
);
273 info
->bmiHeader
.biWidth
= bm
.bmWidth
;
274 info
->bmiHeader
.biHeight
= -height
;
275 info
->bmiHeader
.biPlanes
= 1;
276 info
->bmiHeader
.biBitCount
= 32;
277 info
->bmiHeader
.biCompression
= BI_RGB
;
278 info
->bmiHeader
.biSizeImage
= bm
.bmWidth
* height
* 4;
279 info
->bmiHeader
.biXPelsPerMeter
= 0;
280 info
->bmiHeader
.biYPelsPerMeter
= 0;
281 info
->bmiHeader
.biClrUsed
= 0;
282 info
->bmiHeader
.biClrImportant
= 0;
283 if (!(bits
= HeapAlloc( GetProcessHeap(), 0, info
->bmiHeader
.biSizeImage
))) goto done
;
284 if (!GetDIBits( hdc
, hbmImage
, 0, height
, bits
, info
, DIB_RGB_COLORS
)) goto done
;
288 if (!(mask_info
= HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO
, bmiColors
[2] ))))
290 mask_info
->bmiHeader
= info
->bmiHeader
;
291 mask_info
->bmiHeader
.biBitCount
= 1;
292 mask_info
->bmiHeader
.biSizeImage
= mask_width
* height
;
293 if (!(mask_bits
= HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY
, info
->bmiHeader
.biSizeImage
)))
295 if (!GetDIBits( hdc
, hbmMask
, 0, height
, mask_bits
, mask_info
, DIB_RGB_COLORS
)) goto done
;
298 add_dib_bits( himl
, pos
, count
, width
, height
, info
, mask_info
, bits
, mask_bits
);
302 HeapFree( GetProcessHeap(), 0, info
);
303 HeapFree( GetProcessHeap(), 0, mask_info
);
304 HeapFree( GetProcessHeap(), 0, bits
);
305 HeapFree( GetProcessHeap(), 0, mask_bits
);
309 /*************************************************************************
310 * IMAGELIST_InternalExpandBitmaps [Internal]
312 * Expands the bitmaps of an image list by the given number of images.
315 * himl [I] handle to image list
316 * nImageCount [I] number of images to add
322 * This function CANNOT be used to reduce the number of images.
325 IMAGELIST_InternalExpandBitmaps(HIMAGELIST himl
, INT nImageCount
)
328 HBITMAP hbmNewBitmap
, hbmNull
;
332 TRACE("%p has allocated %d, max %d, grow %d images\n", himl
, himl
->cCurImage
, himl
->cMaxImage
, himl
->cGrow
);
334 if (himl
->cCurImage
+ nImageCount
< himl
->cMaxImage
)
337 nNewCount
= himl
->cMaxImage
+ max(nImageCount
, himl
->cGrow
) + 1;
339 imagelist_get_bitmap_size(himl
, nNewCount
, &sz
);
341 TRACE("Create expanded bitmaps : himl=%p x=%d y=%d count=%d\n", himl
, sz
.cx
, sz
.cy
, nNewCount
);
342 hdcBitmap
= CreateCompatibleDC (0);
344 hbmNewBitmap
= ImageList_CreateImage(hdcBitmap
, himl
, nNewCount
);
346 if (hbmNewBitmap
== 0)
347 ERR("creating new image bitmap (x=%d y=%d)!\n", sz
.cx
, sz
.cy
);
351 hbmNull
= SelectObject (hdcBitmap
, hbmNewBitmap
);
352 BitBlt (hdcBitmap
, 0, 0, sz
.cx
, sz
.cy
,
353 himl
->hdcImage
, 0, 0, SRCCOPY
);
354 SelectObject (hdcBitmap
, hbmNull
);
356 SelectObject (himl
->hdcImage
, hbmNewBitmap
);
357 DeleteObject (himl
->hbmImage
);
358 himl
->hbmImage
= hbmNewBitmap
;
360 if (himl
->flags
& ILC_MASK
)
362 hbmNewBitmap
= CreateBitmap (sz
.cx
, sz
.cy
, 1, 1, NULL
);
364 if (hbmNewBitmap
== 0)
365 ERR("creating new mask bitmap!\n");
369 hbmNull
= SelectObject (hdcBitmap
, hbmNewBitmap
);
370 BitBlt (hdcBitmap
, 0, 0, sz
.cx
, sz
.cy
,
371 himl
->hdcMask
, 0, 0, SRCCOPY
);
372 SelectObject (hdcBitmap
, hbmNull
);
374 SelectObject (himl
->hdcMask
, hbmNewBitmap
);
375 DeleteObject (himl
->hbmMask
);
376 himl
->hbmMask
= hbmNewBitmap
;
381 char *new_alpha
= HeapReAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY
, himl
->has_alpha
, nNewCount
);
382 if (new_alpha
) himl
->has_alpha
= new_alpha
;
385 HeapFree( GetProcessHeap(), 0, himl
->has_alpha
);
386 himl
->has_alpha
= NULL
;
390 himl
->cMaxImage
= nNewCount
;
392 DeleteDC (hdcBitmap
);
396 /*************************************************************************
397 * ImageList_Add [COMCTL32.@]
399 * Add an image or images to an image list.
402 * himl [I] handle to image list
403 * hbmImage [I] handle to image bitmap
404 * hbmMask [I] handle to mask bitmap
407 * Success: Index of the first new image.
412 ImageList_Add (HIMAGELIST himl
, HBITMAP hbmImage
, HBITMAP hbmMask
)
414 HDC hdcBitmap
, hdcTemp
= 0;
415 INT nFirstIndex
, nImageCount
, i
;
419 TRACE("himl=%p hbmimage=%p hbmmask=%p\n", himl
, hbmImage
, hbmMask
);
423 if (!GetObjectW(hbmImage
, sizeof(BITMAP
), &bmp
))
426 TRACE("himl %p, cCurImage %d, cMaxImage %d, cGrow %d, cx %d, cy %d\n",
427 himl
, himl
->cCurImage
, himl
->cMaxImage
, himl
->cGrow
, himl
->cx
, himl
->cy
);
429 nImageCount
= bmp
.bmWidth
/ himl
->cx
;
431 TRACE("%p has %d images (%d x %d)\n", hbmImage
, nImageCount
, bmp
.bmWidth
, bmp
.bmHeight
);
433 IMAGELIST_InternalExpandBitmaps(himl
, nImageCount
);
435 hdcBitmap
= CreateCompatibleDC(0);
437 SelectObject(hdcBitmap
, hbmImage
);
439 if (add_with_alpha( himl
, hdcBitmap
, himl
->cCurImage
, nImageCount
,
440 himl
->cx
, min( himl
->cy
, bmp
.bmHeight
), hbmImage
, hbmMask
))
445 hdcTemp
= CreateCompatibleDC(0);
446 SelectObject(hdcTemp
, hbmMask
);
449 for (i
=0; i
<nImageCount
; i
++)
451 imagelist_point_from_index( himl
, himl
->cCurImage
+ i
, &pt
);
453 /* Copy result to the imagelist
455 BitBlt( himl
->hdcImage
, pt
.x
, pt
.y
, himl
->cx
, bmp
.bmHeight
,
456 hdcBitmap
, i
*himl
->cx
, 0, SRCCOPY
);
461 BitBlt( himl
->hdcMask
, pt
.x
, pt
.y
, himl
->cx
, bmp
.bmHeight
,
462 hdcTemp
, i
*himl
->cx
, 0, SRCCOPY
);
464 /* Remove the background from the image
466 BitBlt( himl
->hdcImage
, pt
.x
, pt
.y
, himl
->cx
, bmp
.bmHeight
,
467 himl
->hdcMask
, pt
.x
, pt
.y
, 0x220326 ); /* NOTSRCAND */
469 if (hdcTemp
) DeleteDC(hdcTemp
);
474 nFirstIndex
= himl
->cCurImage
;
475 himl
->cCurImage
+= nImageCount
;
481 /*************************************************************************
482 * ImageList_AddIcon [COMCTL32.@]
484 * Adds an icon to an image list.
487 * himl [I] handle to image list
488 * hIcon [I] handle to icon
491 * Success: index of the new image
494 #undef ImageList_AddIcon
495 INT WINAPI
ImageList_AddIcon (HIMAGELIST himl
, HICON hIcon
)
497 return ImageList_ReplaceIcon (himl
, -1, hIcon
);
501 /*************************************************************************
502 * ImageList_AddMasked [COMCTL32.@]
504 * Adds an image or images to an image list and creates a mask from the
505 * specified bitmap using the mask color.
508 * himl [I] handle to image list.
509 * hBitmap [I] handle to bitmap
510 * clrMask [I] mask color.
513 * Success: Index of the first new image.
518 ImageList_AddMasked (HIMAGELIST himl
, HBITMAP hBitmap
, COLORREF clrMask
)
520 HDC hdcMask
, hdcBitmap
;
526 TRACE("himl=%p hbitmap=%p clrmask=%x\n", himl
, hBitmap
, clrMask
);
530 if (!GetObjectW(hBitmap
, sizeof(BITMAP
), &bmp
))
533 hdcBitmap
= CreateCompatibleDC(0);
534 SelectObject(hdcBitmap
, hBitmap
);
536 /* Create a temp Mask so we can remove the background of the Image */
537 hdcMask
= CreateCompatibleDC(0);
538 hMaskBitmap
= CreateBitmap(bmp
.bmWidth
, bmp
.bmHeight
, 1, 1, NULL
);
539 SelectObject(hdcMask
, hMaskBitmap
);
541 /* create monochrome image to the mask bitmap */
542 bkColor
= (clrMask
!= CLR_DEFAULT
) ? clrMask
: GetPixel (hdcBitmap
, 0, 0);
543 SetBkColor (hdcBitmap
, bkColor
);
544 BitBlt (hdcMask
, 0, 0, bmp
.bmWidth
, bmp
.bmHeight
, hdcBitmap
, 0, 0, SRCCOPY
);
547 * Remove the background from the image
549 * WINDOWS BUG ALERT!!!!!!
550 * The statement below should not be done in common practice
551 * but this is how ImageList_AddMasked works in Windows.
552 * It overwrites the original bitmap passed, this was discovered
553 * by using the same bitmap to iterate the different styles
554 * on windows where it failed (BUT ImageList_Add is OK)
555 * This is here in case some apps rely on this bug
557 * Blt mode 0x220326 is NOTSRCAND
559 if (bmp
.bmBitsPixel
> 8) /* NOTSRCAND can't work with palettes */
561 SetBkColor(hdcBitmap
, RGB(255,255,255));
562 BitBlt(hdcBitmap
, 0, 0, bmp
.bmWidth
, bmp
.bmHeight
, hdcMask
, 0, 0, 0x220326);
568 ret
= ImageList_Add( himl
, hBitmap
, hMaskBitmap
);
570 DeleteObject(hMaskBitmap
);
575 /*************************************************************************
576 * ImageList_BeginDrag [COMCTL32.@]
578 * Creates a temporary image list that contains one image. It will be used
582 * himlTrack [I] handle to the source image list
583 * iTrack [I] index of the drag image in the source image list
584 * dxHotspot [I] X position of the hot spot of the drag image
585 * dyHotspot [I] Y position of the hot spot of the drag image
593 ImageList_BeginDrag (HIMAGELIST himlTrack
, INT iTrack
,
594 INT dxHotspot
, INT dyHotspot
)
598 TRACE("(himlTrack=%p iTrack=%d dx=%d dy=%d)\n", himlTrack
, iTrack
,
599 dxHotspot
, dyHotspot
);
601 if (!is_valid(himlTrack
))
604 if (InternalDrag
.himl
)
605 ImageList_EndDrag ();
610 InternalDrag
.himl
= ImageList_Create (cx
, cy
, himlTrack
->flags
, 1, 1);
611 if (InternalDrag
.himl
== NULL
) {
612 WARN("Error creating drag image list!\n");
616 InternalDrag
.dxHotspot
= dxHotspot
;
617 InternalDrag
.dyHotspot
= dyHotspot
;
620 BitBlt (InternalDrag
.himl
->hdcImage
, 0, 0, cx
, cy
, himlTrack
->hdcImage
, iTrack
* cx
, 0, SRCCOPY
);
623 BitBlt (InternalDrag
.himl
->hdcMask
, 0, 0, cx
, cy
, himlTrack
->hdcMask
, iTrack
* cx
, 0, SRCCOPY
);
625 InternalDrag
.himl
->cCurImage
= 1;
631 /*************************************************************************
632 * ImageList_Copy [COMCTL32.@]
634 * Copies an image of the source image list to an image of the
635 * destination image list. Images can be copied or swapped.
638 * himlDst [I] handle to the destination image list
639 * iDst [I] destination image index.
640 * himlSrc [I] handle to the source image list
641 * iSrc [I] source image index
642 * uFlags [I] flags for the copy operation
649 * Copying from one image list to another is possible. The original
650 * implementation just copies or swaps within one image list.
651 * Could this feature become a bug??? ;-)
655 ImageList_Copy (HIMAGELIST himlDst
, INT iDst
, HIMAGELIST himlSrc
,
656 INT iSrc
, UINT uFlags
)
660 TRACE("himlDst=%p iDst=%d himlSrc=%p iSrc=%d\n", himlDst
, iDst
, himlSrc
, iSrc
);
662 if (!is_valid(himlSrc
) || !is_valid(himlDst
))
664 if ((iDst
< 0) || (iDst
>= himlDst
->cCurImage
))
666 if ((iSrc
< 0) || (iSrc
>= himlSrc
->cCurImage
))
669 imagelist_point_from_index( himlDst
, iDst
, &ptDst
);
670 imagelist_point_from_index( himlSrc
, iSrc
, &ptSrc
);
672 if (uFlags
& ILCF_SWAP
) {
675 HBITMAP hbmTempImage
, hbmTempMask
;
677 hdcBmp
= CreateCompatibleDC (0);
679 /* create temporary bitmaps */
680 hbmTempImage
= CreateBitmap (himlSrc
->cx
, himlSrc
->cy
, 1,
681 himlSrc
->uBitsPixel
, NULL
);
682 hbmTempMask
= CreateBitmap (himlSrc
->cx
, himlSrc
->cy
, 1,
685 /* copy (and stretch) destination to temporary bitmaps.(save) */
687 SelectObject (hdcBmp
, hbmTempImage
);
688 StretchBlt (hdcBmp
, 0, 0, himlSrc
->cx
, himlSrc
->cy
,
689 himlDst
->hdcImage
, ptDst
.x
, ptDst
.y
, himlDst
->cx
, himlDst
->cy
,
692 SelectObject (hdcBmp
, hbmTempMask
);
693 StretchBlt (hdcBmp
, 0, 0, himlSrc
->cx
, himlSrc
->cy
,
694 himlDst
->hdcMask
, ptDst
.x
, ptDst
.y
, himlDst
->cx
, himlDst
->cy
,
697 /* copy (and stretch) source to destination */
699 StretchBlt (himlDst
->hdcImage
, ptDst
.x
, ptDst
.y
, himlDst
->cx
, himlDst
->cy
,
700 himlSrc
->hdcImage
, ptSrc
.x
, ptSrc
.y
, himlSrc
->cx
, himlSrc
->cy
,
703 StretchBlt (himlDst
->hdcMask
, ptDst
.x
, ptDst
.y
, himlDst
->cx
, himlDst
->cy
,
704 himlSrc
->hdcMask
, ptSrc
.x
, ptSrc
.y
, himlSrc
->cx
, himlSrc
->cy
,
707 /* copy (without stretching) temporary bitmaps to source (restore) */
709 BitBlt (himlSrc
->hdcMask
, ptSrc
.x
, ptSrc
.y
, himlSrc
->cx
, himlSrc
->cy
,
710 hdcBmp
, 0, 0, SRCCOPY
);
713 BitBlt (himlSrc
->hdcImage
, ptSrc
.x
, ptSrc
.y
, himlSrc
->cx
, himlSrc
->cy
,
714 hdcBmp
, 0, 0, SRCCOPY
);
715 /* delete temporary bitmaps */
716 DeleteObject (hbmTempMask
);
717 DeleteObject (hbmTempImage
);
722 StretchBlt (himlDst
->hdcImage
, ptDst
.x
, ptDst
.y
, himlDst
->cx
, himlDst
->cy
,
723 himlSrc
->hdcImage
, ptSrc
.x
, ptSrc
.y
, himlSrc
->cx
, himlSrc
->cy
,
727 StretchBlt (himlDst
->hdcMask
, ptDst
.x
, ptDst
.y
, himlDst
->cx
, himlDst
->cy
,
728 himlSrc
->hdcMask
, ptSrc
.x
, ptSrc
.y
, himlSrc
->cx
, himlSrc
->cy
,
736 /*************************************************************************
737 * ImageList_Create [COMCTL32.@]
739 * Creates a new image list.
742 * cx [I] image height
744 * flags [I] creation flags
745 * cInitial [I] initial number of images in the image list
746 * cGrow [I] number of images by which image list grows
749 * Success: Handle to the created image list
753 ImageList_Create (INT cx
, INT cy
, UINT flags
,
754 INT cInitial
, INT cGrow
)
759 UINT ilc
= (flags
& 0xFE);
760 static const WORD aBitBlend25
[] =
761 {0xAA, 0x00, 0x55, 0x00, 0xAA, 0x00, 0x55, 0x00};
763 static const WORD aBitBlend50
[] =
764 {0x55, 0xAA, 0x55, 0xAA, 0x55, 0xAA, 0x55, 0xAA};
766 TRACE("(%d %d 0x%x %d %d)\n", cx
, cy
, flags
, cInitial
, cGrow
);
768 if (cx
<= 0 || cy
<= 0) return NULL
;
770 /* Create the IImageList interface for the image list */
771 if (FAILED(ImageListImpl_CreateInstance(NULL
, &IID_IImageList
, (void **)&himl
)))
774 cGrow
= (cGrow
< 4) ? 4 : (cGrow
+ 3) & ~3;
779 himl
->cMaxImage
= cInitial
+ 1;
780 himl
->cInitial
= cInitial
;
782 himl
->clrFg
= CLR_DEFAULT
;
783 himl
->clrBk
= CLR_NONE
;
785 /* initialize overlay mask indices */
786 for (nCount
= 0; nCount
< MAX_OVERLAYIMAGE
; nCount
++)
787 himl
->nOvlIdx
[nCount
] = -1;
789 /* Create Image & Mask DCs */
790 himl
->hdcImage
= CreateCompatibleDC (0);
793 if (himl
->flags
& ILC_MASK
){
794 himl
->hdcMask
= CreateCompatibleDC(0);
799 /* Default to ILC_COLOR4 if none of the ILC_COLOR* flags are specified */
800 if (ilc
== ILC_COLOR
)
803 himl
->flags
|= ILC_COLOR4
;
806 if (ilc
>= ILC_COLOR4
&& ilc
<= ILC_COLOR32
)
807 himl
->uBitsPixel
= ilc
;
809 himl
->uBitsPixel
= (UINT
)GetDeviceCaps (himl
->hdcImage
, BITSPIXEL
);
811 if (himl
->cMaxImage
> 0) {
812 himl
->hbmImage
= ImageList_CreateImage(himl
->hdcImage
, himl
, himl
->cMaxImage
);
813 SelectObject(himl
->hdcImage
, himl
->hbmImage
);
817 if ((himl
->cMaxImage
> 0) && (himl
->flags
& ILC_MASK
)) {
820 imagelist_get_bitmap_size(himl
, himl
->cMaxImage
, &sz
);
821 himl
->hbmMask
= CreateBitmap (sz
.cx
, sz
.cy
, 1, 1, NULL
);
822 if (himl
->hbmMask
== 0) {
823 ERR("Error creating mask bitmap!\n");
826 SelectObject(himl
->hdcMask
, himl
->hbmMask
);
831 if (ilc
== ILC_COLOR32
)
832 himl
->has_alpha
= HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY
, himl
->cMaxImage
);
834 himl
->has_alpha
= NULL
;
836 /* create blending brushes */
837 hbmTemp
= CreateBitmap (8, 8, 1, 1, aBitBlend25
);
838 himl
->hbrBlend25
= CreatePatternBrush (hbmTemp
);
839 DeleteObject (hbmTemp
);
841 hbmTemp
= CreateBitmap (8, 8, 1, 1, aBitBlend50
);
842 himl
->hbrBlend50
= CreatePatternBrush (hbmTemp
);
843 DeleteObject (hbmTemp
);
845 TRACE("created imagelist %p\n", himl
);
849 ImageList_Destroy(himl
);
854 /*************************************************************************
855 * ImageList_Destroy [COMCTL32.@]
857 * Destroys an image list.
860 * himl [I] handle to image list
868 ImageList_Destroy (HIMAGELIST himl
)
873 IImageList_Release((IImageList
*) himl
);
878 /*************************************************************************
879 * ImageList_DragEnter [COMCTL32.@]
881 * Locks window update and displays the drag image at the given position.
884 * hwndLock [I] handle of the window that owns the drag image.
885 * x [I] X position of the drag image.
886 * y [I] Y position of the drag image.
893 * The position of the drag image is relative to the window, not
898 ImageList_DragEnter (HWND hwndLock
, INT x
, INT y
)
900 TRACE("(hwnd=%p x=%d y=%d)\n", hwndLock
, x
, y
);
902 if (!is_valid(InternalDrag
.himl
))
906 InternalDrag
.hwnd
= hwndLock
;
908 InternalDrag
.hwnd
= GetDesktopWindow ();
913 /* draw the drag image and save the background */
914 if (!ImageList_DragShowNolock(TRUE
)) {
922 /*************************************************************************
923 * ImageList_DragLeave [COMCTL32.@]
925 * Unlocks window update and hides the drag image.
928 * hwndLock [I] handle of the window that owns the drag image.
936 ImageList_DragLeave (HWND hwndLock
)
938 /* As we don't save drag info in the window this can lead to problems if
939 an app does not supply the same window as DragEnter */
941 InternalDrag.hwnd = hwndLock;
943 InternalDrag.hwnd = GetDesktopWindow (); */
945 hwndLock
= GetDesktopWindow();
946 if(InternalDrag
.hwnd
!= hwndLock
)
947 FIXME("DragLeave hWnd != DragEnter hWnd\n");
949 ImageList_DragShowNolock (FALSE
);
955 /*************************************************************************
956 * ImageList_InternalDragDraw [Internal]
958 * Draws the drag image.
961 * hdc [I] device context to draw into.
962 * x [I] X position of the drag image.
963 * y [I] Y position of the drag image.
970 * The position of the drag image is relative to the window, not
976 ImageList_InternalDragDraw (HDC hdc
, INT x
, INT y
)
978 IMAGELISTDRAWPARAMS imldp
;
980 ZeroMemory (&imldp
, sizeof(imldp
));
981 imldp
.cbSize
= sizeof(imldp
);
982 imldp
.himl
= InternalDrag
.himl
;
987 imldp
.rgbBk
= CLR_DEFAULT
;
988 imldp
.rgbFg
= CLR_DEFAULT
;
989 imldp
.fStyle
= ILD_NORMAL
;
990 imldp
.fState
= ILS_ALPHA
;
992 ImageList_DrawIndirect (&imldp
);
995 /*************************************************************************
996 * ImageList_DragMove [COMCTL32.@]
998 * Moves the drag image.
1001 * x [I] X position of the drag image.
1002 * y [I] Y position of the drag image.
1009 * The position of the drag image is relative to the window, not
1014 ImageList_DragMove (INT x
, INT y
)
1016 TRACE("(x=%d y=%d)\n", x
, y
);
1018 if (!is_valid(InternalDrag
.himl
))
1021 /* draw/update the drag image */
1022 if (InternalDrag
.bShow
) {
1026 HBITMAP hbmOffScreen
;
1027 INT origNewX
, origNewY
;
1028 INT origOldX
, origOldY
;
1029 INT origRegX
, origRegY
;
1030 INT sizeRegX
, sizeRegY
;
1033 /* calculate the update region */
1034 origNewX
= x
- InternalDrag
.dxHotspot
;
1035 origNewY
= y
- InternalDrag
.dyHotspot
;
1036 origOldX
= InternalDrag
.x
- InternalDrag
.dxHotspot
;
1037 origOldY
= InternalDrag
.y
- InternalDrag
.dyHotspot
;
1038 origRegX
= min(origNewX
, origOldX
);
1039 origRegY
= min(origNewY
, origOldY
);
1040 sizeRegX
= InternalDrag
.himl
->cx
+ abs(x
- InternalDrag
.x
);
1041 sizeRegY
= InternalDrag
.himl
->cy
+ abs(y
- InternalDrag
.y
);
1043 hdcDrag
= GetDCEx(InternalDrag
.hwnd
, 0,
1044 DCX_WINDOW
| DCX_CACHE
| DCX_LOCKWINDOWUPDATE
);
1045 hdcOffScreen
= CreateCompatibleDC(hdcDrag
);
1046 hdcBg
= CreateCompatibleDC(hdcDrag
);
1048 hbmOffScreen
= CreateCompatibleBitmap(hdcDrag
, sizeRegX
, sizeRegY
);
1049 SelectObject(hdcOffScreen
, hbmOffScreen
);
1050 SelectObject(hdcBg
, InternalDrag
.hbmBg
);
1052 /* get the actual background of the update region */
1053 BitBlt(hdcOffScreen
, 0, 0, sizeRegX
, sizeRegY
, hdcDrag
,
1054 origRegX
, origRegY
, SRCCOPY
);
1055 /* erase the old image */
1056 BitBlt(hdcOffScreen
, origOldX
- origRegX
, origOldY
- origRegY
,
1057 InternalDrag
.himl
->cx
, InternalDrag
.himl
->cy
, hdcBg
, 0, 0,
1059 /* save the background */
1060 BitBlt(hdcBg
, 0, 0, InternalDrag
.himl
->cx
, InternalDrag
.himl
->cy
,
1061 hdcOffScreen
, origNewX
- origRegX
, origNewY
- origRegY
, SRCCOPY
);
1062 /* draw the image */
1063 ImageList_InternalDragDraw(hdcOffScreen
, origNewX
- origRegX
,
1064 origNewY
- origRegY
);
1065 /* draw the update region to the screen */
1066 BitBlt(hdcDrag
, origRegX
, origRegY
, sizeRegX
, sizeRegY
,
1067 hdcOffScreen
, 0, 0, SRCCOPY
);
1070 DeleteDC(hdcOffScreen
);
1071 DeleteObject(hbmOffScreen
);
1072 ReleaseDC(InternalDrag
.hwnd
, hdcDrag
);
1075 /* update the image position */
1083 /*************************************************************************
1084 * ImageList_DragShowNolock [COMCTL32.@]
1086 * Shows or hides the drag image.
1089 * bShow [I] TRUE shows the drag image, FALSE hides it.
1097 ImageList_DragShowNolock (BOOL bShow
)
1103 if (!is_valid(InternalDrag
.himl
))
1106 TRACE("bShow=0x%X!\n", bShow
);
1108 /* DragImage is already visible/hidden */
1109 if ((InternalDrag
.bShow
&& bShow
) || (!InternalDrag
.bShow
&& !bShow
)) {
1113 /* position of the origin of the DragImage */
1114 x
= InternalDrag
.x
- InternalDrag
.dxHotspot
;
1115 y
= InternalDrag
.y
- InternalDrag
.dyHotspot
;
1117 hdcDrag
= GetDCEx (InternalDrag
.hwnd
, 0,
1118 DCX_WINDOW
| DCX_CACHE
| DCX_LOCKWINDOWUPDATE
);
1123 hdcBg
= CreateCompatibleDC(hdcDrag
);
1124 if (!InternalDrag
.hbmBg
) {
1125 InternalDrag
.hbmBg
= CreateCompatibleBitmap(hdcDrag
,
1126 InternalDrag
.himl
->cx
, InternalDrag
.himl
->cy
);
1128 SelectObject(hdcBg
, InternalDrag
.hbmBg
);
1131 /* save the background */
1132 BitBlt(hdcBg
, 0, 0, InternalDrag
.himl
->cx
, InternalDrag
.himl
->cy
,
1133 hdcDrag
, x
, y
, SRCCOPY
);
1134 /* show the image */
1135 ImageList_InternalDragDraw(hdcDrag
, x
, y
);
1137 /* hide the image */
1138 BitBlt(hdcDrag
, x
, y
, InternalDrag
.himl
->cx
, InternalDrag
.himl
->cy
,
1139 hdcBg
, 0, 0, SRCCOPY
);
1142 InternalDrag
.bShow
= !InternalDrag
.bShow
;
1145 ReleaseDC (InternalDrag
.hwnd
, hdcDrag
);
1150 /*************************************************************************
1151 * ImageList_Draw [COMCTL32.@]
1156 * himl [I] handle to image list
1158 * hdc [I] handle to device context
1161 * fStyle [I] drawing flags
1172 ImageList_Draw (HIMAGELIST himl
, INT i
, HDC hdc
, INT x
, INT y
, UINT fStyle
)
1174 return ImageList_DrawEx (himl
, i
, hdc
, x
, y
, 0, 0,
1175 CLR_DEFAULT
, CLR_DEFAULT
, fStyle
);
1179 /*************************************************************************
1180 * ImageList_DrawEx [COMCTL32.@]
1182 * Draws an image and allows to use extended drawing features.
1185 * himl [I] handle to image list
1187 * hdc [I] handle to device context
1192 * rgbBk [I] background color
1193 * rgbFg [I] foreground color
1194 * fStyle [I] drawing flags
1201 * Calls ImageList_DrawIndirect.
1204 * ImageList_DrawIndirect.
1208 ImageList_DrawEx (HIMAGELIST himl
, INT i
, HDC hdc
, INT x
, INT y
,
1209 INT dx
, INT dy
, COLORREF rgbBk
, COLORREF rgbFg
,
1212 IMAGELISTDRAWPARAMS imldp
;
1214 ZeroMemory (&imldp
, sizeof(imldp
));
1215 imldp
.cbSize
= sizeof(imldp
);
1223 imldp
.rgbBk
= rgbBk
;
1224 imldp
.rgbFg
= rgbFg
;
1225 imldp
.fStyle
= fStyle
;
1227 return ImageList_DrawIndirect (&imldp
);
1231 static BOOL
alpha_blend_image( HIMAGELIST himl
, HDC dest_dc
, int dest_x
, int dest_y
,
1232 int src_x
, int src_y
, int cx
, int cy
, BLENDFUNCTION func
,
1233 UINT style
, COLORREF blend_col
)
1237 HBITMAP bmp
= 0, mask
= 0;
1239 void *bits
, *mask_bits
;
1243 if (!(hdc
= CreateCompatibleDC( 0 ))) return FALSE
;
1244 if (!(info
= HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO
, bmiColors
[256] )))) goto done
;
1245 info
->bmiHeader
.biSize
= sizeof(BITMAPINFOHEADER
);
1246 info
->bmiHeader
.biWidth
= cx
;
1247 info
->bmiHeader
.biHeight
= cy
;
1248 info
->bmiHeader
.biPlanes
= 1;
1249 info
->bmiHeader
.biBitCount
= 32;
1250 info
->bmiHeader
.biCompression
= BI_RGB
;
1251 info
->bmiHeader
.biSizeImage
= cx
* cy
* 4;
1252 info
->bmiHeader
.biXPelsPerMeter
= 0;
1253 info
->bmiHeader
.biYPelsPerMeter
= 0;
1254 info
->bmiHeader
.biClrUsed
= 0;
1255 info
->bmiHeader
.biClrImportant
= 0;
1256 if (!(bmp
= CreateDIBSection( himl
->hdcImage
, info
, DIB_RGB_COLORS
, &bits
, 0, 0 ))) goto done
;
1257 SelectObject( hdc
, bmp
);
1258 BitBlt( hdc
, 0, 0, cx
, cy
, himl
->hdcImage
, src_x
, src_y
, SRCCOPY
);
1260 if (blend_col
!= CLR_NONE
)
1262 BYTE r
= GetRValue( blend_col
);
1263 BYTE g
= GetGValue( blend_col
);
1264 BYTE b
= GetBValue( blend_col
);
1266 if (style
& ILD_BLEND25
)
1268 for (i
= 0, ptr
= bits
; i
< cx
* cy
; i
++, ptr
++)
1269 *ptr
= ((*ptr
& 0xff000000) |
1270 ((((*ptr
& 0x00ff0000) * 3 + (r
<< 16)) / 4) & 0x00ff0000) |
1271 ((((*ptr
& 0x0000ff00) * 3 + (g
<< 8)) / 4) & 0x0000ff00) |
1272 ((((*ptr
& 0x000000ff) * 3 + (b
<< 0)) / 4) & 0x000000ff));
1274 else if (style
& ILD_BLEND50
)
1276 for (i
= 0, ptr
= bits
; i
< cx
* cy
; i
++, ptr
++)
1277 *ptr
= ((*ptr
& 0xff000000) |
1278 ((((*ptr
& 0x00ff0000) + (r
<< 16)) / 2) & 0x00ff0000) |
1279 ((((*ptr
& 0x0000ff00) + (g
<< 8)) / 2) & 0x0000ff00) |
1280 ((((*ptr
& 0x000000ff) + (b
<< 0)) / 2) & 0x000000ff));
1284 if (himl
->has_alpha
) /* we already have an alpha channel in this case */
1286 /* pre-multiply by the alpha channel */
1287 for (i
= 0, ptr
= bits
; i
< cx
* cy
; i
++, ptr
++)
1289 DWORD alpha
= *ptr
>> 24;
1290 *ptr
= ((*ptr
& 0xff000000) |
1291 (((*ptr
& 0x00ff0000) * alpha
/ 255) & 0x00ff0000) |
1292 (((*ptr
& 0x0000ff00) * alpha
/ 255) & 0x0000ff00) |
1293 (((*ptr
& 0x000000ff) * alpha
/ 255)));
1296 else if (himl
->hbmMask
)
1298 unsigned int width_bytes
= (cx
+ 31) / 32 * 4;
1299 /* generate alpha channel from the mask */
1300 info
->bmiHeader
.biBitCount
= 1;
1301 info
->bmiHeader
.biSizeImage
= width_bytes
* cy
;
1302 info
->bmiColors
[0].rgbRed
= 0;
1303 info
->bmiColors
[0].rgbGreen
= 0;
1304 info
->bmiColors
[0].rgbBlue
= 0;
1305 info
->bmiColors
[0].rgbReserved
= 0;
1306 info
->bmiColors
[1].rgbRed
= 0xff;
1307 info
->bmiColors
[1].rgbGreen
= 0xff;
1308 info
->bmiColors
[1].rgbBlue
= 0xff;
1309 info
->bmiColors
[1].rgbReserved
= 0;
1310 if (!(mask
= CreateDIBSection( himl
->hdcMask
, info
, DIB_RGB_COLORS
, &mask_bits
, 0, 0 )))
1312 SelectObject( hdc
, mask
);
1313 BitBlt( hdc
, 0, 0, cx
, cy
, himl
->hdcMask
, src_x
, src_y
, SRCCOPY
);
1314 SelectObject( hdc
, bmp
);
1315 for (i
= 0, ptr
= bits
; i
< cy
; i
++)
1316 for (j
= 0; j
< cx
; j
++, ptr
++)
1317 if ((((BYTE
*)mask_bits
)[i
* width_bytes
+ j
/ 8] << (j
% 8)) & 0x80) *ptr
= 0;
1318 else *ptr
|= 0xff000000;
1321 ret
= GdiAlphaBlend( dest_dc
, dest_x
, dest_y
, cx
, cy
, hdc
, 0, 0, cx
, cy
, func
);
1325 if (bmp
) DeleteObject( bmp
);
1326 if (mask
) DeleteObject( mask
);
1327 HeapFree( GetProcessHeap(), 0, info
);
1331 /*************************************************************************
1332 * ImageList_DrawIndirect [COMCTL32.@]
1334 * Draws an image using various parameters specified in pimldp.
1337 * pimldp [I] pointer to IMAGELISTDRAWPARAMS structure.
1345 ImageList_DrawIndirect (IMAGELISTDRAWPARAMS
*pimldp
)
1347 INT cx
, cy
, nOvlIdx
;
1348 DWORD fState
, dwRop
;
1350 COLORREF oldImageBk
, oldImageFg
;
1351 HDC hImageDC
, hImageListDC
, hMaskListDC
;
1352 HBITMAP hImageBmp
, hOldImageBmp
, hBlendMaskBmp
;
1353 BOOL bIsTransparent
, bBlend
, bResult
= FALSE
, bMask
;
1359 if (!pimldp
|| !(himl
= pimldp
->himl
)) return FALSE
;
1360 if (!is_valid(himl
)) return FALSE
;
1361 if ((pimldp
->i
< 0) || (pimldp
->i
>= himl
->cCurImage
)) return FALSE
;
1363 imagelist_point_from_index( himl
, pimldp
->i
, &pt
);
1364 pt
.x
+= pimldp
->xBitmap
;
1365 pt
.y
+= pimldp
->yBitmap
;
1367 fState
= pimldp
->cbSize
< sizeof(IMAGELISTDRAWPARAMS
) ? ILS_NORMAL
: pimldp
->fState
;
1368 fStyle
= pimldp
->fStyle
& ~ILD_OVERLAYMASK
;
1369 cx
= (pimldp
->cx
== 0) ? himl
->cx
: pimldp
->cx
;
1370 cy
= (pimldp
->cy
== 0) ? himl
->cy
: pimldp
->cy
;
1372 bIsTransparent
= (fStyle
& ILD_TRANSPARENT
);
1373 if( pimldp
->rgbBk
== CLR_NONE
)
1374 bIsTransparent
= TRUE
;
1375 if( ( pimldp
->rgbBk
== CLR_DEFAULT
) && ( himl
->clrBk
== CLR_NONE
) )
1376 bIsTransparent
= TRUE
;
1377 bMask
= (himl
->flags
& ILC_MASK
) && (fStyle
& ILD_MASK
) ;
1378 bBlend
= (fStyle
& (ILD_BLEND25
| ILD_BLEND50
) ) && !bMask
;
1380 TRACE("himl(%p) hbmMask(%p) iImage(%d) x(%d) y(%d) cx(%d) cy(%d)\n",
1381 himl
, himl
->hbmMask
, pimldp
->i
, pimldp
->x
, pimldp
->y
, cx
, cy
);
1383 /* we will use these DCs to access the images and masks in the ImageList */
1384 hImageListDC
= himl
->hdcImage
;
1385 hMaskListDC
= himl
->hdcMask
;
1387 /* these will accumulate the image and mask for the image we're drawing */
1388 hImageDC
= CreateCompatibleDC( pimldp
->hdcDst
);
1389 hImageBmp
= CreateCompatibleBitmap( pimldp
->hdcDst
, cx
, cy
);
1390 hBlendMaskBmp
= bBlend
? CreateBitmap(cx
, cy
, 1, 1, NULL
) : 0;
1392 /* Create a compatible DC. */
1393 if (!hImageListDC
|| !hImageDC
|| !hImageBmp
||
1394 (bBlend
&& !hBlendMaskBmp
) || (himl
->hbmMask
&& !hMaskListDC
))
1397 hOldImageBmp
= SelectObject(hImageDC
, hImageBmp
);
1400 * To obtain a transparent look, background color should be set
1401 * to white and foreground color to black when blitting the
1404 oldImageFg
= SetTextColor( hImageDC
, RGB( 0, 0, 0 ) );
1405 oldImageBk
= SetBkColor( hImageDC
, RGB( 0xff, 0xff, 0xff ) );
1407 has_alpha
= (himl
->has_alpha
&& himl
->has_alpha
[pimldp
->i
]);
1408 if (!bMask
&& (has_alpha
|| (fState
& ILS_ALPHA
)))
1410 COLORREF colour
, blend_col
= CLR_NONE
;
1415 blend_col
= pimldp
->rgbFg
;
1416 if (blend_col
== CLR_DEFAULT
) blend_col
= GetSysColor( COLOR_HIGHLIGHT
);
1417 else if (blend_col
== CLR_NONE
) blend_col
= GetTextColor( pimldp
->hdcDst
);
1420 func
.BlendOp
= AC_SRC_OVER
;
1421 func
.BlendFlags
= 0;
1422 func
.SourceConstantAlpha
= (fState
& ILS_ALPHA
) ? pimldp
->Frame
: 255;
1423 func
.AlphaFormat
= AC_SRC_ALPHA
;
1427 bResult
= alpha_blend_image( himl
, pimldp
->hdcDst
, pimldp
->x
, pimldp
->y
,
1428 pt
.x
, pt
.y
, cx
, cy
, func
, fStyle
, blend_col
);
1431 colour
= pimldp
->rgbBk
;
1432 if (colour
== CLR_DEFAULT
) colour
= himl
->clrBk
;
1433 if (colour
== CLR_NONE
) colour
= GetBkColor( pimldp
->hdcDst
);
1435 hOldBrush
= SelectObject (hImageDC
, CreateSolidBrush (colour
));
1436 PatBlt( hImageDC
, 0, 0, cx
, cy
, PATCOPY
);
1437 alpha_blend_image( himl
, hImageDC
, 0, 0, pt
.x
, pt
.y
, cx
, cy
, func
, fStyle
, blend_col
);
1438 DeleteObject (SelectObject (hImageDC
, hOldBrush
));
1439 bResult
= BitBlt( pimldp
->hdcDst
, pimldp
->x
, pimldp
->y
, cx
, cy
, hImageDC
, 0, 0, SRCCOPY
);
1444 * Draw the initial image
1447 if (himl
->hbmMask
) {
1448 hOldBrush
= SelectObject (hImageDC
, CreateSolidBrush (GetTextColor(pimldp
->hdcDst
)));
1449 PatBlt( hImageDC
, 0, 0, cx
, cy
, PATCOPY
);
1450 BitBlt(hImageDC
, 0, 0, cx
, cy
, hMaskListDC
, pt
.x
, pt
.y
, SRCPAINT
);
1451 DeleteObject (SelectObject (hImageDC
, hOldBrush
));
1452 if( bIsTransparent
)
1454 BitBlt ( pimldp
->hdcDst
, pimldp
->x
, pimldp
->y
, cx
, cy
, hImageDC
, 0, 0, SRCAND
);
1459 hOldBrush
= SelectObject (hImageDC
, GetStockObject(BLACK_BRUSH
));
1460 PatBlt( hImageDC
, 0, 0, cx
, cy
, PATCOPY
);
1461 SelectObject(hImageDC
, hOldBrush
);
1464 /* blend the image with the needed solid background */
1465 COLORREF colour
= RGB(0,0,0);
1467 if( !bIsTransparent
)
1469 colour
= pimldp
->rgbBk
;
1470 if( colour
== CLR_DEFAULT
)
1471 colour
= himl
->clrBk
;
1472 if( colour
== CLR_NONE
)
1473 colour
= GetBkColor(pimldp
->hdcDst
);
1476 hOldBrush
= SelectObject (hImageDC
, CreateSolidBrush (colour
));
1477 PatBlt( hImageDC
, 0, 0, cx
, cy
, PATCOPY
);
1480 BitBlt( hImageDC
, 0, 0, cx
, cy
, hMaskListDC
, pt
.x
, pt
.y
, SRCAND
);
1481 BitBlt( hImageDC
, 0, 0, cx
, cy
, hImageListDC
, pt
.x
, pt
.y
, SRCPAINT
);
1484 BitBlt( hImageDC
, 0, 0, cx
, cy
, hImageListDC
, pt
.x
, pt
.y
, SRCCOPY
);
1485 DeleteObject (SelectObject (hImageDC
, hOldBrush
));
1488 /* Time for blending, if required */
1491 COLORREF clrBlend
= pimldp
->rgbFg
;
1492 HDC hBlendMaskDC
= hImageListDC
;
1495 /* Create the blend Mask */
1496 hOldBitmap
= SelectObject(hBlendMaskDC
, hBlendMaskBmp
);
1497 hBlendBrush
= fStyle
& ILD_BLEND50
? himl
->hbrBlend50
: himl
->hbrBlend25
;
1498 hOldBrush
= SelectObject(hBlendMaskDC
, hBlendBrush
);
1499 PatBlt(hBlendMaskDC
, 0, 0, cx
, cy
, PATCOPY
);
1500 SelectObject(hBlendMaskDC
, hOldBrush
);
1502 /* Modify the blend mask if an Image Mask exist */
1504 BitBlt(hBlendMaskDC
, 0, 0, cx
, cy
, hMaskListDC
, pt
.x
, pt
.y
, 0x220326); /* NOTSRCAND */
1505 BitBlt(hBlendMaskDC
, 0, 0, cx
, cy
, hBlendMaskDC
, 0, 0, NOTSRCCOPY
);
1508 /* now apply blend to the current image given the BlendMask */
1509 if (clrBlend
== CLR_DEFAULT
) clrBlend
= GetSysColor (COLOR_HIGHLIGHT
);
1510 else if (clrBlend
== CLR_NONE
) clrBlend
= GetTextColor (pimldp
->hdcDst
);
1511 hOldBrush
= SelectObject (hImageDC
, CreateSolidBrush(clrBlend
));
1512 BitBlt (hImageDC
, 0, 0, cx
, cy
, hBlendMaskDC
, 0, 0, 0xB8074A); /* PSDPxax */
1513 DeleteObject(SelectObject(hImageDC
, hOldBrush
));
1514 SelectObject(hBlendMaskDC
, hOldBitmap
);
1517 /* Now do the overlay image, if any */
1518 nOvlIdx
= (pimldp
->fStyle
& ILD_OVERLAYMASK
) >> 8;
1519 if ( (nOvlIdx
>= 1) && (nOvlIdx
<= MAX_OVERLAYIMAGE
)) {
1520 nOvlIdx
= himl
->nOvlIdx
[nOvlIdx
- 1];
1521 if ((nOvlIdx
>= 0) && (nOvlIdx
< himl
->cCurImage
)) {
1523 imagelist_point_from_index( himl
, nOvlIdx
, &ptOvl
);
1524 ptOvl
.x
+= pimldp
->xBitmap
;
1525 if (himl
->hbmMask
&& !(fStyle
& ILD_IMAGE
))
1526 BitBlt (hImageDC
, 0, 0, cx
, cy
, hMaskListDC
, ptOvl
.x
, ptOvl
.y
, SRCAND
);
1527 BitBlt (hImageDC
, 0, 0, cx
, cy
, hImageListDC
, ptOvl
.x
, ptOvl
.y
, SRCPAINT
);
1531 if (fState
& ILS_SATURATE
) FIXME("ILS_SATURATE: unimplemented!\n");
1532 if (fState
& ILS_GLOW
) FIXME("ILS_GLOW: unimplemented!\n");
1533 if (fState
& ILS_SHADOW
) FIXME("ILS_SHADOW: unimplemented!\n");
1535 if (fStyle
& ILD_PRESERVEALPHA
) FIXME("ILD_PRESERVEALPHA: unimplemented!\n");
1536 if (fStyle
& ILD_SCALE
) FIXME("ILD_SCALE: unimplemented!\n");
1537 if (fStyle
& ILD_DPISCALE
) FIXME("ILD_DPISCALE: unimplemented!\n");
1539 /* now copy the image to the screen */
1541 if (himl
->hbmMask
&& bIsTransparent
) {
1542 COLORREF oldDstFg
= SetTextColor(pimldp
->hdcDst
, RGB( 0, 0, 0 ) );
1543 COLORREF oldDstBk
= SetBkColor(pimldp
->hdcDst
, RGB( 0xff, 0xff, 0xff ));
1544 BitBlt (pimldp
->hdcDst
, pimldp
->x
, pimldp
->y
, cx
, cy
, hMaskListDC
, pt
.x
, pt
.y
, SRCAND
);
1545 SetBkColor(pimldp
->hdcDst
, oldDstBk
);
1546 SetTextColor(pimldp
->hdcDst
, oldDstFg
);
1549 if (fStyle
& ILD_ROP
) dwRop
= pimldp
->dwRop
;
1550 BitBlt (pimldp
->hdcDst
, pimldp
->x
, pimldp
->y
, cx
, cy
, hImageDC
, 0, 0, dwRop
);
1554 /* cleanup the mess */
1555 SetBkColor(hImageDC
, oldImageBk
);
1556 SetTextColor(hImageDC
, oldImageFg
);
1557 SelectObject(hImageDC
, hOldImageBmp
);
1559 DeleteObject(hBlendMaskBmp
);
1560 DeleteObject(hImageBmp
);
1567 /*************************************************************************
1568 * ImageList_Duplicate [COMCTL32.@]
1570 * Duplicates an image list.
1573 * himlSrc [I] source image list handle
1576 * Success: Handle of duplicated image list.
1581 ImageList_Duplicate (HIMAGELIST himlSrc
)
1585 if (!is_valid(himlSrc
)) {
1586 ERR("Invalid image list handle!\n");
1590 himlDst
= ImageList_Create (himlSrc
->cx
, himlSrc
->cy
, himlSrc
->flags
,
1591 himlSrc
->cCurImage
, himlSrc
->cGrow
);
1597 imagelist_get_bitmap_size(himlSrc
, himlSrc
->cCurImage
, &sz
);
1598 BitBlt (himlDst
->hdcImage
, 0, 0, sz
.cx
, sz
.cy
,
1599 himlSrc
->hdcImage
, 0, 0, SRCCOPY
);
1601 if (himlDst
->hbmMask
)
1602 BitBlt (himlDst
->hdcMask
, 0, 0, sz
.cx
, sz
.cy
,
1603 himlSrc
->hdcMask
, 0, 0, SRCCOPY
);
1605 himlDst
->cCurImage
= himlSrc
->cCurImage
;
1606 if (himlSrc
->has_alpha
&& himlDst
->has_alpha
)
1607 memcpy( himlDst
->has_alpha
, himlSrc
->has_alpha
, himlDst
->cCurImage
);
1613 /*************************************************************************
1614 * ImageList_EndDrag [COMCTL32.@]
1616 * Finishes a drag operation.
1627 ImageList_EndDrag (void)
1629 /* cleanup the InternalDrag struct */
1630 InternalDrag
.hwnd
= 0;
1631 ImageList_Destroy (InternalDrag
.himl
);
1632 InternalDrag
.himl
= 0;
1635 InternalDrag
.dxHotspot
= 0;
1636 InternalDrag
.dyHotspot
= 0;
1637 InternalDrag
.bShow
= FALSE
;
1638 DeleteObject(InternalDrag
.hbmBg
);
1639 InternalDrag
.hbmBg
= 0;
1643 /*************************************************************************
1644 * ImageList_GetBkColor [COMCTL32.@]
1646 * Returns the background color of an image list.
1649 * himl [I] Image list handle.
1652 * Success: background color
1657 ImageList_GetBkColor (HIMAGELIST himl
)
1659 return himl
? himl
->clrBk
: CLR_NONE
;
1663 /*************************************************************************
1664 * ImageList_GetDragImage [COMCTL32.@]
1666 * Returns the handle to the internal drag image list.
1669 * ppt [O] Pointer to the drag position. Can be NULL.
1670 * pptHotspot [O] Pointer to the position of the hot spot. Can be NULL.
1673 * Success: Handle of the drag image list.
1678 ImageList_GetDragImage (POINT
*ppt
, POINT
*pptHotspot
)
1680 if (is_valid(InternalDrag
.himl
)) {
1682 ppt
->x
= InternalDrag
.x
;
1683 ppt
->y
= InternalDrag
.y
;
1686 pptHotspot
->x
= InternalDrag
.dxHotspot
;
1687 pptHotspot
->y
= InternalDrag
.dyHotspot
;
1689 return (InternalDrag
.himl
);
1696 /*************************************************************************
1697 * ImageList_GetFlags [COMCTL32.@]
1699 * Gets the flags of the specified image list.
1702 * himl [I] Handle to image list
1712 ImageList_GetFlags(HIMAGELIST himl
)
1714 TRACE("%p\n", himl
);
1716 return is_valid(himl
) ? himl
->flags
: 0;
1720 /*************************************************************************
1721 * ImageList_GetIcon [COMCTL32.@]
1723 * Creates an icon from a masked image of an image list.
1726 * himl [I] handle to image list
1728 * flags [I] drawing style flags
1731 * Success: icon handle
1736 ImageList_GetIcon (HIMAGELIST himl
, INT i
, UINT fStyle
)
1740 HBITMAP hOldDstBitmap
;
1744 TRACE("%p %d %d\n", himl
, i
, fStyle
);
1745 if (!is_valid(himl
) || (i
< 0) || (i
>= himl
->cCurImage
)) return NULL
;
1751 /* create colour bitmap */
1753 ii
.hbmColor
= CreateCompatibleBitmap(hdcDst
, himl
->cx
, himl
->cy
);
1754 ReleaseDC(0, hdcDst
);
1756 hdcDst
= CreateCompatibleDC(0);
1758 imagelist_point_from_index( himl
, i
, &pt
);
1761 ii
.hbmMask
= CreateBitmap (himl
->cx
, himl
->cy
, 1, 1, NULL
);
1762 hOldDstBitmap
= SelectObject (hdcDst
, ii
.hbmMask
);
1763 if (himl
->hbmMask
) {
1764 BitBlt (hdcDst
, 0, 0, himl
->cx
, himl
->cy
,
1765 himl
->hdcMask
, pt
.x
, pt
.y
, SRCCOPY
);
1768 PatBlt (hdcDst
, 0, 0, himl
->cx
, himl
->cy
, BLACKNESS
);
1771 SelectObject (hdcDst
, ii
.hbmColor
);
1772 BitBlt (hdcDst
, 0, 0, himl
->cx
, himl
->cy
,
1773 himl
->hdcImage
, pt
.x
, pt
.y
, SRCCOPY
);
1776 * CreateIconIndirect requires us to deselect the bitmaps from
1777 * the DCs before calling
1779 SelectObject(hdcDst
, hOldDstBitmap
);
1781 hIcon
= CreateIconIndirect (&ii
);
1783 DeleteObject (ii
.hbmMask
);
1784 DeleteObject (ii
.hbmColor
);
1791 /*************************************************************************
1792 * ImageList_GetIconSize [COMCTL32.@]
1794 * Retrieves the size of an image in an image list.
1797 * himl [I] handle to image list
1798 * cx [O] pointer to the image width.
1799 * cy [O] pointer to the image height.
1806 * All images in an image list have the same size.
1810 ImageList_GetIconSize (HIMAGELIST himl
, INT
*cx
, INT
*cy
)
1812 if (!is_valid(himl
) || !cx
|| !cy
)
1814 if ((himl
->cx
<= 0) || (himl
->cy
<= 0))
1824 /*************************************************************************
1825 * ImageList_GetImageCount [COMCTL32.@]
1827 * Returns the number of images in an image list.
1830 * himl [I] handle to image list
1833 * Success: Number of images.
1838 ImageList_GetImageCount (HIMAGELIST himl
)
1840 if (!is_valid(himl
))
1843 return himl
->cCurImage
;
1847 /*************************************************************************
1848 * ImageList_GetImageInfo [COMCTL32.@]
1850 * Returns information about an image in an image list.
1853 * himl [I] handle to image list
1855 * pImageInfo [O] pointer to the image information
1863 ImageList_GetImageInfo (HIMAGELIST himl
, INT i
, IMAGEINFO
*pImageInfo
)
1867 if (!is_valid(himl
) || (pImageInfo
== NULL
))
1869 if ((i
< 0) || (i
>= himl
->cCurImage
))
1872 pImageInfo
->hbmImage
= himl
->hbmImage
;
1873 pImageInfo
->hbmMask
= himl
->hbmMask
;
1875 imagelist_point_from_index( himl
, i
, &pt
);
1876 pImageInfo
->rcImage
.top
= pt
.y
;
1877 pImageInfo
->rcImage
.bottom
= pt
.y
+ himl
->cy
;
1878 pImageInfo
->rcImage
.left
= pt
.x
;
1879 pImageInfo
->rcImage
.right
= pt
.x
+ himl
->cx
;
1885 /*************************************************************************
1886 * ImageList_GetImageRect [COMCTL32.@]
1888 * Retrieves the rectangle of the specified image in an image list.
1891 * himl [I] handle to image list
1893 * lpRect [O] pointer to the image rectangle
1900 * This is an UNDOCUMENTED function!!!
1904 ImageList_GetImageRect (HIMAGELIST himl
, INT i
, LPRECT lpRect
)
1908 if (!is_valid(himl
) || (lpRect
== NULL
))
1910 if ((i
< 0) || (i
>= himl
->cCurImage
))
1913 imagelist_point_from_index( himl
, i
, &pt
);
1914 lpRect
->left
= pt
.x
;
1916 lpRect
->right
= pt
.x
+ himl
->cx
;
1917 lpRect
->bottom
= pt
.y
+ himl
->cy
;
1923 /*************************************************************************
1924 * ImageList_LoadImage [COMCTL32.@]
1925 * ImageList_LoadImageA [COMCTL32.@]
1927 * Creates an image list from a bitmap, icon or cursor.
1929 * See ImageList_LoadImageW.
1933 ImageList_LoadImageA (HINSTANCE hi
, LPCSTR lpbmp
, INT cx
, INT cGrow
,
1934 COLORREF clrMask
, UINT uType
, UINT uFlags
)
1940 if (IS_INTRESOURCE(lpbmp
))
1941 return ImageList_LoadImageW(hi
, (LPCWSTR
)lpbmp
, cx
, cGrow
, clrMask
,
1944 len
= MultiByteToWideChar(CP_ACP
, 0, lpbmp
, -1, NULL
, 0);
1945 lpbmpW
= Alloc(len
* sizeof(WCHAR
));
1946 MultiByteToWideChar(CP_ACP
, 0, lpbmp
, -1, lpbmpW
, len
);
1948 himl
= ImageList_LoadImageW(hi
, lpbmpW
, cx
, cGrow
, clrMask
, uType
, uFlags
);
1954 /*************************************************************************
1955 * ImageList_LoadImageW [COMCTL32.@]
1957 * Creates an image list from a bitmap, icon or cursor.
1960 * hi [I] instance handle
1961 * lpbmp [I] name or id of the image
1962 * cx [I] width of each image
1963 * cGrow [I] number of images to expand
1964 * clrMask [I] mask color
1965 * uType [I] type of image to load
1966 * uFlags [I] loading flags
1969 * Success: handle to the loaded image list
1977 ImageList_LoadImageW (HINSTANCE hi
, LPCWSTR lpbmp
, INT cx
, INT cGrow
,
1978 COLORREF clrMask
, UINT uType
, UINT uFlags
)
1980 HIMAGELIST himl
= NULL
;
1984 handle
= LoadImageW (hi
, lpbmp
, uType
, 0, 0, uFlags
);
1986 WARN("Couldn't load image\n");
1990 if (uType
== IMAGE_BITMAP
) {
1994 if (GetObjectW (handle
, sizeof(dib
), &dib
) == sizeof(BITMAP
)) color
= ILC_COLOR
;
1995 else color
= dib
.dsBm
.bmBitsPixel
;
1997 /* To match windows behavior, if cx is set to zero and
1998 the flag DI_DEFAULTSIZE is specified, cx becomes the
1999 system metric value for icons. If the flag is not specified
2000 the function sets the size to the height of the bitmap */
2003 if (uFlags
& DI_DEFAULTSIZE
)
2004 cx
= GetSystemMetrics (SM_CXICON
);
2006 cx
= dib
.dsBm
.bmHeight
;
2009 nImageCount
= dib
.dsBm
.bmWidth
/ cx
;
2011 himl
= ImageList_Create (cx
, dib
.dsBm
.bmHeight
, ILC_MASK
| color
, nImageCount
, cGrow
);
2013 DeleteObject (handle
);
2016 ImageList_AddMasked (himl
, handle
, clrMask
);
2018 else if ((uType
== IMAGE_ICON
) || (uType
== IMAGE_CURSOR
)) {
2022 GetIconInfo (handle
, &ii
);
2023 GetObjectW (ii
.hbmColor
, sizeof(BITMAP
), &bmp
);
2024 himl
= ImageList_Create (bmp
.bmWidth
, bmp
.bmHeight
,
2025 ILC_MASK
| ILC_COLOR
, 1, cGrow
);
2027 DeleteObject (ii
.hbmColor
);
2028 DeleteObject (ii
.hbmMask
);
2029 DeleteObject (handle
);
2032 ImageList_Add (himl
, ii
.hbmColor
, ii
.hbmMask
);
2033 DeleteObject (ii
.hbmColor
);
2034 DeleteObject (ii
.hbmMask
);
2037 DeleteObject (handle
);
2043 /*************************************************************************
2044 * ImageList_Merge [COMCTL32.@]
2046 * Create an image list containing a merged image from two image lists.
2049 * himl1 [I] handle to first image list
2050 * i1 [I] first image index
2051 * himl2 [I] handle to second image list
2052 * i2 [I] second image index
2053 * dx [I] X offset of the second image relative to the first.
2054 * dy [I] Y offset of the second image relative to the first.
2057 * Success: The newly created image list. It contains a single image
2058 * consisting of the second image merged with the first.
2059 * Failure: NULL, if either himl1 or himl2 are invalid.
2062 * - The returned image list should be deleted by the caller using
2063 * ImageList_Destroy() when it is no longer required.
2064 * - If either i1 or i2 are not valid image indices they will be treated
2068 ImageList_Merge (HIMAGELIST himl1
, INT i1
, HIMAGELIST himl2
, INT i2
,
2071 HIMAGELIST himlDst
= NULL
;
2073 INT xOff1
, yOff1
, xOff2
, yOff2
;
2076 TRACE("(himl1=%p i1=%d himl2=%p i2=%d dx=%d dy=%d)\n", himl1
, i1
, himl2
,
2079 if (!is_valid(himl1
) || !is_valid(himl2
))
2083 cxDst
= max (himl1
->cx
, dx
+ himl2
->cx
);
2088 cxDst
= max (himl2
->cx
, himl1
->cx
- dx
);
2093 cxDst
= max (himl1
->cx
, himl2
->cx
);
2099 cyDst
= max (himl1
->cy
, dy
+ himl2
->cy
);
2104 cyDst
= max (himl2
->cy
, himl1
->cy
- dy
);
2109 cyDst
= max (himl1
->cy
, himl2
->cy
);
2114 himlDst
= ImageList_Create (cxDst
, cyDst
, ILC_MASK
| ILC_COLOR
, 1, 1);
2118 imagelist_point_from_index( himl1
, i1
, &pt1
);
2119 imagelist_point_from_index( himl2
, i2
, &pt2
);
2122 BitBlt (himlDst
->hdcImage
, 0, 0, cxDst
, cyDst
, himl1
->hdcImage
, 0, 0, BLACKNESS
);
2123 if (i1
>= 0 && i1
< himl1
->cCurImage
)
2124 BitBlt (himlDst
->hdcImage
, xOff1
, yOff1
, himl1
->cx
, himl1
->cy
, himl1
->hdcImage
, pt1
.x
, pt1
.y
, SRCCOPY
);
2125 if (i2
>= 0 && i2
< himl2
->cCurImage
)
2127 BitBlt (himlDst
->hdcImage
, xOff2
, yOff2
, himl2
->cx
, himl2
->cy
, himl2
->hdcMask
, pt2
.x
, pt2
.y
, SRCAND
);
2128 BitBlt (himlDst
->hdcImage
, xOff2
, yOff2
, himl2
->cx
, himl2
->cy
, himl2
->hdcImage
, pt2
.x
, pt2
.y
, SRCPAINT
);
2132 BitBlt (himlDst
->hdcMask
, 0, 0, cxDst
, cyDst
, himl1
->hdcMask
, 0, 0, WHITENESS
);
2133 if (i1
>= 0 && i1
< himl1
->cCurImage
)
2134 BitBlt (himlDst
->hdcMask
, xOff1
, yOff1
, himl1
->cx
, himl1
->cy
, himl1
->hdcMask
, pt1
.x
, pt1
.y
, SRCCOPY
);
2135 if (i2
>= 0 && i2
< himl2
->cCurImage
)
2136 BitBlt (himlDst
->hdcMask
, xOff2
, yOff2
, himl2
->cx
, himl2
->cy
, himl2
->hdcMask
, pt2
.x
, pt2
.y
, SRCAND
);
2138 himlDst
->cCurImage
= 1;
2145 /* helper for ImageList_Read, see comments below */
2146 static void *read_bitmap(LPSTREAM pstm
, BITMAPINFO
*bmi
)
2148 BITMAPFILEHEADER bmfh
;
2149 int bitsperpixel
, palspace
;
2152 if (FAILED(IStream_Read ( pstm
, &bmfh
, sizeof(bmfh
), NULL
)))
2155 if (bmfh
.bfType
!= (('M'<<8)|'B'))
2158 if (FAILED(IStream_Read ( pstm
, &bmi
->bmiHeader
, sizeof(bmi
->bmiHeader
), NULL
)))
2161 if ((bmi
->bmiHeader
.biSize
!= sizeof(bmi
->bmiHeader
)))
2164 TRACE("width %u, height %u, planes %u, bpp %u\n",
2165 bmi
->bmiHeader
.biWidth
, bmi
->bmiHeader
.biHeight
,
2166 bmi
->bmiHeader
.biPlanes
, bmi
->bmiHeader
.biBitCount
);
2168 bitsperpixel
= bmi
->bmiHeader
.biPlanes
* bmi
->bmiHeader
.biBitCount
;
2169 if (bitsperpixel
<=8)
2170 palspace
= (1<<bitsperpixel
)*sizeof(RGBQUAD
);
2174 bmi
->bmiHeader
.biSizeImage
= get_dib_image_size( bmi
);
2176 /* read the palette right after the end of the bitmapinfoheader */
2177 if (palspace
&& FAILED(IStream_Read(pstm
, bmi
->bmiColors
, palspace
, NULL
)))
2180 bits
= Alloc(bmi
->bmiHeader
.biSizeImage
);
2181 if (!bits
) return NULL
;
2183 if (FAILED(IStream_Read(pstm
, bits
, bmi
->bmiHeader
.biSizeImage
, NULL
)))
2191 /*************************************************************************
2192 * ImageList_Read [COMCTL32.@]
2194 * Reads an image list from a stream.
2197 * pstm [I] pointer to a stream
2200 * Success: handle to image list
2203 * The format is like this:
2204 * ILHEAD ilheadstruct;
2206 * for the color image part:
2207 * BITMAPFILEHEADER bmfh;
2208 * BITMAPINFOHEADER bmih;
2209 * only if it has a palette:
2210 * RGBQUAD rgbs[nr_of_paletted_colors];
2212 * BYTE colorbits[imagesize];
2214 * the following only if the ILC_MASK bit is set in ILHEAD.ilFlags:
2215 * BITMAPFILEHEADER bmfh_mask;
2216 * BITMAPINFOHEADER bmih_mask;
2217 * only if it has a palette (it usually does not):
2218 * RGBQUAD rgbs[nr_of_paletted_colors];
2220 * BYTE maskbits[imagesize];
2222 HIMAGELIST WINAPI
ImageList_Read (LPSTREAM pstm
)
2224 char image_buf
[sizeof(BITMAPINFOHEADER
) + sizeof(RGBQUAD
) * 256];
2225 char mask_buf
[sizeof(BITMAPINFOHEADER
) + sizeof(RGBQUAD
) * 256];
2226 BITMAPINFO
*image_info
= (BITMAPINFO
*)image_buf
;
2227 BITMAPINFO
*mask_info
= (BITMAPINFO
*)mask_buf
;
2228 void *image_bits
, *mask_bits
= NULL
;
2233 TRACE("%p\n", pstm
);
2235 if (FAILED(IStream_Read (pstm
, &ilHead
, sizeof(ILHEAD
), NULL
)))
2237 if (ilHead
.usMagic
!= (('L' << 8) | 'I'))
2239 if (ilHead
.usVersion
!= 0x101) /* probably version? */
2242 TRACE("cx %u, cy %u, flags 0x%04x, cCurImage %u, cMaxImage %u\n",
2243 ilHead
.cx
, ilHead
.cy
, ilHead
.flags
, ilHead
.cCurImage
, ilHead
.cMaxImage
);
2245 himl
= ImageList_Create(ilHead
.cx
, ilHead
.cy
, ilHead
.flags
, ilHead
.cCurImage
, ilHead
.cMaxImage
);
2249 if (!(image_bits
= read_bitmap(pstm
, image_info
)))
2251 WARN("failed to read bitmap from stream\n");
2254 if (ilHead
.flags
& ILC_MASK
)
2256 if (!(mask_bits
= read_bitmap(pstm
, mask_info
)))
2258 WARN("failed to read mask bitmap from stream\n");
2262 else mask_info
= NULL
;
2264 if (himl
->has_alpha
&& image_info
->bmiHeader
.biBitCount
== 32)
2266 DWORD
*ptr
= image_bits
;
2267 BYTE
*mask_ptr
= mask_bits
;
2268 int stride
= himl
->cy
* image_info
->bmiHeader
.biWidth
;
2270 if (image_info
->bmiHeader
.biHeight
> 0) /* bottom-up */
2272 ptr
+= image_info
->bmiHeader
.biHeight
* image_info
->bmiHeader
.biWidth
- stride
;
2273 mask_ptr
+= (image_info
->bmiHeader
.biHeight
* image_info
->bmiHeader
.biWidth
- stride
) / 8;
2275 image_info
->bmiHeader
.biHeight
= himl
->cy
;
2277 else image_info
->bmiHeader
.biHeight
= -himl
->cy
;
2279 for (i
= 0; i
< ilHead
.cCurImage
; i
+= TILE_COUNT
)
2281 add_dib_bits( himl
, i
, min( ilHead
.cCurImage
- i
, TILE_COUNT
),
2282 himl
->cx
, himl
->cy
, image_info
, mask_info
, ptr
, mask_ptr
);
2284 mask_ptr
+= stride
/ 8;
2289 StretchDIBits( himl
->hdcImage
, 0, 0, image_info
->bmiHeader
.biWidth
, image_info
->bmiHeader
.biHeight
,
2290 0, 0, image_info
->bmiHeader
.biWidth
, image_info
->bmiHeader
.biHeight
,
2291 image_bits
, image_info
, DIB_RGB_COLORS
, SRCCOPY
);
2293 StretchDIBits( himl
->hdcMask
, 0, 0, mask_info
->bmiHeader
.biWidth
, mask_info
->bmiHeader
.biHeight
,
2294 0, 0, mask_info
->bmiHeader
.biWidth
, mask_info
->bmiHeader
.biHeight
,
2295 mask_bits
, mask_info
, DIB_RGB_COLORS
, SRCCOPY
);
2300 himl
->cCurImage
= ilHead
.cCurImage
;
2301 himl
->cMaxImage
= ilHead
.cMaxImage
;
2303 ImageList_SetBkColor(himl
,ilHead
.bkcolor
);
2305 ImageList_SetOverlayImage(himl
,ilHead
.ovls
[i
],i
+1);
2310 /*************************************************************************
2311 * ImageList_Remove [COMCTL32.@]
2313 * Removes an image from an image list
2316 * himl [I] image list handle
2323 * FIXME: as the image list storage test shows, native comctl32 simply shifts
2324 * images without creating a new bitmap.
2327 ImageList_Remove (HIMAGELIST himl
, INT i
)
2329 HBITMAP hbmNewImage
, hbmNewMask
;
2333 TRACE("(himl=%p i=%d)\n", himl
, i
);
2335 if (!is_valid(himl
)) {
2336 ERR("Invalid image list handle!\n");
2340 if ((i
< -1) || (i
>= himl
->cCurImage
)) {
2341 TRACE("index out of range! %d\n", i
);
2349 if (himl
->cCurImage
== 0) {
2350 /* remove all on empty ImageList is allowed */
2351 TRACE("remove all on empty ImageList!\n");
2355 himl
->cMaxImage
= himl
->cInitial
+ himl
->cGrow
- 1;
2356 himl
->cCurImage
= 0;
2357 for (nCount
= 0; nCount
< MAX_OVERLAYIMAGE
; nCount
++)
2358 himl
->nOvlIdx
[nCount
] = -1;
2360 hbmNewImage
= ImageList_CreateImage(himl
->hdcImage
, himl
, himl
->cMaxImage
);
2361 SelectObject (himl
->hdcImage
, hbmNewImage
);
2362 DeleteObject (himl
->hbmImage
);
2363 himl
->hbmImage
= hbmNewImage
;
2365 if (himl
->hbmMask
) {
2367 imagelist_get_bitmap_size(himl
, himl
->cMaxImage
, &sz
);
2368 hbmNewMask
= CreateBitmap (sz
.cx
, sz
.cy
, 1, 1, NULL
);
2369 SelectObject (himl
->hdcMask
, hbmNewMask
);
2370 DeleteObject (himl
->hbmMask
);
2371 himl
->hbmMask
= hbmNewMask
;
2375 /* delete one image */
2376 TRACE("Remove single image! %d\n", i
);
2378 /* create new bitmap(s) */
2379 TRACE(" - Number of images: %d / %d (Old/New)\n",
2380 himl
->cCurImage
, himl
->cCurImage
- 1);
2382 hbmNewImage
= ImageList_CreateImage(himl
->hdcImage
, himl
, himl
->cMaxImage
);
2384 imagelist_get_bitmap_size(himl
, himl
->cMaxImage
, &sz
);
2386 hbmNewMask
= CreateBitmap (sz
.cx
, sz
.cy
, 1, 1, NULL
);
2388 hbmNewMask
= 0; /* Just to keep compiler happy! */
2390 hdcBmp
= CreateCompatibleDC (0);
2392 /* copy all images and masks prior to the "removed" image */
2394 TRACE("Pre image copy: Copy %d images\n", i
);
2396 SelectObject (hdcBmp
, hbmNewImage
);
2397 imagelist_copy_images( himl
, himl
->hdcImage
, hdcBmp
, 0, i
, 0 );
2399 if (himl
->hbmMask
) {
2400 SelectObject (hdcBmp
, hbmNewMask
);
2401 imagelist_copy_images( himl
, himl
->hdcMask
, hdcBmp
, 0, i
, 0 );
2405 /* copy all images and masks behind the removed image */
2406 if (i
< himl
->cCurImage
- 1) {
2407 TRACE("Post image copy!\n");
2409 SelectObject (hdcBmp
, hbmNewImage
);
2410 imagelist_copy_images( himl
, himl
->hdcImage
, hdcBmp
, i
+ 1,
2411 (himl
->cCurImage
- i
), i
);
2413 if (himl
->hbmMask
) {
2414 SelectObject (hdcBmp
, hbmNewMask
);
2415 imagelist_copy_images( himl
, himl
->hdcMask
, hdcBmp
, i
+ 1,
2416 (himl
->cCurImage
- i
), i
);
2422 /* delete old images and insert new ones */
2423 SelectObject (himl
->hdcImage
, hbmNewImage
);
2424 DeleteObject (himl
->hbmImage
);
2425 himl
->hbmImage
= hbmNewImage
;
2426 if (himl
->hbmMask
) {
2427 SelectObject (himl
->hdcMask
, hbmNewMask
);
2428 DeleteObject (himl
->hbmMask
);
2429 himl
->hbmMask
= hbmNewMask
;
2439 /*************************************************************************
2440 * ImageList_Replace [COMCTL32.@]
2442 * Replaces an image in an image list with a new image.
2445 * himl [I] handle to image list
2447 * hbmImage [I] handle to image bitmap
2448 * hbmMask [I] handle to mask bitmap. Can be NULL.
2456 ImageList_Replace (HIMAGELIST himl
, INT i
, HBITMAP hbmImage
,
2463 TRACE("%p %d %p %p\n", himl
, i
, hbmImage
, hbmMask
);
2465 if (!is_valid(himl
)) {
2466 ERR("Invalid image list handle!\n");
2470 if ((i
>= himl
->cMaxImage
) || (i
< 0)) {
2471 ERR("Invalid image index!\n");
2475 if (!GetObjectW(hbmImage
, sizeof(BITMAP
), &bmp
))
2478 hdcImage
= CreateCompatibleDC (0);
2481 SelectObject (hdcImage
, hbmImage
);
2483 if (add_with_alpha( himl
, hdcImage
, i
, 1, bmp
.bmWidth
, bmp
.bmHeight
, hbmImage
, hbmMask
))
2486 imagelist_point_from_index(himl
, i
, &pt
);
2487 StretchBlt (himl
->hdcImage
, pt
.x
, pt
.y
, himl
->cx
, himl
->cy
,
2488 hdcImage
, 0, 0, bmp
.bmWidth
, bmp
.bmHeight
, SRCCOPY
);
2493 HBITMAP hOldBitmapTemp
;
2495 hdcTemp
= CreateCompatibleDC(0);
2496 hOldBitmapTemp
= SelectObject(hdcTemp
, hbmMask
);
2498 StretchBlt (himl
->hdcMask
, pt
.x
, pt
.y
, himl
->cx
, himl
->cy
,
2499 hdcTemp
, 0, 0, bmp
.bmWidth
, bmp
.bmHeight
, SRCCOPY
);
2500 SelectObject(hdcTemp
, hOldBitmapTemp
);
2503 /* Remove the background from the image
2505 BitBlt (himl
->hdcImage
, pt
.x
, pt
.y
, bmp
.bmWidth
, bmp
.bmHeight
,
2506 himl
->hdcMask
, pt
.x
, pt
.y
, 0x220326); /* NOTSRCAND */
2510 DeleteDC (hdcImage
);
2516 /*************************************************************************
2517 * ImageList_ReplaceIcon [COMCTL32.@]
2519 * Replaces an image in an image list using an icon.
2522 * himl [I] handle to image list
2524 * hIcon [I] handle to icon
2527 * Success: index of the replaced image
2532 ImageList_ReplaceIcon (HIMAGELIST himl
, INT nIndex
, HICON hIcon
)
2540 TRACE("(%p %d %p)\n", himl
, nIndex
, hIcon
);
2542 if (!is_valid(himl
)) {
2543 ERR("invalid image list\n");
2546 if ((nIndex
>= himl
->cMaxImage
) || (nIndex
< -1)) {
2547 ERR("invalid image index %d / %d\n", nIndex
, himl
->cMaxImage
);
2551 hBestFitIcon
= CopyImage(
2554 LR_COPYFROMRESOURCE
);
2555 /* the above will fail if the icon wasn't loaded from a resource, so try
2556 * again without LR_COPYFROMRESOURCE flag */
2558 hBestFitIcon
= CopyImage(
2566 if (himl
->cCurImage
+ 1 > himl
->cMaxImage
)
2567 IMAGELIST_InternalExpandBitmaps(himl
, 1);
2569 nIndex
= himl
->cCurImage
;
2573 if (himl
->has_alpha
&& GetIconInfo (hBestFitIcon
, &ii
))
2575 HDC hdcImage
= CreateCompatibleDC( 0 );
2576 GetObjectW (ii
.hbmMask
, sizeof(BITMAP
), &bmp
);
2580 UINT height
= bmp
.bmHeight
/ 2;
2581 HDC hdcMask
= CreateCompatibleDC( 0 );
2582 HBITMAP color
= CreateBitmap( bmp
.bmWidth
, height
, 1, 1, NULL
);
2583 SelectObject( hdcImage
, color
);
2584 SelectObject( hdcMask
, ii
.hbmMask
);
2585 BitBlt( hdcImage
, 0, 0, bmp
.bmWidth
, height
, hdcMask
, 0, height
, SRCCOPY
);
2586 ret
= add_with_alpha( himl
, hdcImage
, nIndex
, 1, bmp
.bmWidth
, height
, color
, ii
.hbmMask
);
2587 DeleteDC( hdcMask
);
2588 DeleteObject( color
);
2590 else ret
= add_with_alpha( himl
, hdcImage
, nIndex
, 1, bmp
.bmWidth
, bmp
.bmHeight
,
2591 ii
.hbmColor
, ii
.hbmMask
);
2593 DeleteDC( hdcImage
);
2594 DeleteObject (ii
.hbmMask
);
2595 if (ii
.hbmColor
) DeleteObject (ii
.hbmColor
);
2599 imagelist_point_from_index(himl
, nIndex
, &pt
);
2603 DrawIconEx( himl
->hdcImage
, pt
.x
, pt
.y
, hBestFitIcon
, himl
->cx
, himl
->cy
, 0, 0, DI_IMAGE
);
2604 PatBlt( himl
->hdcMask
, pt
.x
, pt
.y
, himl
->cx
, himl
->cy
, WHITENESS
);
2605 DrawIconEx( himl
->hdcMask
, pt
.x
, pt
.y
, hBestFitIcon
, himl
->cx
, himl
->cy
, 0, 0, DI_MASK
);
2609 COLORREF color
= himl
->clrBk
!= CLR_NONE
? himl
->clrBk
: comctl32_color
.clrWindow
;
2610 HBRUSH brush
= CreateSolidBrush( GetNearestColor( himl
->hdcImage
, color
));
2612 SelectObject( himl
->hdcImage
, brush
);
2613 PatBlt( himl
->hdcImage
, pt
.x
, pt
.y
, himl
->cx
, himl
->cy
, PATCOPY
);
2614 SelectObject( himl
->hdcImage
, GetStockObject(BLACK_BRUSH
) );
2615 DeleteObject( brush
);
2616 DrawIconEx( himl
->hdcImage
, pt
.x
, pt
.y
, hBestFitIcon
, himl
->cx
, himl
->cy
, 0, 0, DI_NORMAL
);
2620 DestroyIcon(hBestFitIcon
);
2622 TRACE("Insert index = %d, himl->cCurImage = %d\n", nIndex
, himl
->cCurImage
);
2627 /*************************************************************************
2628 * ImageList_SetBkColor [COMCTL32.@]
2630 * Sets the background color of an image list.
2633 * himl [I] handle to image list
2634 * clrBk [I] background color
2637 * Success: previous background color
2642 ImageList_SetBkColor (HIMAGELIST himl
, COLORREF clrBk
)
2646 if (!is_valid(himl
))
2649 clrOldBk
= himl
->clrBk
;
2650 himl
->clrBk
= clrBk
;
2655 /*************************************************************************
2656 * ImageList_SetDragCursorImage [COMCTL32.@]
2658 * Combines the specified image with the current drag image
2661 * himlDrag [I] handle to drag image list
2662 * iDrag [I] drag image index
2663 * dxHotspot [I] X position of the hot spot
2664 * dyHotspot [I] Y position of the hot spot
2671 * - The names dxHotspot, dyHotspot are misleading because they have nothing
2672 * to do with a hotspot but are only the offset of the origin of the new
2673 * image relative to the origin of the old image.
2675 * - When this function is called and the drag image is visible, a
2676 * short flickering occurs but this matches the Win9x behavior. It is
2677 * possible to fix the flickering using code like in ImageList_DragMove.
2681 ImageList_SetDragCursorImage (HIMAGELIST himlDrag
, INT iDrag
,
2682 INT dxHotspot
, INT dyHotspot
)
2684 HIMAGELIST himlTemp
;
2687 if (!is_valid(InternalDrag
.himl
) || !is_valid(himlDrag
))
2690 TRACE(" dxH=%d dyH=%d nX=%d nY=%d\n",
2691 dxHotspot
, dyHotspot
, InternalDrag
.dxHotspot
, InternalDrag
.dyHotspot
);
2693 visible
= InternalDrag
.bShow
;
2695 himlTemp
= ImageList_Merge (InternalDrag
.himl
, 0, himlDrag
, iDrag
,
2696 dxHotspot
, dyHotspot
);
2699 /* hide the drag image */
2700 ImageList_DragShowNolock(FALSE
);
2702 if ((InternalDrag
.himl
->cx
!= himlTemp
->cx
) ||
2703 (InternalDrag
.himl
->cy
!= himlTemp
->cy
)) {
2704 /* the size of the drag image changed, invalidate the buffer */
2705 DeleteObject(InternalDrag
.hbmBg
);
2706 InternalDrag
.hbmBg
= 0;
2709 ImageList_Destroy (InternalDrag
.himl
);
2710 InternalDrag
.himl
= himlTemp
;
2713 /* show the drag image */
2714 ImageList_DragShowNolock(TRUE
);
2721 /*************************************************************************
2722 * ImageList_SetFilter [COMCTL32.@]
2724 * Sets a filter (or does something completely different)!!???
2725 * It removes 12 Bytes from the stack (3 Parameters).
2728 * himl [I] SHOULD be a handle to image list
2729 * i [I] COULD be an index?
2734 * Failure: FALSE ???
2737 * This is an UNDOCUMENTED function!!!!
2742 ImageList_SetFilter (HIMAGELIST himl
, INT i
, DWORD dwFilter
)
2744 FIXME("(%p 0x%x 0x%x):empty stub!\n", himl
, i
, dwFilter
);
2750 /*************************************************************************
2751 * ImageList_SetFlags [COMCTL32.@]
2753 * Sets the image list flags.
2756 * himl [I] Handle to image list
2757 * flags [I] Flags to set
2767 ImageList_SetFlags(HIMAGELIST himl
, DWORD flags
)
2769 FIXME("(%p %08x):empty stub\n", himl
, flags
);
2774 /*************************************************************************
2775 * ImageList_SetIconSize [COMCTL32.@]
2777 * Sets the image size of the bitmap and deletes all images.
2780 * himl [I] handle to image list
2781 * cx [I] image width
2782 * cy [I] image height
2790 ImageList_SetIconSize (HIMAGELIST himl
, INT cx
, INT cy
)
2795 if (!is_valid(himl
))
2798 /* remove all images */
2799 himl
->cMaxImage
= himl
->cInitial
+ 1;
2800 himl
->cCurImage
= 0;
2804 /* initialize overlay mask indices */
2805 for (nCount
= 0; nCount
< MAX_OVERLAYIMAGE
; nCount
++)
2806 himl
->nOvlIdx
[nCount
] = -1;
2808 hbmNew
= ImageList_CreateImage(himl
->hdcImage
, himl
, himl
->cMaxImage
);
2809 SelectObject (himl
->hdcImage
, hbmNew
);
2810 DeleteObject (himl
->hbmImage
);
2811 himl
->hbmImage
= hbmNew
;
2813 if (himl
->hbmMask
) {
2815 imagelist_get_bitmap_size(himl
, himl
->cMaxImage
, &sz
);
2816 hbmNew
= CreateBitmap (sz
.cx
, sz
.cy
, 1, 1, NULL
);
2817 SelectObject (himl
->hdcMask
, hbmNew
);
2818 DeleteObject (himl
->hbmMask
);
2819 himl
->hbmMask
= hbmNew
;
2826 /*************************************************************************
2827 * ImageList_SetImageCount [COMCTL32.@]
2829 * Resizes an image list to the specified number of images.
2832 * himl [I] handle to image list
2833 * iImageCount [I] number of images in the image list
2841 ImageList_SetImageCount (HIMAGELIST himl
, UINT iImageCount
)
2844 HBITMAP hbmNewBitmap
, hbmOld
;
2845 INT nNewCount
, nCopyCount
;
2847 TRACE("%p %d\n",himl
,iImageCount
);
2849 if (!is_valid(himl
))
2851 if (himl
->cMaxImage
> iImageCount
)
2853 himl
->cCurImage
= iImageCount
;
2854 /* TODO: shrink the bitmap when cMaxImage-cCurImage>cGrow ? */
2858 nNewCount
= iImageCount
+ himl
->cGrow
;
2859 nCopyCount
= min(himl
->cCurImage
, iImageCount
);
2861 hdcBitmap
= CreateCompatibleDC (0);
2863 hbmNewBitmap
= ImageList_CreateImage(hdcBitmap
, himl
, nNewCount
);
2865 if (hbmNewBitmap
!= 0)
2867 hbmOld
= SelectObject (hdcBitmap
, hbmNewBitmap
);
2868 imagelist_copy_images( himl
, himl
->hdcImage
, hdcBitmap
, 0, nCopyCount
, 0 );
2869 SelectObject (hdcBitmap
, hbmOld
);
2871 /* FIXME: delete 'empty' image space? */
2873 SelectObject (himl
->hdcImage
, hbmNewBitmap
);
2874 DeleteObject (himl
->hbmImage
);
2875 himl
->hbmImage
= hbmNewBitmap
;
2878 ERR("Could not create new image bitmap !\n");
2883 imagelist_get_bitmap_size( himl
, nNewCount
, &sz
);
2884 hbmNewBitmap
= CreateBitmap (sz
.cx
, sz
.cy
, 1, 1, NULL
);
2885 if (hbmNewBitmap
!= 0)
2887 hbmOld
= SelectObject (hdcBitmap
, hbmNewBitmap
);
2888 imagelist_copy_images( himl
, himl
->hdcMask
, hdcBitmap
, 0, nCopyCount
, 0 );
2889 SelectObject (hdcBitmap
, hbmOld
);
2891 /* FIXME: delete 'empty' image space? */
2893 SelectObject (himl
->hdcMask
, hbmNewBitmap
);
2894 DeleteObject (himl
->hbmMask
);
2895 himl
->hbmMask
= hbmNewBitmap
;
2898 ERR("Could not create new mask bitmap!\n");
2901 DeleteDC (hdcBitmap
);
2903 if (himl
->has_alpha
)
2905 char *new_alpha
= HeapReAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY
, himl
->has_alpha
, nNewCount
);
2906 if (new_alpha
) himl
->has_alpha
= new_alpha
;
2909 HeapFree( GetProcessHeap(), 0, himl
->has_alpha
);
2910 himl
->has_alpha
= NULL
;
2914 /* Update max image count and current image count */
2915 himl
->cMaxImage
= nNewCount
;
2916 himl
->cCurImage
= iImageCount
;
2922 /*************************************************************************
2923 * ImageList_SetOverlayImage [COMCTL32.@]
2925 * Assigns an overlay mask index to an existing image in an image list.
2928 * himl [I] handle to image list
2929 * iImage [I] image index
2930 * iOverlay [I] overlay mask index
2938 ImageList_SetOverlayImage (HIMAGELIST himl
, INT iImage
, INT iOverlay
)
2940 if (!is_valid(himl
))
2942 if ((iOverlay
< 1) || (iOverlay
> MAX_OVERLAYIMAGE
))
2944 if ((iImage
!=-1) && ((iImage
< 0) || (iImage
> himl
->cCurImage
)))
2946 himl
->nOvlIdx
[iOverlay
- 1] = iImage
;
2952 /* helper for ImageList_Write - write bitmap to pstm
2953 * currently everything is written as 24 bit RGB, except masks
2956 _write_bitmap(HBITMAP hBitmap
, LPSTREAM pstm
)
2958 LPBITMAPFILEHEADER bmfh
;
2959 LPBITMAPINFOHEADER bmih
;
2960 LPBYTE data
= NULL
, lpBits
;
2962 INT bitCount
, sizeImage
, offBits
, totalSize
;
2964 BOOL result
= FALSE
;
2966 if (!GetObjectW(hBitmap
, sizeof(BITMAP
), &bm
))
2969 bitCount
= bm
.bmBitsPixel
;
2970 sizeImage
= get_dib_stride(bm
.bmWidth
, bitCount
) * bm
.bmHeight
;
2972 totalSize
= sizeof(BITMAPFILEHEADER
) + sizeof(BITMAPINFOHEADER
);
2974 totalSize
+= (1 << bitCount
) * sizeof(RGBQUAD
);
2975 offBits
= totalSize
;
2976 totalSize
+= sizeImage
;
2978 data
= Alloc(totalSize
);
2979 bmfh
= (LPBITMAPFILEHEADER
)data
;
2980 bmih
= (LPBITMAPINFOHEADER
)(data
+ sizeof(BITMAPFILEHEADER
));
2981 lpBits
= data
+ offBits
;
2983 /* setup BITMAPFILEHEADER */
2984 bmfh
->bfType
= (('M' << 8) | 'B');
2985 bmfh
->bfSize
= offBits
;
2986 bmfh
->bfReserved1
= 0;
2987 bmfh
->bfReserved2
= 0;
2988 bmfh
->bfOffBits
= offBits
;
2990 /* setup BITMAPINFOHEADER */
2991 bmih
->biSize
= sizeof(BITMAPINFOHEADER
);
2992 bmih
->biWidth
= bm
.bmWidth
;
2993 bmih
->biHeight
= bm
.bmHeight
;
2995 bmih
->biBitCount
= bitCount
;
2996 bmih
->biCompression
= BI_RGB
;
2997 bmih
->biSizeImage
= sizeImage
;
2998 bmih
->biXPelsPerMeter
= 0;
2999 bmih
->biYPelsPerMeter
= 0;
3000 bmih
->biClrUsed
= 0;
3001 bmih
->biClrImportant
= 0;
3004 result
= GetDIBits(xdc
, hBitmap
, 0, bm
.bmHeight
, lpBits
, (BITMAPINFO
*)bmih
, DIB_RGB_COLORS
) == bm
.bmHeight
;
3009 TRACE("width %u, height %u, planes %u, bpp %u\n",
3010 bmih
->biWidth
, bmih
->biHeight
,
3011 bmih
->biPlanes
, bmih
->biBitCount
);
3013 if(FAILED(IStream_Write(pstm
, data
, totalSize
, NULL
)))
3025 /*************************************************************************
3026 * ImageList_Write [COMCTL32.@]
3028 * Writes an image list to a stream.
3031 * himl [I] handle to image list
3032 * pstm [O] Pointer to a stream.
3043 ImageList_Write (HIMAGELIST himl
, LPSTREAM pstm
)
3048 TRACE("%p %p\n", himl
, pstm
);
3050 if (!is_valid(himl
))
3053 ilHead
.usMagic
= (('L' << 8) | 'I');
3054 ilHead
.usVersion
= 0x101;
3055 ilHead
.cCurImage
= himl
->cCurImage
;
3056 ilHead
.cMaxImage
= himl
->cMaxImage
;
3057 ilHead
.cGrow
= himl
->cGrow
;
3058 ilHead
.cx
= himl
->cx
;
3059 ilHead
.cy
= himl
->cy
;
3060 ilHead
.bkcolor
= himl
->clrBk
;
3061 ilHead
.flags
= himl
->flags
;
3062 for(i
= 0; i
< 4; i
++) {
3063 ilHead
.ovls
[i
] = himl
->nOvlIdx
[i
];
3066 TRACE("cx %u, cy %u, flags 0x04%x, cCurImage %u, cMaxImage %u\n",
3067 ilHead
.cx
, ilHead
.cy
, ilHead
.flags
, ilHead
.cCurImage
, ilHead
.cMaxImage
);
3069 if(FAILED(IStream_Write(pstm
, &ilHead
, sizeof(ILHEAD
), NULL
)))
3072 /* write the bitmap */
3073 if(!_write_bitmap(himl
->hbmImage
, pstm
))
3076 /* write the mask if we have one */
3077 if(himl
->flags
& ILC_MASK
) {
3078 if(!_write_bitmap(himl
->hbmMask
, pstm
))
3086 static HBITMAP
ImageList_CreateImage(HDC hdc
, HIMAGELIST himl
, UINT count
)
3088 HBITMAP hbmNewBitmap
;
3089 UINT ilc
= (himl
->flags
& 0xFE);
3092 imagelist_get_bitmap_size( himl
, count
, &sz
);
3094 if ((ilc
>= ILC_COLOR4
&& ilc
<= ILC_COLOR32
) || ilc
== ILC_COLOR
)
3096 char buffer
[FIELD_OFFSET( BITMAPINFO
, bmiColors
[256] )];
3097 BITMAPINFO
*bmi
= (BITMAPINFO
*)buffer
;
3099 TRACE("Creating DIBSection %d x %d, %d Bits per Pixel\n",
3100 sz
.cx
, sz
.cy
, himl
->uBitsPixel
);
3102 memset( buffer
, 0, sizeof(buffer
) );
3103 bmi
->bmiHeader
.biSize
= sizeof(BITMAPINFOHEADER
);
3104 bmi
->bmiHeader
.biWidth
= sz
.cx
;
3105 bmi
->bmiHeader
.biHeight
= sz
.cy
;
3106 bmi
->bmiHeader
.biPlanes
= 1;
3107 bmi
->bmiHeader
.biBitCount
= himl
->uBitsPixel
;
3108 bmi
->bmiHeader
.biCompression
= BI_RGB
;
3110 if (himl
->uBitsPixel
<= ILC_COLOR8
)
3112 /* retrieve the default color map */
3113 HBITMAP tmp
= CreateBitmap( 1, 1, 1, 1, NULL
);
3114 GetDIBits( hdc
, tmp
, 0, 0, NULL
, bmi
, DIB_RGB_COLORS
);
3115 DeleteObject( tmp
);
3117 hbmNewBitmap
= CreateDIBSection(hdc
, bmi
, DIB_RGB_COLORS
, NULL
, 0, 0);
3119 else /*if (ilc == ILC_COLORDDB)*/
3121 TRACE("Creating Bitmap: %d Bits per Pixel\n", himl
->uBitsPixel
);
3123 hbmNewBitmap
= CreateBitmap (sz
.cx
, sz
.cy
, 1, himl
->uBitsPixel
, NULL
);
3125 TRACE("returning %p\n", hbmNewBitmap
);
3126 return hbmNewBitmap
;
3129 /*************************************************************************
3130 * ImageList_SetColorTable [COMCTL32.@]
3132 * Sets the color table of an image list.
3135 * himl [I] Handle to the image list.
3136 * uStartIndex [I] The first index to set.
3137 * cEntries [I] Number of entries to set.
3138 * prgb [I] New color information for color table for the image list.
3141 * Success: Number of entries in the table that were set.
3145 * ImageList_Create(), SetDIBColorTable()
3149 ImageList_SetColorTable (HIMAGELIST himl
, UINT uStartIndex
, UINT cEntries
, CONST RGBQUAD
* prgb
)
3151 return SetDIBColorTable(himl
->hdcImage
, uStartIndex
, cEntries
, prgb
);
3154 /*************************************************************************
3155 * ImageList_CoCreateInstance [COMCTL32.@]
3157 * Creates a new imagelist instance and returns an interface pointer to it.
3160 * rclsid [I] A reference to the CLSID (CLSID_ImageList).
3161 * punkOuter [I] Pointer to IUnknown interface for aggregation, if desired
3162 * riid [I] Identifier of the requested interface.
3163 * ppv [O] Returns the address of the pointer requested, or NULL.
3167 * Failure: Error value.
3170 ImageList_CoCreateInstance (REFCLSID rclsid
, const IUnknown
*punkOuter
, REFIID riid
, void **ppv
)
3172 TRACE("(%s,%p,%s,%p)\n", debugstr_guid(rclsid
), punkOuter
, debugstr_guid(riid
), ppv
);
3174 if (!IsEqualCLSID(&CLSID_ImageList
, rclsid
))
3175 return E_NOINTERFACE
;
3177 return ImageListImpl_CreateInstance(punkOuter
, riid
, ppv
);
3181 /*************************************************************************
3182 * IImageList implementation
3185 static HRESULT WINAPI
ImageListImpl_QueryInterface(IImageList
*iface
,
3186 REFIID iid
, void **ppv
)
3188 HIMAGELIST This
= (HIMAGELIST
) iface
;
3189 TRACE("(%p,%s,%p)\n", iface
, debugstr_guid(iid
), ppv
);
3191 if (!ppv
) return E_INVALIDARG
;
3193 if (IsEqualIID(&IID_IUnknown
, iid
) || IsEqualIID(&IID_IImageList
, iid
))
3198 return E_NOINTERFACE
;
3201 IUnknown_AddRef((IUnknown
*)*ppv
);
3205 static ULONG WINAPI
ImageListImpl_AddRef(IImageList
*iface
)
3207 HIMAGELIST This
= (HIMAGELIST
) iface
;
3208 ULONG ref
= InterlockedIncrement(&This
->ref
);
3210 TRACE("(%p) refcount=%u\n", iface
, ref
);
3214 static ULONG WINAPI
ImageListImpl_Release(IImageList
*iface
)
3216 HIMAGELIST This
= (HIMAGELIST
) iface
;
3217 ULONG ref
= InterlockedDecrement(&This
->ref
);
3219 TRACE("(%p) refcount=%u\n", iface
, ref
);
3223 /* delete image bitmaps */
3224 if (This
->hbmImage
) DeleteObject (This
->hbmImage
);
3225 if (This
->hbmMask
) DeleteObject (This
->hbmMask
);
3227 /* delete image & mask DCs */
3228 if (This
->hdcImage
) DeleteDC (This
->hdcImage
);
3229 if (This
->hdcMask
) DeleteDC (This
->hdcMask
);
3231 /* delete blending brushes */
3232 if (This
->hbrBlend25
) DeleteObject (This
->hbrBlend25
);
3233 if (This
->hbrBlend50
) DeleteObject (This
->hbrBlend50
);
3235 This
->lpVtbl
= NULL
;
3236 HeapFree(GetProcessHeap(), 0, This
->has_alpha
);
3237 HeapFree(GetProcessHeap(), 0, This
);
3243 static HRESULT WINAPI
ImageListImpl_Add(IImageList
*iface
, HBITMAP hbmImage
,
3244 HBITMAP hbmMask
, int *pi
)
3246 HIMAGELIST This
= (HIMAGELIST
) iface
;
3252 ret
= ImageList_Add(This
, hbmImage
, hbmMask
);
3261 static HRESULT WINAPI
ImageListImpl_ReplaceIcon(IImageList
*iface
, int i
,
3262 HICON hicon
, int *pi
)
3264 HIMAGELIST This
= (HIMAGELIST
) iface
;
3270 ret
= ImageList_ReplaceIcon(This
, i
, hicon
);
3279 static HRESULT WINAPI
ImageListImpl_SetOverlayImage(IImageList
*iface
,
3280 int iImage
, int iOverlay
)
3282 return ImageList_SetOverlayImage((HIMAGELIST
) iface
, iImage
, iOverlay
)
3286 static HRESULT WINAPI
ImageListImpl_Replace(IImageList
*iface
, int i
,
3287 HBITMAP hbmImage
, HBITMAP hbmMask
)
3289 return ImageList_Replace((HIMAGELIST
) iface
, i
, hbmImage
, hbmMask
) ? S_OK
:
3293 static HRESULT WINAPI
ImageListImpl_AddMasked(IImageList
*iface
, HBITMAP hbmImage
,
3294 COLORREF crMask
, int *pi
)
3296 HIMAGELIST This
= (HIMAGELIST
) iface
;
3302 ret
= ImageList_AddMasked(This
, hbmImage
, crMask
);
3311 static HRESULT WINAPI
ImageListImpl_Draw(IImageList
*iface
,
3312 IMAGELISTDRAWPARAMS
*pimldp
)
3314 HIMAGELIST This
= (HIMAGELIST
) iface
;
3315 HIMAGELIST old_himl
;
3318 /* As far as I can tell, Windows simply ignores the contents of pimldp->himl
3319 so we shall simulate the same */
3320 old_himl
= pimldp
->himl
;
3321 pimldp
->himl
= This
;
3323 ret
= ImageList_DrawIndirect(pimldp
);
3325 pimldp
->himl
= old_himl
;
3326 return ret
? S_OK
: E_INVALIDARG
;
3329 static HRESULT WINAPI
ImageListImpl_Remove(IImageList
*iface
, int i
)
3331 return (ImageList_Remove((HIMAGELIST
) iface
, i
) == 0) ? E_INVALIDARG
: S_OK
;
3334 static HRESULT WINAPI
ImageListImpl_GetIcon(IImageList
*iface
, int i
, UINT flags
,
3342 hIcon
= ImageList_GetIcon((HIMAGELIST
) iface
, i
, flags
);
3351 static HRESULT WINAPI
ImageListImpl_GetImageInfo(IImageList
*iface
, int i
,
3352 IMAGEINFO
*pImageInfo
)
3354 return ImageList_GetImageInfo((HIMAGELIST
) iface
, i
, pImageInfo
) ? S_OK
: E_FAIL
;
3357 static HRESULT WINAPI
ImageListImpl_Copy(IImageList
*iface
, int iDst
,
3358 IUnknown
*punkSrc
, int iSrc
, UINT uFlags
)
3360 HIMAGELIST This
= (HIMAGELIST
) iface
;
3361 IImageList
*src
= NULL
;
3367 /* TODO: Add test for IID_ImageList2 too */
3368 if (FAILED(IImageList_QueryInterface(punkSrc
, &IID_IImageList
,
3372 if (ImageList_Copy(This
, iDst
, (HIMAGELIST
) src
, iSrc
, uFlags
))
3377 IImageList_Release(src
);
3381 static HRESULT WINAPI
ImageListImpl_Merge(IImageList
*iface
, int i1
,
3382 IUnknown
*punk2
, int i2
, int dx
, int dy
, REFIID riid
, void **ppv
)
3384 HIMAGELIST This
= (HIMAGELIST
) iface
;
3385 IImageList
*iml2
= NULL
;
3387 HRESULT ret
= E_FAIL
;
3389 TRACE("(%p)->(%d %p %d %d %d %s %p)\n", iface
, i1
, punk2
, i2
, dx
, dy
, debugstr_guid(riid
), ppv
);
3391 /* TODO: Add test for IID_ImageList2 too */
3392 if (FAILED(IImageList_QueryInterface(punk2
, &IID_IImageList
,
3396 hNew
= ImageList_Merge(This
, i1
, (HIMAGELIST
) iml2
, i2
, dx
, dy
);
3398 /* Get the interface for the new image list */
3401 IImageList
*imerge
= (IImageList
*)hNew
;
3403 ret
= HIMAGELIST_QueryInterface(hNew
, riid
, ppv
);
3404 IImageList_Release(imerge
);
3407 IImageList_Release(iml2
);
3411 static HRESULT WINAPI
ImageListImpl_Clone(IImageList
*iface
, REFIID riid
, void **ppv
)
3413 HIMAGELIST This
= (HIMAGELIST
) iface
;
3415 HRESULT ret
= E_FAIL
;
3417 TRACE("(%p)->(%s %p)\n", iface
, debugstr_guid(riid
), ppv
);
3419 clone
= ImageList_Duplicate(This
);
3421 /* Get the interface for the new image list */
3424 IImageList
*iclone
= (IImageList
*)clone
;
3426 ret
= HIMAGELIST_QueryInterface(clone
, riid
, ppv
);
3427 IImageList_Release(iclone
);
3433 static HRESULT WINAPI
ImageListImpl_GetImageRect(IImageList
*iface
, int i
,
3436 HIMAGELIST This
= (HIMAGELIST
) iface
;
3442 if (!ImageList_GetImageInfo(This
, i
, &info
))
3445 return CopyRect(prc
, &info
.rcImage
) ? S_OK
: E_FAIL
;
3448 static HRESULT WINAPI
ImageListImpl_GetIconSize(IImageList
*iface
, int *cx
,
3451 HIMAGELIST This
= (HIMAGELIST
) iface
;
3453 return ImageList_GetIconSize(This
, cx
, cy
) ? S_OK
: E_INVALIDARG
;
3456 static HRESULT WINAPI
ImageListImpl_SetIconSize(IImageList
*iface
, int cx
,
3459 return ImageList_SetIconSize((HIMAGELIST
) iface
, cx
, cy
) ? S_OK
: E_FAIL
;
3462 static HRESULT WINAPI
ImageListImpl_GetImageCount(IImageList
*iface
, int *pi
)
3464 *pi
= ImageList_GetImageCount((HIMAGELIST
) iface
);
3468 static HRESULT WINAPI
ImageListImpl_SetImageCount(IImageList
*iface
,
3471 return ImageList_SetImageCount((HIMAGELIST
) iface
, uNewCount
) ? S_OK
: E_FAIL
;
3474 static HRESULT WINAPI
ImageListImpl_SetBkColor(IImageList
*iface
, COLORREF clrBk
,
3477 *pclr
= ImageList_SetBkColor((HIMAGELIST
) iface
, clrBk
);
3481 static HRESULT WINAPI
ImageListImpl_GetBkColor(IImageList
*iface
, COLORREF
*pclr
)
3483 *pclr
= ImageList_GetBkColor((HIMAGELIST
) iface
);
3487 static HRESULT WINAPI
ImageListImpl_BeginDrag(IImageList
*iface
, int iTrack
,
3488 int dxHotspot
, int dyHotspot
)
3490 return ImageList_BeginDrag((HIMAGELIST
) iface
, iTrack
, dxHotspot
, dyHotspot
) ? S_OK
: E_FAIL
;
3493 static HRESULT WINAPI
ImageListImpl_EndDrag(IImageList
*iface
)
3495 ImageList_EndDrag();
3499 static HRESULT WINAPI
ImageListImpl_DragEnter(IImageList
*iface
, HWND hwndLock
,
3502 return ImageList_DragEnter(hwndLock
, x
, y
) ? S_OK
: E_FAIL
;
3505 static HRESULT WINAPI
ImageListImpl_DragLeave(IImageList
*iface
, HWND hwndLock
)
3507 return ImageList_DragLeave(hwndLock
) ? S_OK
: E_FAIL
;
3510 static HRESULT WINAPI
ImageListImpl_DragMove(IImageList
*iface
, int x
, int y
)
3512 return ImageList_DragMove(x
, y
) ? S_OK
: E_FAIL
;
3515 static HRESULT WINAPI
ImageListImpl_SetDragCursorImage(IImageList
*iface
,
3516 IUnknown
*punk
, int iDrag
, int dxHotspot
, int dyHotspot
)
3518 IImageList
*iml2
= NULL
;
3524 /* TODO: Add test for IID_ImageList2 too */
3525 if (FAILED(IImageList_QueryInterface(punk
, &IID_IImageList
,
3529 ret
= ImageList_SetDragCursorImage((HIMAGELIST
) iml2
, iDrag
, dxHotspot
,
3532 IImageList_Release(iml2
);
3534 return ret
? S_OK
: E_FAIL
;
3537 static HRESULT WINAPI
ImageListImpl_DragShowNolock(IImageList
*iface
, BOOL fShow
)
3539 return ImageList_DragShowNolock(fShow
) ? S_OK
: E_FAIL
;
3542 static HRESULT WINAPI
ImageListImpl_GetDragImage(IImageList
*iface
, POINT
*ppt
,
3543 POINT
*pptHotspot
, REFIID riid
, PVOID
*ppv
)
3545 HRESULT ret
= E_FAIL
;
3551 hNew
= ImageList_GetDragImage(ppt
, pptHotspot
);
3553 /* Get the interface for the new image list */
3556 IImageList
*idrag
= (IImageList
*)hNew
;
3558 ret
= HIMAGELIST_QueryInterface(hNew
, riid
, ppv
);
3559 IImageList_Release(idrag
);
3565 static HRESULT WINAPI
ImageListImpl_GetItemFlags(IImageList
*iface
, int i
,
3568 FIXME("STUB: %p %d %p\n", iface
, i
, dwFlags
);
3572 static HRESULT WINAPI
ImageListImpl_GetOverlayImage(IImageList
*iface
, int iOverlay
,
3575 HIMAGELIST This
= (HIMAGELIST
) iface
;
3578 if ((iOverlay
< 0) || (iOverlay
> This
->cCurImage
))
3581 for (i
= 0; i
< MAX_OVERLAYIMAGE
; i
++)
3583 if (This
->nOvlIdx
[i
] == iOverlay
)
3594 static const IImageListVtbl ImageListImpl_Vtbl
= {
3595 ImageListImpl_QueryInterface
,
3596 ImageListImpl_AddRef
,
3597 ImageListImpl_Release
,
3599 ImageListImpl_ReplaceIcon
,
3600 ImageListImpl_SetOverlayImage
,
3601 ImageListImpl_Replace
,
3602 ImageListImpl_AddMasked
,
3604 ImageListImpl_Remove
,
3605 ImageListImpl_GetIcon
,
3606 ImageListImpl_GetImageInfo
,
3608 ImageListImpl_Merge
,
3609 ImageListImpl_Clone
,
3610 ImageListImpl_GetImageRect
,
3611 ImageListImpl_GetIconSize
,
3612 ImageListImpl_SetIconSize
,
3613 ImageListImpl_GetImageCount
,
3614 ImageListImpl_SetImageCount
,
3615 ImageListImpl_SetBkColor
,
3616 ImageListImpl_GetBkColor
,
3617 ImageListImpl_BeginDrag
,
3618 ImageListImpl_EndDrag
,
3619 ImageListImpl_DragEnter
,
3620 ImageListImpl_DragLeave
,
3621 ImageListImpl_DragMove
,
3622 ImageListImpl_SetDragCursorImage
,
3623 ImageListImpl_DragShowNolock
,
3624 ImageListImpl_GetDragImage
,
3625 ImageListImpl_GetItemFlags
,
3626 ImageListImpl_GetOverlayImage
3629 static BOOL
is_valid(HIMAGELIST himl
)
3634 valid
= himl
&& himl
->lpVtbl
== &ImageListImpl_Vtbl
;
3644 /*************************************************************************
3645 * HIMAGELIST_QueryInterface [COMCTL32.@]
3647 * Returns a pointer to an IImageList or IImageList2 object for the given
3651 * himl [I] Image list handle.
3652 * riid [I] Identifier of the requested interface.
3653 * ppv [O] Returns the address of the pointer requested, or NULL.
3657 * Failure: Error value.
3660 HIMAGELIST_QueryInterface (HIMAGELIST himl
, REFIID riid
, void **ppv
)
3662 TRACE("(%p,%s,%p)\n", himl
, debugstr_guid(riid
), ppv
);
3663 return IImageList_QueryInterface((IImageList
*) himl
, riid
, ppv
);
3666 static HRESULT
ImageListImpl_CreateInstance(const IUnknown
*pUnkOuter
, REFIID iid
, void** ppv
)
3671 TRACE("(%p,%s,%p)\n", pUnkOuter
, debugstr_guid(iid
), ppv
);
3675 if (pUnkOuter
) return CLASS_E_NOAGGREGATION
;
3677 This
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(struct _IMAGELIST
));
3678 if (!This
) return E_OUTOFMEMORY
;
3680 This
->lpVtbl
= &ImageListImpl_Vtbl
;
3683 ret
= IUnknown_QueryInterface((IUnknown
*)This
, iid
, ppv
);
3684 IUnknown_Release((IUnknown
*)This
);