src/msw/bitmap.cpp

   1 ////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/bitmap.cpp
   3 // Purpose:     wxBitmap
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24     #pragma hdrstop
  25 #endif
  26
  27 #include "wx/bitmap.h"
  28
  29 #ifndef WX_PRECOMP
  30     #include <stdio.h>
  31
  32     #include "wx/list.h"
  33     #include "wx/utils.h"
  34     #include "wx/app.h"
  35     #include "wx/palette.h"
  36     #include "wx/dcmemory.h"
  37     #include "wx/icon.h"
  38     #include "wx/log.h"
  39     #include "wx/image.h"
  40 #endif
  41
  42 #include "wx/msw/private.h"
  43
  44 #if wxUSE_WXDIB
  45     #include "wx/msw/dib.h"
  46 #endif
  47
  48 #ifdef wxHAVE_RAW_BITMAP
  49     #include "wx/rawbmp.h"
  50 #endif
  51
  52 // missing from mingw32 header
  53 #ifndef CLR_INVALID
  54     #define CLR_INVALID ((COLORREF)-1)
  55 #endif // no CLR_INVALID
  56
  57 // ----------------------------------------------------------------------------
  58 // Bitmap data
  59 // ----------------------------------------------------------------------------
  60
  61 class WXDLLEXPORT wxBitmapRefData : public wxGDIImageRefData
  62 {
  63 public:
  64     wxBitmapRefData();
  65     wxBitmapRefData(const wxBitmapRefData& data);
  66     virtual ~wxBitmapRefData() { Free(); }
  67
  68     virtual void Free();
  69
  70     // set the mask object to use as the mask, we take ownership of it
  71     void SetMask(wxMask *mask)
  72     {
  73         delete m_bitmapMask;
  74         m_bitmapMask = mask;
  75     }
  76
  77     // set the HBITMAP to use as the mask
  78     void SetMask(HBITMAP hbmpMask)
  79     {
  80         SetMask(new wxMask((WXHBITMAP)hbmpMask));
  81     }
  82
  83     // return the mask
  84     wxMask *GetMask() const { return m_bitmapMask; }
  85
  86 public:
  87 #if wxUSE_PALETTE
  88     wxPalette     m_bitmapPalette;
  89 #endif // wxUSE_PALETTE
  90
  91     // MSW-specific
  92     // ------------
  93
  94 #ifdef __WXDEBUG__
  95     // this field is solely for error checking: we detect selecting a bitmap
  96     // into more than one DC at once or deleting a bitmap still selected into a
  97     // DC (both are serious programming errors under Windows)
  98     wxDC         *m_selectedInto;
  99 #endif // __WXDEBUG__
 100
 101 #if wxUSE_WXDIB
 102     // when GetRawData() is called for a DDB we need to convert it to a DIB
 103     // first to be able to provide direct access to it and we cache that DIB
 104     // here and convert it back to DDB when UngetRawData() is called
 105     wxDIB *m_dib;
 106 #endif
 107
 108     // true if we have alpha transparency info and can be drawn using
 109     // AlphaBlend()
 110     bool m_hasAlpha;
 111
 112     // true if our HBITMAP is a DIB section, false if it is a DDB
 113     bool m_isDIB;
 114
 115 private:
 116     // optional mask for transparent drawing
 117     wxMask       *m_bitmapMask;
 118
 119
 120     // not implemented
 121     wxBitmapRefData& operator=(const wxBitmapRefData&);
 122 };
 123
 124 // ----------------------------------------------------------------------------
 125 // macros
 126 // ----------------------------------------------------------------------------
 127
 128 IMPLEMENT_DYNAMIC_CLASS(wxBitmap, wxGDIObject)
 129 IMPLEMENT_DYNAMIC_CLASS(wxMask, wxObject)
 130
 131 IMPLEMENT_DYNAMIC_CLASS(wxBitmapHandler, wxObject)
 132
 133 // ============================================================================
 134 // implementation
 135 // ============================================================================
 136
 137 // ----------------------------------------------------------------------------
 138 // helper functions
 139 // ----------------------------------------------------------------------------
 140
 141 // decide whether we should create a DIB or a DDB for the given parameters
 142 //
 143 // NB: we always use DIBs under Windows CE as this is much simpler (even if
 144 //     also less efficient...) and we obviously can't use them if there is no
 145 //     DIB support compiled in at all
 146 #ifdef __WXWINCE__
 147     static inline bool wxShouldCreateDIB(int, int, int, WXHDC) { return true; }
 148
 149     #define ALWAYS_USE_DIB
 150 #elif !wxUSE_WXDIB
 151     // no sense in defining wxShouldCreateDIB() as we can't compile code
 152     // executed if it is true, so we have to use #if's anyhow
 153     #define NEVER_USE_DIB
 154 #else // wxUSE_WXDIB && !__WXWINCE__
 155     static inline bool wxShouldCreateDIB(int w, int h, int d, WXHDC hdc)
 156     {
 157         // here is the logic:
 158         //
 159         //  (a) if hdc is specified, the caller explicitly wants DDB
 160         //  (b) otherwise, create a DIB if depth >= 24 (we don't support 16bpp
 161         //      or less DIBs anyhow)
 162         //  (c) finally, create DIBs under Win9x even if the depth hasn't been
 163         //      explicitly specified but the current display depth is 24 or
 164         //      more and the image is "big", i.e. > 16Mb which is the
 165         //      theoretical limit for DDBs under Win9x
 166         //
 167         // consequences (all of which seem to make sense):
 168         //
 169         //  (i)     by default, DDBs are created (depth == -1 usually)
 170         //  (ii)    DIBs can be created by explicitly specifying the depth
 171         //  (iii)   using a DC always forces creating a DDB
 172         return !hdc &&
 173                 (d >= 24 ||
 174                     (d == -1 &&
 175                         wxDIB::GetLineSize(w, wxDisplayDepth())*h > 16*1024*1024));
 176     }
 177
 178     #define SOMETIMES_USE_DIB
 179 #endif // different DIB usage scenarious
 180
 181 // ----------------------------------------------------------------------------
 182 // wxBitmapRefData
 183 // ----------------------------------------------------------------------------
 184
 185 wxBitmapRefData::wxBitmapRefData()
 186 {
 187 #ifdef __WXDEBUG__
 188     m_selectedInto = NULL;
 189 #endif
 190     m_bitmapMask = NULL;
 191
 192     m_hBitmap = (WXHBITMAP) NULL;
 193 #if wxUSE_WXDIB
 194     m_dib = NULL;
 195 #endif
 196
 197     m_isDIB =
 198     m_hasAlpha = false;
 199 }
 200
 201 wxBitmapRefData::wxBitmapRefData(const wxBitmapRefData& data)
 202                : wxGDIImageRefData(data)
 203 {
 204 #ifdef __WXDEBUG__
 205     m_selectedInto = NULL;
 206 #endif
 207
 208     // (deep) copy the mask if present
 209     m_bitmapMask = NULL;
 210     if (data.m_bitmapMask)
 211         m_bitmapMask = new wxMask(*data.m_bitmapMask);
 212
 213     // FIXME: we don't copy m_hBitmap currently but we should, see wxBitmap::
 214     //        CloneRefData()
 215
 216     wxASSERT_MSG( !data.m_isDIB,
 217                     _T("can't copy bitmap locked for raw access!") );
 218     m_isDIB = false;
 219
 220     m_hasAlpha = data.m_hasAlpha;
 221 }
 222
 223 void wxBitmapRefData::Free()
 224 {
 225     wxASSERT_MSG( !m_selectedInto,
 226                   wxT("deleting bitmap still selected into wxMemoryDC") );
 227
 228 #if wxUSE_WXDIB
 229     wxASSERT_MSG( !m_dib, _T("forgot to call wxBitmap::UngetRawData()!") );
 230 #endif
 231
 232     if ( m_hBitmap)
 233     {
 234         if ( !::DeleteObject((HBITMAP)m_hBitmap) )
 235         {
 236             wxLogLastError(wxT("DeleteObject(hbitmap)"));
 237         }
 238     }
 239
 240     delete m_bitmapMask;
 241     m_bitmapMask = NULL;
 242 }
 243
 244 // ----------------------------------------------------------------------------
 245 // wxBitmap creation
 246 // ----------------------------------------------------------------------------
 247
 248 wxGDIImageRefData *wxBitmap::CreateData() const
 249 {
 250     return new wxBitmapRefData;
 251 }
 252
 253 wxObjectRefData *wxBitmap::CloneRefData(const wxObjectRefData *dataOrig) const
 254 {
 255     const wxBitmapRefData *
 256         data = wx_static_cast(const wxBitmapRefData *, dataOrig);
 257     if ( !data )
 258         return NULL;
 259
 260     // FIXME: this method is backwards, it should just create a new
 261     //        wxBitmapRefData using its copy ctor but instead it modifies this
 262     //        bitmap itself and then returns its m_refData -- which works, of
 263     //        course (except in !wxUSE_WXDIB), but is completely illogical
 264     wxBitmap *self = wx_const_cast(wxBitmap *, this);
 265
 266 #if wxUSE_WXDIB
 267     // copy the other bitmap
 268     if ( data->m_hBitmap )
 269     {
 270         wxDIB dib((HBITMAP)(data->m_hBitmap));
 271         self->CopyFromDIB(dib);
 272     }
 273     else
 274 #endif // wxUSE_WXDIB
 275     {
 276         // copy the bitmap data
 277         self->m_refData = new wxBitmapRefData(*data);
 278     }
 279
 280     // copy also the mask
 281     wxMask * const maskSrc = data->GetMask();
 282     if ( maskSrc )
 283     {
 284         wxBitmapRefData *selfdata = wx_static_cast(wxBitmapRefData *, m_refData);
 285
 286         selfdata->SetMask(new wxMask(*maskSrc));
 287     }
 288
 289     return m_refData;
 290 }
 291
 292 bool wxBitmap::CopyFromIconOrCursor(const wxGDIImage& icon,
 293                                     wxBitmapTransparency transp)
 294 {
 295 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
 296     // it may be either HICON or HCURSOR
 297     HICON hicon = (HICON)icon.GetHandle();
 298
 299     ICONINFO iconInfo;
 300     if ( !::GetIconInfo(hicon, &iconInfo) )
 301     {
 302         wxLogLastError(wxT("GetIconInfo"));
 303
 304         return false;
 305     }
 306
 307     wxBitmapRefData *refData = new wxBitmapRefData;
 308     m_refData = refData;
 309
 310     int w = icon.GetWidth(),
 311         h = icon.GetHeight();
 312
 313     refData->m_width = w;
 314     refData->m_height = h;
 315     refData->m_depth = wxDisplayDepth();
 316
 317     refData->m_hBitmap = (WXHBITMAP)iconInfo.hbmColor;
 318
 319     switch ( transp )
 320     {
 321         default:
 322             wxFAIL_MSG( _T("unknown wxBitmapTransparency value") );
 323
 324         case wxBitmapTransparency_None:
 325             // nothing to do, refData->m_hasAlpha is false by default
 326             break;
 327
 328         case wxBitmapTransparency_Auto:
 329 #if wxUSE_WXDIB
 330             // If the icon is 32 bits per pixel then it may have alpha channel
 331             // data, although there are some icons that are 32 bpp but have no
 332             // alpha... So convert to a DIB and manually check the 4th byte for
 333             // each pixel.
 334             {
 335                 BITMAP bm;
 336                 if ( ::GetObject(iconInfo.hbmColor, sizeof(bm), &bm) &&
 337                         (bm.bmBitsPixel == 32) )
 338                 {
 339                     wxDIB dib(iconInfo.hbmColor);
 340                     if (dib.IsOk())
 341                     {
 342                         const unsigned char* pixels = dib.GetData();
 343                         for (int idx = 0; idx < w*h*4; idx+=4)
 344                         {
 345                             if (pixels[idx+3] != 0)
 346                             {
 347                                 // If there is an alpha byte that is non-zero
 348                                 // then set the alpha flag and stop checking
 349                                 refData->m_hasAlpha = true;
 350                                 break;
 351                             }
 352                         }
 353                     }
 354                 }
 355             }
 356             break;
 357 #endif // wxUSE_WXDIB
 358
 359         case wxBitmapTransparency_Always:
 360             refData->m_hasAlpha = true;
 361             break;
 362     }
 363
 364     if ( !refData->m_hasAlpha )
 365     {
 366         // the mask returned by GetIconInfo() is inverted compared to the usual
 367         // wxWin convention
 368         refData->SetMask(wxInvertMask(iconInfo.hbmMask, w, h));
 369     }
 370
 371     // delete the old one now as we don't need it any more
 372     ::DeleteObject(iconInfo.hbmMask);
 373
 374     return true;
 375 #else // __WXMICROWIN__ || __WXWINCE__
 376     wxUnusedVar(icon);
 377     wxUnusedVar(transp);
 378
 379     return false;
 380 #endif // !__WXWINCE__/__WXWINCE__
 381 }
 382
 383 bool wxBitmap::CopyFromCursor(const wxCursor& cursor, wxBitmapTransparency transp)
 384 {
 385     UnRef();
 386
 387     if ( !cursor.Ok() )
 388         return false;
 389
 390     return CopyFromIconOrCursor(cursor, transp);
 391 }
 392
 393 bool wxBitmap::CopyFromIcon(const wxIcon& icon, wxBitmapTransparency transp)
 394 {
 395     UnRef();
 396
 397     if ( !icon.Ok() )
 398         return false;
 399
 400     return CopyFromIconOrCursor(icon, transp);
 401 }
 402
 403 #ifndef NEVER_USE_DIB
 404
 405 bool wxBitmap::CopyFromDIB(const wxDIB& dib)
 406 {
 407     wxCHECK_MSG( dib.IsOk(), false, _T("invalid DIB in CopyFromDIB") );
 408
 409 #ifdef SOMETIMES_USE_DIB
 410     HBITMAP hbitmap = dib.CreateDDB();
 411     if ( !hbitmap )
 412         return false;
 413 #else // ALWAYS_USE_DIB
 414     HBITMAP hbitmap = ((wxDIB &)dib).Detach();  // const_cast
 415 #endif // SOMETIMES_USE_DIB/ALWAYS_USE_DIB
 416
 417     UnRef();
 418
 419     wxBitmapRefData *refData = new wxBitmapRefData;
 420     m_refData = refData;
 421
 422     refData->m_width = dib.GetWidth();
 423     refData->m_height = dib.GetHeight();
 424     refData->m_depth = dib.GetDepth();
 425
 426     refData->m_hBitmap = (WXHBITMAP)hbitmap;
 427
 428 #if wxUSE_PALETTE
 429     wxPalette *palette = dib.CreatePalette();
 430     if ( palette )
 431     {
 432         refData->m_bitmapPalette = *palette;
 433     }
 434
 435     delete palette;
 436 #endif // wxUSE_PALETTE
 437
 438     return true;
 439 }
 440
 441 #endif // NEVER_USE_DIB
 442
 443 wxBitmap::~wxBitmap()
 444 {
 445 }
 446
 447 wxBitmap::wxBitmap(const char bits[], int width, int height, int depth)
 448 {
 449 #ifndef __WXMICROWIN__
 450     wxBitmapRefData *refData = new wxBitmapRefData;
 451     m_refData = refData;
 452
 453     refData->m_width = width;
 454     refData->m_height = height;
 455     refData->m_depth = depth;
 456
 457     char *data;
 458     if ( depth == 1 )
 459     {
 460         // we assume that it is in XBM format which is not quite the same as
 461         // the format CreateBitmap() wants because the order of bytes in the
 462         // line is reversed!
 463         const size_t bytesPerLine = (width + 7) / 8;
 464         const size_t padding = bytesPerLine % 2;
 465         const size_t len = height * ( padding + bytesPerLine );
 466         data = (char *)malloc(len);
 467         const char *src = bits;
 468         char *dst = data;
 469
 470         for ( int rows = 0; rows < height; rows++ )
 471         {
 472             for ( size_t cols = 0; cols < bytesPerLine; cols++ )
 473             {
 474                 unsigned char val = *src++;
 475                 unsigned char reversed = 0;
 476
 477                 for ( int bits = 0; bits < 8; bits++)
 478                 {
 479                     reversed <<= 1;
 480                     reversed |= (unsigned char)(val & 0x01);
 481                     val >>= 1;
 482                 }
 483                 *dst++ = ~reversed;
 484             }
 485
 486             if ( padding )
 487                 *dst++ = 0;
 488         }
 489     }
 490     else
 491     {
 492         // bits should already be in Windows standard format
 493         data = (char *)bits;    // const_cast is harmless
 494     }
 495
 496     HBITMAP hbmp = ::CreateBitmap(width, height, 1, depth, data);
 497     if ( !hbmp )
 498     {
 499         wxLogLastError(wxT("CreateBitmap"));
 500     }
 501
 502     if ( data != bits )
 503     {
 504         free(data);
 505     }
 506
 507     SetHBITMAP((WXHBITMAP)hbmp);
 508 #endif
 509 }
 510
 511 wxBitmap::wxBitmap(int w, int h, int d)
 512 {
 513     (void)Create(w, h, d);
 514 }
 515
 516 wxBitmap::wxBitmap(int w, int h, const wxDC& dc)
 517 {
 518     (void)Create(w, h, dc);
 519 }
 520
 521 wxBitmap::wxBitmap(const void* data, long type, int width, int height, int depth)
 522 {
 523     (void)Create(data, type, width, height, depth);
 524 }
 525
 526 wxBitmap::wxBitmap(const wxString& filename, wxBitmapType type)
 527 {
 528     LoadFile(filename, (int)type);
 529 }
 530
 531 bool wxBitmap::Create(int width, int height, int depth)
 532 {
 533     return DoCreate(width, height, depth, 0);
 534 }
 535
 536 bool wxBitmap::Create(int width, int height, const wxDC& dc)
 537 {
 538     wxCHECK_MSG( dc.Ok(), false, _T("invalid HDC in wxBitmap::Create()") );
 539
 540     return DoCreate(width, height, -1, dc.GetHDC());
 541 }
 542
 543 bool wxBitmap::DoCreate(int w, int h, int d, WXHDC hdc)
 544 {
 545     UnRef();
 546
 547     m_refData = new wxBitmapRefData;
 548
 549     GetBitmapData()->m_width = w;
 550     GetBitmapData()->m_height = h;
 551
 552     HBITMAP hbmp    wxDUMMY_INITIALIZE(0);
 553
 554 #ifndef NEVER_USE_DIB
 555     if ( wxShouldCreateDIB(w, h, d, hdc) )
 556     {
 557         if ( d == -1 )
 558         {
 559             // create DIBs without alpha channel by default
 560             d = 24;
 561         }
 562
 563         wxDIB dib(w, h, d);
 564         if ( !dib.IsOk() )
 565            return false;
 566
 567         // don't delete the DIB section in dib object dtor
 568         hbmp = dib.Detach();
 569
 570         GetBitmapData()->m_isDIB = true;
 571         GetBitmapData()->m_depth = d;
 572     }
 573     else // create a DDB
 574 #endif // NEVER_USE_DIB
 575     {
 576 #ifndef ALWAYS_USE_DIB
 577 #ifndef __WXMICROWIN__
 578         if ( d > 0 )
 579         {
 580             hbmp = ::CreateBitmap(w, h, 1, d, NULL);
 581             if ( !hbmp )
 582             {
 583                 wxLogLastError(wxT("CreateBitmap"));
 584             }
 585
 586             GetBitmapData()->m_depth = d;
 587         }
 588         else // d == 0, create bitmap compatible with the screen
 589 #endif // !__WXMICROWIN__
 590         {
 591             ScreenHDC dc;
 592             hbmp = ::CreateCompatibleBitmap(dc, w, h);
 593             if ( !hbmp )
 594             {
 595                 wxLogLastError(wxT("CreateCompatibleBitmap"));
 596             }
 597
 598             GetBitmapData()->m_depth = wxDisplayDepth();
 599         }
 600 #endif // !ALWAYS_USE_DIB
 601     }
 602
 603     SetHBITMAP((WXHBITMAP)hbmp);
 604
 605     return Ok();
 606 }
 607
 608 #if wxUSE_IMAGE
 609
 610 // ----------------------------------------------------------------------------
 611 // wxImage to/from conversions for Microwin
 612 // ----------------------------------------------------------------------------
 613
 614 // Microwin versions are so different from normal ones that it really doesn't
 615 // make sense to use #ifdefs inside the function bodies
 616 #ifdef __WXMICROWIN__
 617
 618 bool wxBitmap::CreateFromImage(const wxImage& image, int depth, const wxDC& dc)
 619 {
 620     // Set this to 1 to experiment with mask code,
 621     // which currently doesn't work
 622     #define USE_MASKS 0
 623
 624     m_refData = new wxBitmapRefData();
 625
 626     // Initial attempt at a simple-minded implementation.
 627     // The bitmap will always be created at the screen depth,
 628     // so the 'depth' argument is ignored.
 629
 630     HDC hScreenDC = ::GetDC(NULL);
 631     int screenDepth = ::GetDeviceCaps(hScreenDC, BITSPIXEL);
 632
 633     HBITMAP hBitmap = ::CreateCompatibleBitmap(hScreenDC, image.GetWidth(), image.GetHeight());
 634     HBITMAP hMaskBitmap = NULL;
 635     HBITMAP hOldMaskBitmap = NULL;
 636     HDC hMaskDC = NULL;
 637     unsigned char maskR = 0;
 638     unsigned char maskG = 0;
 639     unsigned char maskB = 0;
 640
 641     //    printf("Created bitmap %d\n", (int) hBitmap);
 642     if (hBitmap == NULL)
 643     {
 644         ::ReleaseDC(NULL, hScreenDC);
 645         return false;
 646     }
 647     HDC hMemDC = ::CreateCompatibleDC(hScreenDC);
 648
 649     HBITMAP hOldBitmap = ::SelectObject(hMemDC, hBitmap);
 650     ::ReleaseDC(NULL, hScreenDC);
 651
 652     // created an mono-bitmap for the possible mask
 653     bool hasMask = image.HasMask();
 654
 655     if ( hasMask )
 656     {
 657 #if USE_MASKS
 658         // FIXME: we should be able to pass bpp = 1, but
 659         // GdBlit can't handle a different depth
 660 #if 0
 661         hMaskBitmap = ::CreateBitmap( (WORD)image.GetWidth(), (WORD)image.GetHeight(), 1, 1, NULL );
 662 #else
 663         hMaskBitmap = ::CreateCompatibleBitmap( hMemDC, (WORD)image.GetWidth(), (WORD)image.GetHeight());
 664 #endif
 665         maskR = image.GetMaskRed();
 666         maskG = image.GetMaskGreen();
 667         maskB = image.GetMaskBlue();
 668
 669         if (!hMaskBitmap)
 670         {
 671             hasMask = false;
 672         }
 673         else
 674         {
 675             hScreenDC = ::GetDC(NULL);
 676             hMaskDC = ::CreateCompatibleDC(hScreenDC);
 677            ::ReleaseDC(NULL, hScreenDC);
 678
 679             hOldMaskBitmap = ::SelectObject( hMaskDC, hMaskBitmap);
 680         }
 681 #else
 682         hasMask = false;
 683 #endif
 684     }
 685
 686     int i, j;
 687     for (i = 0; i < image.GetWidth(); i++)
 688     {
 689         for (j = 0; j < image.GetHeight(); j++)
 690         {
 691             unsigned char red = image.GetRed(i, j);
 692             unsigned char green = image.GetGreen(i, j);
 693             unsigned char blue = image.GetBlue(i, j);
 694
 695             ::SetPixel(hMemDC, i, j, PALETTERGB(red, green, blue));
 696
 697             if (hasMask)
 698             {
 699                 // scan the bitmap for the transparent colour and set the corresponding
 700                 // pixels in the mask to BLACK and the rest to WHITE
 701                 if (maskR == red && maskG == green && maskB == blue)
 702                     ::SetPixel(hMaskDC, i, j, PALETTERGB(0, 0, 0));
 703                 else
 704                     ::SetPixel(hMaskDC, i, j, PALETTERGB(255, 255, 255));
 705             }
 706         }
 707     }
 708
 709     ::SelectObject(hMemDC, hOldBitmap);
 710     ::DeleteDC(hMemDC);
 711     if (hasMask)
 712     {
 713         ::SelectObject(hMaskDC, hOldMaskBitmap);
 714         ::DeleteDC(hMaskDC);
 715
 716         ((wxBitmapRefData*)m_refData)->SetMask(hMaskBitmap);
 717     }
 718
 719     SetWidth(image.GetWidth());
 720     SetHeight(image.GetHeight());
 721     SetDepth(screenDepth);
 722     SetHBITMAP( (WXHBITMAP) hBitmap );
 723
 724 #if wxUSE_PALETTE
 725     // Copy the palette from the source image
 726     SetPalette(image.GetPalette());
 727 #endif // wxUSE_PALETTE
 728
 729     return true;
 730 }
 731
 732 wxImage wxBitmap::ConvertToImage() const
 733 {
 734     // Initial attempt at a simple-minded implementation.
 735     // The bitmap will always be created at the screen depth,
 736     // so the 'depth' argument is ignored.
 737     // TODO: transparency (create a mask image)
 738
 739     if (!Ok())
 740     {
 741         wxFAIL_MSG( wxT("bitmap is invalid") );
 742         return wxNullImage;
 743     }
 744
 745     wxImage image;
 746
 747     wxCHECK_MSG( Ok(), wxNullImage, wxT("invalid bitmap") );
 748
 749     // create an wxImage object
 750     int width = GetWidth();
 751     int height = GetHeight();
 752     image.Create( width, height );
 753     unsigned char *data = image.GetData();
 754     if( !data )
 755     {
 756         wxFAIL_MSG( wxT("could not allocate data for image") );
 757         return wxNullImage;
 758     }
 759
 760     HDC hScreenDC = ::GetDC(NULL);
 761
 762     HDC hMemDC = ::CreateCompatibleDC(hScreenDC);
 763     ::ReleaseDC(NULL, hScreenDC);
 764
 765     HBITMAP hBitmap = (HBITMAP) GetHBITMAP();
 766
 767     HBITMAP hOldBitmap = ::SelectObject(hMemDC, hBitmap);
 768
 769     int i, j;
 770     for (i = 0; i < GetWidth(); i++)
 771     {
 772         for (j = 0; j < GetHeight(); j++)
 773         {
 774             COLORREF color = ::GetPixel(hMemDC, i, j);
 775             unsigned char red = GetRValue(color);
 776             unsigned char green = GetGValue(color);
 777             unsigned char blue = GetBValue(color);
 778
 779             image.SetRGB(i, j, red, green, blue);
 780         }
 781     }
 782
 783     ::SelectObject(hMemDC, hOldBitmap);
 784     ::DeleteDC(hMemDC);
 785
 786 #if wxUSE_PALETTE
 787     // Copy the palette from the source image
 788     if (GetPalette())
 789         image.SetPalette(* GetPalette());
 790 #endif // wxUSE_PALETTE
 791
 792     return image;
 793 }
 794
 795 #endif // __WXMICROWIN__
 796
 797 // ----------------------------------------------------------------------------
 798 // wxImage to/from conversions
 799 // ----------------------------------------------------------------------------
 800
 801 bool wxBitmap::CreateFromImage(const wxImage& image, int depth)
 802 {
 803     return CreateFromImage(image, depth, 0);
 804 }
 805
 806 bool wxBitmap::CreateFromImage(const wxImage& image, const wxDC& dc)
 807 {
 808     wxCHECK_MSG( dc.Ok(), false,
 809                     _T("invalid HDC in wxBitmap::CreateFromImage()") );
 810
 811     return CreateFromImage(image, -1, dc.GetHDC());
 812 }
 813
 814 #if wxUSE_WXDIB
 815
 816 bool wxBitmap::CreateFromImage(const wxImage& image, int depth, WXHDC hdc)
 817 {
 818     wxCHECK_MSG( image.Ok(), false, wxT("invalid image") );
 819
 820     UnRef();
 821
 822     // first convert the image to DIB
 823     const int h = image.GetHeight();
 824     const int w = image.GetWidth();
 825
 826     wxDIB dib(image);
 827     if ( !dib.IsOk() )
 828         return false;
 829
 830     if ( depth == -1 )
 831         depth = dib.GetDepth(); // Get depth from image if none specified
 832
 833     // store the bitmap parameters
 834     wxBitmapRefData *refData = new wxBitmapRefData;
 835     refData->m_width = w;
 836     refData->m_height = h;
 837     refData->m_hasAlpha = image.HasAlpha();
 838
 839     m_refData = refData;
 840
 841
 842     // next either store DIB as is or create a DDB from it
 843     HBITMAP hbitmap     wxDUMMY_INITIALIZE(0);
 844
 845     // are we going to use DIB?
 846     //
 847     // NB: DDBs don't support alpha so if we have alpha channel we must use DIB
 848     if ( image.HasAlpha() || wxShouldCreateDIB(w, h, depth, hdc) )
 849     {
 850         // don't delete the DIB section in dib object dtor
 851         hbitmap = dib.Detach();
 852
 853         refData->m_isDIB = true;
 854         refData->m_depth = depth;
 855     }
 856 #ifndef ALWAYS_USE_DIB
 857     else // we need to convert DIB to DDB
 858     {
 859         hbitmap = dib.CreateDDB((HDC)hdc);
 860
 861         refData->m_depth = depth;
 862     }
 863 #endif // !ALWAYS_USE_DIB
 864
 865     // validate this object
 866     SetHBITMAP((WXHBITMAP)hbitmap);
 867
 868     // finally also set the mask if we have one
 869     if ( image.HasMask() )
 870     {
 871         const size_t len  = 2*((w+15)/16);
 872         BYTE *src  = image.GetData();
 873         BYTE *data = new BYTE[h*len];
 874         memset(data, 0, h*len);
 875         BYTE r = image.GetMaskRed(),
 876              g = image.GetMaskGreen(),
 877              b = image.GetMaskBlue();
 878         BYTE *dst = data;
 879         for ( int y = 0; y < h; y++, dst += len )
 880         {
 881             BYTE *dstLine = dst;
 882             BYTE mask = 0x80;
 883             for ( int x = 0; x < w; x++, src += 3 )
 884             {
 885                 if (src[0] != r || src[1] != g || src[2] != b)
 886                     *dstLine |= mask;
 887
 888                 if ( (mask >>= 1) == 0 )
 889                 {
 890                     dstLine++;
 891                     mask = 0x80;
 892                 }
 893             }
 894         }
 895
 896         hbitmap = ::CreateBitmap(w, h, 1, 1, data);
 897         if ( !hbitmap )
 898         {
 899             wxLogLastError(_T("CreateBitmap(mask)"));
 900         }
 901         else
 902         {
 903             SetMask(new wxMask((WXHBITMAP)hbitmap));
 904         }
 905
 906         delete[] data;
 907     }
 908
 909     return true;
 910 }
 911
 912 wxImage wxBitmap::ConvertToImage() const
 913 {
 914     // convert DDB to DIB
 915     wxDIB dib(*this);
 916
 917     if ( !dib.IsOk() )
 918     {
 919         return wxNullImage;
 920     }
 921
 922     // and then DIB to our wxImage
 923     wxImage image = dib.ConvertToImage();
 924     if ( !image.Ok() )
 925     {
 926         return wxNullImage;
 927     }
 928
 929     // now do the same for the mask, if we have any
 930     HBITMAP hbmpMask = GetMask() ? (HBITMAP) GetMask()->GetMaskBitmap() : NULL;
 931     if ( hbmpMask )
 932     {
 933         wxDIB dibMask(hbmpMask);
 934         if ( dibMask.IsOk() )
 935         {
 936             // TODO: use wxRawBitmap to iterate over DIB
 937
 938             // we hard code the mask colour for now but we could also make an
 939             // effort (and waste time) to choose a colour not present in the
 940             // image already to avoid having to fudge the pixels below --
 941             // whether it's worth to do it is unclear however
 942             static const int MASK_RED = 1;
 943             static const int MASK_GREEN = 2;
 944             static const int MASK_BLUE = 3;
 945             static const int MASK_BLUE_REPLACEMENT = 2;
 946
 947             const int h = dibMask.GetHeight();
 948             const int w = dibMask.GetWidth();
 949             const int bpp = dibMask.GetDepth();
 950             const int maskBytesPerPixel = bpp >> 3;
 951             const int maskBytesPerLine = wxDIB::GetLineSize(w, bpp);
 952             unsigned char *data = image.GetData();
 953
 954             // remember that DIBs are stored in bottom to top order
 955             unsigned char *
 956                 maskLineStart = dibMask.GetData() + ((h - 1) * maskBytesPerLine);
 957
 958             for ( int y = 0; y < h; y++, maskLineStart -= maskBytesPerLine )
 959             {
 960                 // traverse one mask DIB line
 961                 unsigned char *mask = maskLineStart;
 962                 for ( int x = 0; x < w; x++, mask += maskBytesPerPixel )
 963                 {
 964                     // should this pixel be transparent?
 965                     if ( *mask )
 966                     {
 967                         // no, check that it isn't transparent by accident
 968                         if ( (data[0] == MASK_RED) &&
 969                                 (data[1] == MASK_GREEN) &&
 970                                     (data[2] == MASK_BLUE) )
 971                         {
 972                             // we have to fudge the colour a bit to prevent
 973                             // this pixel from appearing transparent
 974                             data[2] = MASK_BLUE_REPLACEMENT;
 975                         }
 976
 977                         data += 3;
 978                     }
 979                     else // yes, transparent pixel
 980                     {
 981                         *data++ = MASK_RED;
 982                         *data++ = MASK_GREEN;
 983                         *data++ = MASK_BLUE;
 984                     }
 985                 }
 986             }
 987
 988             image.SetMaskColour(MASK_RED, MASK_GREEN, MASK_BLUE);
 989         }
 990     }
 991
 992     return image;
 993 }
 994
 995 #else // !wxUSE_WXDIB
 996
 997 bool
 998 wxBitmap::CreateFromImage(const wxImage& WXUNUSED(image),
 999                           int WXUNUSED(depth),
1000                           WXHDC WXUNUSED(hdc))
1001 {
1002     return false;
1003 }
1004
1005 wxImage wxBitmap::ConvertToImage() const
1006 {
1007     return wxImage();
1008 }
1009
1010 #endif // wxUSE_WXDIB/!wxUSE_WXDIB
1011
1012 #endif // wxUSE_IMAGE
1013
1014 // ----------------------------------------------------------------------------
1015 // loading and saving bitmaps
1016 // ----------------------------------------------------------------------------
1017
1018 bool wxBitmap::LoadFile(const wxString& filename, long type)
1019 {
1020     UnRef();
1021
1022     wxBitmapHandler *handler = wxDynamicCast(FindHandler(type), wxBitmapHandler);
1023
1024     if ( handler )
1025     {
1026         m_refData = new wxBitmapRefData;
1027
1028         return handler->LoadFile(this, filename, type, -1, -1);
1029     }
1030 #if wxUSE_IMAGE && wxUSE_WXDIB
1031     else // no bitmap handler found
1032     {
1033         wxImage image;
1034         if ( image.LoadFile( filename, type ) && image.Ok() )
1035         {
1036             *this = wxBitmap(image);
1037
1038             return true;
1039         }
1040     }
1041 #endif // wxUSE_IMAGE
1042
1043     return false;
1044 }
1045
1046 bool wxBitmap::Create(const void* data, long type, int width, int height, int depth)
1047 {
1048     UnRef();
1049
1050     wxBitmapHandler *handler = wxDynamicCast(FindHandler(type), wxBitmapHandler);
1051
1052     if ( !handler )
1053     {
1054         wxLogDebug(wxT("Failed to create bitmap: no bitmap handler for type %ld defined."), type);
1055
1056         return false;
1057     }
1058
1059     m_refData = new wxBitmapRefData;
1060
1061     return handler->Create(this, data, type, width, height, depth);
1062 }
1063
1064 bool wxBitmap::SaveFile(const wxString& filename,
1065                         int type,
1066                         const wxPalette *palette)
1067 {
1068     wxBitmapHandler *handler = wxDynamicCast(FindHandler(type), wxBitmapHandler);
1069
1070     if ( handler )
1071     {
1072         return handler->SaveFile(this, filename, type, palette);
1073     }
1074 #if wxUSE_IMAGE && wxUSE_WXDIB
1075     else // no bitmap handler found
1076     {
1077         // FIXME what about palette? shouldn't we use it?
1078         wxImage image = ConvertToImage();
1079         if ( image.Ok() )
1080         {
1081             return image.SaveFile(filename, type);
1082         }
1083     }
1084 #endif // wxUSE_IMAGE
1085
1086     return false;
1087 }
1088
1089 // ----------------------------------------------------------------------------
1090 // sub bitmap extraction
1091 // ----------------------------------------------------------------------------
1092 wxBitmap wxBitmap::GetSubBitmap( const wxRect& rect ) const
1093 {
1094         MemoryHDC dcSrc;
1095         SelectInHDC selectSrc(dcSrc, GetHbitmap());
1096         return GetSubBitmapOfHDC( rect, (WXHDC)dcSrc );
1097 }
1098
1099 wxBitmap wxBitmap::GetSubBitmapOfHDC( const wxRect& rect, WXHDC hdc ) const
1100 {
1101     wxCHECK_MSG( Ok() &&
1102                  (rect.x >= 0) && (rect.y >= 0) &&
1103                  (rect.x+rect.width <= GetWidth()) &&
1104                  (rect.y+rect.height <= GetHeight()),
1105                  wxNullBitmap, wxT("Invalid bitmap or bitmap region") );
1106
1107     wxBitmap ret( rect.width, rect.height, GetDepth() );
1108     wxASSERT_MSG( ret.Ok(), wxT("GetSubBitmap error") );
1109
1110 #ifndef __WXMICROWIN__
1111     // handle alpha channel, if any
1112     if (HasAlpha())
1113         ret.UseAlpha();
1114
1115     // copy bitmap data
1116     MemoryHDC dcSrc,
1117               dcDst;
1118
1119     {
1120         SelectInHDC selectDst(dcDst, GetHbitmapOf(ret));
1121
1122         if ( !selectDst )
1123         {
1124             wxLogLastError(_T("SelectObject(destBitmap)"));
1125         }
1126
1127         if ( !::BitBlt(dcDst, 0, 0, rect.width, rect.height,
1128                        (HDC)hdc, rect.x, rect.y, SRCCOPY) )
1129         {
1130             wxLogLastError(_T("BitBlt"));
1131         }
1132     }
1133
1134     // copy mask if there is one
1135     if ( GetMask() )
1136     {
1137         HBITMAP hbmpMask = ::CreateBitmap(rect.width, rect.height, 1, 1, 0);
1138
1139         SelectInHDC selectSrc(dcSrc, (HBITMAP) GetMask()->GetMaskBitmap()),
1140                     selectDst(dcDst, hbmpMask);
1141
1142         if ( !::BitBlt(dcDst, 0, 0, rect.width, rect.height,
1143                        dcSrc, rect.x, rect.y, SRCCOPY) )
1144         {
1145             wxLogLastError(_T("BitBlt"));
1146         }
1147
1148         wxMask *mask = new wxMask((WXHBITMAP) hbmpMask);
1149         ret.SetMask(mask);
1150     }
1151 #endif // !__WXMICROWIN__
1152
1153     return ret;
1154 }
1155
1156 // ----------------------------------------------------------------------------
1157 // wxBitmap accessors
1158 // ----------------------------------------------------------------------------
1159
1160 #if wxUSE_PALETTE
1161 wxPalette* wxBitmap::GetPalette() const
1162 {
1163     return GetBitmapData() ? &GetBitmapData()->m_bitmapPalette
1164                            : (wxPalette *) NULL;
1165 }
1166 #endif
1167
1168 wxMask *wxBitmap::GetMask() const
1169 {
1170     return GetBitmapData() ? GetBitmapData()->GetMask() : (wxMask *) NULL;
1171 }
1172
1173 wxBitmap wxBitmap::GetMaskBitmap() const
1174 {
1175     wxBitmap bmp;
1176     wxMask *mask = GetMask();
1177     if ( mask )
1178         bmp.SetHBITMAP(mask->GetMaskBitmap());
1179     return bmp;
1180 }
1181
1182 #ifdef __WXDEBUG__
1183
1184 wxDC *wxBitmap::GetSelectedInto() const
1185 {
1186     return GetBitmapData() ? GetBitmapData()->m_selectedInto : (wxDC *) NULL;
1187 }
1188
1189 #endif
1190
1191 void wxBitmap::UseAlpha()
1192 {
1193     if ( GetBitmapData() )
1194         GetBitmapData()->m_hasAlpha = true;
1195 }
1196
1197 bool wxBitmap::HasAlpha() const
1198 {
1199     return GetBitmapData() && GetBitmapData()->m_hasAlpha;
1200 }
1201
1202 // ----------------------------------------------------------------------------
1203 // wxBitmap setters
1204 // ----------------------------------------------------------------------------
1205
1206 #ifdef __WXDEBUG__
1207
1208 void wxBitmap::SetSelectedInto(wxDC *dc)
1209 {
1210     if ( GetBitmapData() )
1211         GetBitmapData()->m_selectedInto = dc;
1212 }
1213
1214 #endif
1215
1216 #if wxUSE_PALETTE
1217
1218 void wxBitmap::SetPalette(const wxPalette& palette)
1219 {
1220     AllocExclusive();
1221
1222     GetBitmapData()->m_bitmapPalette = palette;
1223 }
1224
1225 #endif // wxUSE_PALETTE
1226
1227 void wxBitmap::SetMask(wxMask *mask)
1228 {
1229     AllocExclusive();
1230
1231     GetBitmapData()->SetMask(mask);
1232 }
1233
1234 // ----------------------------------------------------------------------------
1235 // raw bitmap access support
1236 // ----------------------------------------------------------------------------
1237
1238 #ifdef wxHAVE_RAW_BITMAP
1239 void *wxBitmap::GetRawData(wxPixelDataBase& data, int bpp)
1240 {
1241 #if wxUSE_WXDIB
1242     if ( !Ok() )
1243     {
1244         // no bitmap, no data (raw or otherwise)
1245         return NULL;
1246     }
1247
1248     // if we're already a DIB we can access our data directly, but if not we
1249     // need to convert this DDB to a DIB section and use it for raw access and
1250     // then convert it back
1251     HBITMAP hDIB;
1252     if ( !GetBitmapData()->m_isDIB )
1253     {
1254         wxCHECK_MSG( !GetBitmapData()->m_dib, NULL,
1255                         _T("GetRawData() may be called only once") );
1256
1257         wxDIB *dib = new wxDIB(*this);
1258         if ( !dib->IsOk() )
1259         {
1260             delete dib;
1261
1262             return NULL;
1263         }
1264
1265         // we'll free it in UngetRawData()
1266         GetBitmapData()->m_dib = dib;
1267
1268         hDIB = dib->GetHandle();
1269     }
1270     else // we're a DIB
1271     {
1272         hDIB = GetHbitmap();
1273     }
1274
1275     DIBSECTION ds;
1276     if ( ::GetObject(hDIB, sizeof(ds), &ds) != sizeof(DIBSECTION) )
1277     {
1278         wxFAIL_MSG( _T("failed to get DIBSECTION from a DIB?") );
1279
1280         return NULL;
1281     }
1282
1283     // check that the bitmap is in correct format
1284     if ( ds.dsBm.bmBitsPixel != bpp )
1285     {
1286         wxFAIL_MSG( _T("incorrect bitmap type in wxBitmap::GetRawData()") );
1287
1288         return NULL;
1289     }
1290
1291     // ok, store the relevant info in wxPixelDataBase
1292     const LONG h = ds.dsBm.bmHeight;
1293
1294     data.m_width = ds.dsBm.bmWidth;
1295     data.m_height = h;
1296
1297     // remember that DIBs are stored in top to bottom order!
1298     // (We can't just use ds.dsBm.bmWidthBytes here, because it isn't always a
1299     // multiple of 2, as required by the documentation.  So we use the official
1300     // formula, which we already use elsewhere.)
1301     const LONG bytesPerRow =
1302         wxDIB::GetLineSize(ds.dsBm.bmWidth, ds.dsBm.bmBitsPixel);
1303     data.m_stride = -bytesPerRow;
1304
1305     char *bits = (char *)ds.dsBm.bmBits;
1306     if ( h > 1 )
1307     {
1308         bits += (h - 1)*bytesPerRow;
1309     }
1310
1311     return bits;
1312 #else
1313     return NULL;
1314 #endif
1315 }
1316
1317 void wxBitmap::UngetRawData(wxPixelDataBase& dataBase)
1318 {
1319 #if wxUSE_WXDIB
1320     if ( !Ok() )
1321         return;
1322
1323     if ( !&dataBase )
1324     {
1325         // invalid data, don't crash -- but don't assert neither as we're
1326         // called automatically from wxPixelDataBase dtor and so there is no
1327         // way to prevent this from happening
1328         return;
1329     }
1330
1331     // if we're a DDB we need to convert DIB back to DDB now to make the
1332     // changes made via raw bitmap access effective
1333     if ( !GetBitmapData()->m_isDIB )
1334     {
1335         wxDIB *dib = GetBitmapData()->m_dib;
1336         GetBitmapData()->m_dib = NULL;
1337
1338         // TODO: convert
1339
1340         delete dib;
1341     }
1342 #endif // wxUSE_WXDIB
1343 }
1344 #endif // #ifdef wxHAVE_RAW_BITMAP
1345
1346 // ----------------------------------------------------------------------------
1347 // wxMask
1348 // ----------------------------------------------------------------------------
1349
1350 wxMask::wxMask()
1351 {
1352     m_maskBitmap = 0;
1353 }
1354
1355 // Copy constructor
1356 wxMask::wxMask(const wxMask &mask)
1357       : wxObject()
1358 {
1359     BITMAP bmp;
1360
1361     HDC srcDC = CreateCompatibleDC(0);
1362     HDC destDC = CreateCompatibleDC(0);
1363
1364     // GetBitmapDimensionEx won't work if SetBitmapDimensionEx wasn't used
1365     // so we'll use GetObject() API here:
1366     if (::GetObject((HGDIOBJ)mask.m_maskBitmap, sizeof(bmp), &bmp) == 0)
1367     {
1368         wxFAIL_MSG(wxT("Cannot retrieve the dimensions of the wxMask to copy"));
1369         return;
1370     }
1371
1372     // create our HBITMAP
1373     int w = bmp.bmWidth, h = bmp.bmHeight;
1374     m_maskBitmap = (WXHBITMAP)CreateCompatibleBitmap(srcDC, w, h);
1375
1376     // copy the mask's HBITMAP into our HBITMAP
1377     SelectObject(srcDC, (HBITMAP) mask.m_maskBitmap);
1378     SelectObject(destDC, (HBITMAP) m_maskBitmap);
1379
1380     BitBlt(destDC, 0, 0, w, h, srcDC, 0, 0, SRCCOPY);
1381
1382     SelectObject(srcDC, 0);
1383     DeleteDC(srcDC);
1384     SelectObject(destDC, 0);
1385     DeleteDC(destDC);
1386 }
1387
1388 // Construct a mask from a bitmap and a colour indicating
1389 // the transparent area
1390 wxMask::wxMask(const wxBitmap& bitmap, const wxColour& colour)
1391 {
1392     m_maskBitmap = 0;
1393     Create(bitmap, colour);
1394 }
1395
1396 // Construct a mask from a bitmap and a palette index indicating
1397 // the transparent area
1398 wxMask::wxMask(const wxBitmap& bitmap, int paletteIndex)
1399 {
1400     m_maskBitmap = 0;
1401     Create(bitmap, paletteIndex);
1402 }
1403
1404 // Construct a mask from a mono bitmap (copies the bitmap).
1405 wxMask::wxMask(const wxBitmap& bitmap)
1406 {
1407     m_maskBitmap = 0;
1408     Create(bitmap);
1409 }
1410
1411 wxMask::~wxMask()
1412 {
1413     if ( m_maskBitmap )
1414         ::DeleteObject((HBITMAP) m_maskBitmap);
1415 }
1416
1417 // Create a mask from a mono bitmap (copies the bitmap).
1418 bool wxMask::Create(const wxBitmap& bitmap)
1419 {
1420 #ifndef __WXMICROWIN__
1421     wxCHECK_MSG( bitmap.Ok() && bitmap.GetDepth() == 1, false,
1422                  _T("can't create mask from invalid or not monochrome bitmap") );
1423
1424     if ( m_maskBitmap )
1425     {
1426         ::DeleteObject((HBITMAP) m_maskBitmap);
1427         m_maskBitmap = 0;
1428     }
1429
1430     m_maskBitmap = (WXHBITMAP) CreateBitmap(
1431                                             bitmap.GetWidth(),
1432                                             bitmap.GetHeight(),
1433                                             1, 1, 0
1434                                            );
1435     HDC srcDC = CreateCompatibleDC(0);
1436     SelectObject(srcDC, (HBITMAP) bitmap.GetHBITMAP());
1437     HDC destDC = CreateCompatibleDC(0);
1438     SelectObject(destDC, (HBITMAP) m_maskBitmap);
1439     BitBlt(destDC, 0, 0, bitmap.GetWidth(), bitmap.GetHeight(), srcDC, 0, 0, SRCCOPY);
1440     SelectObject(srcDC, 0);
1441     DeleteDC(srcDC);
1442     SelectObject(destDC, 0);
1443     DeleteDC(destDC);
1444     return true;
1445 #else
1446     wxUnusedVar(bitmap);
1447     return false;
1448 #endif
1449 }
1450
1451 // Create a mask from a bitmap and a palette index indicating
1452 // the transparent area
1453 bool wxMask::Create(const wxBitmap& bitmap, int paletteIndex)
1454 {
1455     if ( m_maskBitmap )
1456     {
1457         ::DeleteObject((HBITMAP) m_maskBitmap);
1458         m_maskBitmap = 0;
1459     }
1460
1461 #if wxUSE_PALETTE
1462     if (bitmap.Ok() && bitmap.GetPalette()->Ok())
1463     {
1464         unsigned char red, green, blue;
1465         if (bitmap.GetPalette()->GetRGB(paletteIndex, &red, &green, &blue))
1466         {
1467             wxColour transparentColour(red, green, blue);
1468             return Create(bitmap, transparentColour);
1469         }
1470     }
1471 #endif // wxUSE_PALETTE
1472
1473     return false;
1474 }
1475
1476 // Create a mask from a bitmap and a colour indicating
1477 // the transparent area
1478 bool wxMask::Create(const wxBitmap& bitmap, const wxColour& colour)
1479 {
1480 #ifndef __WXMICROWIN__
1481     wxCHECK_MSG( bitmap.Ok(), false, _T("invalid bitmap in wxMask::Create") );
1482
1483     if ( m_maskBitmap )
1484     {
1485         ::DeleteObject((HBITMAP) m_maskBitmap);
1486         m_maskBitmap = 0;
1487     }
1488
1489     int width = bitmap.GetWidth(),
1490         height = bitmap.GetHeight();
1491
1492     // scan the bitmap for the transparent colour and set the corresponding
1493     // pixels in the mask to BLACK and the rest to WHITE
1494     COLORREF maskColour = wxColourToPalRGB(colour);
1495     m_maskBitmap = (WXHBITMAP)::CreateBitmap(width, height, 1, 1, 0);
1496
1497     HDC srcDC = ::CreateCompatibleDC(NULL);
1498     HDC destDC = ::CreateCompatibleDC(NULL);
1499     if ( !srcDC || !destDC )
1500     {
1501         wxLogLastError(wxT("CreateCompatibleDC"));
1502     }
1503
1504     bool ok = true;
1505
1506     // SelectObject() will fail
1507     wxASSERT_MSG( !bitmap.GetSelectedInto(),
1508                   _T("bitmap can't be selected in another DC") );
1509
1510     HGDIOBJ hbmpSrcOld = ::SelectObject(srcDC, GetHbitmapOf(bitmap));
1511     if ( !hbmpSrcOld )
1512     {
1513         wxLogLastError(wxT("SelectObject"));
1514
1515         ok = false;
1516     }
1517
1518     HGDIOBJ hbmpDstOld = ::SelectObject(destDC, (HBITMAP)m_maskBitmap);
1519     if ( !hbmpDstOld )
1520     {
1521         wxLogLastError(wxT("SelectObject"));
1522
1523         ok = false;
1524     }
1525
1526     if ( ok )
1527     {
1528         // this will create a monochrome bitmap with 0 points for the pixels
1529         // which have the same value as the background colour and 1 for the
1530         // others
1531         ::SetBkColor(srcDC, maskColour);
1532         ::BitBlt(destDC, 0, 0, width, height, srcDC, 0, 0, NOTSRCCOPY);
1533     }
1534
1535     ::SelectObject(srcDC, hbmpSrcOld);
1536     ::DeleteDC(srcDC);
1537     ::SelectObject(destDC, hbmpDstOld);
1538     ::DeleteDC(destDC);
1539
1540     return ok;
1541 #else // __WXMICROWIN__
1542     wxUnusedVar(bitmap);
1543     wxUnusedVar(colour);
1544     return false;
1545 #endif // __WXMICROWIN__/!__WXMICROWIN__
1546 }
1547
1548 // ----------------------------------------------------------------------------
1549 // wxBitmapHandler
1550 // ----------------------------------------------------------------------------
1551
1552 bool wxBitmapHandler::Create(wxGDIImage *image,
1553                              const void* data,
1554                              long flags,
1555                              int width, int height, int depth)
1556 {
1557     wxBitmap *bitmap = wxDynamicCast(image, wxBitmap);
1558
1559     return bitmap && Create(bitmap, data, flags, width, height, depth);
1560 }
1561
1562 bool wxBitmapHandler::Load(wxGDIImage *image,
1563                            const wxString& name,
1564                            long flags,
1565                            int width, int height)
1566 {
1567     wxBitmap *bitmap = wxDynamicCast(image, wxBitmap);
1568
1569     return bitmap && LoadFile(bitmap, name, flags, width, height);
1570 }
1571
1572 bool wxBitmapHandler::Save(wxGDIImage *image,
1573                            const wxString& name,
1574                            int type)
1575 {
1576     wxBitmap *bitmap = wxDynamicCast(image, wxBitmap);
1577
1578     return bitmap && SaveFile(bitmap, name, type);
1579 }
1580
1581 bool wxBitmapHandler::Create(wxBitmap *WXUNUSED(bitmap),
1582                              const void* WXUNUSED(data),
1583                              long WXUNUSED(type),
1584                              int WXUNUSED(width),
1585                              int WXUNUSED(height),
1586                              int WXUNUSED(depth))
1587 {
1588     return false;
1589 }
1590
1591 bool wxBitmapHandler::LoadFile(wxBitmap *WXUNUSED(bitmap),
1592                                const wxString& WXUNUSED(name),
1593                                long WXUNUSED(type),
1594                                int WXUNUSED(desiredWidth),
1595                                int WXUNUSED(desiredHeight))
1596 {
1597     return false;
1598 }
1599
1600 bool wxBitmapHandler::SaveFile(wxBitmap *WXUNUSED(bitmap),
1601                                const wxString& WXUNUSED(name),
1602                                int WXUNUSED(type),
1603                                const wxPalette *WXUNUSED(palette))
1604 {
1605     return false;
1606 }
1607
1608 // ----------------------------------------------------------------------------
1609 // global helper functions implemented here
1610 // ----------------------------------------------------------------------------
1611
1612 // helper of wxBitmapToHICON/HCURSOR
1613 static
1614 HICON wxBitmapToIconOrCursor(const wxBitmap& bmp,
1615                              bool iconWanted,
1616                              int hotSpotX,
1617                              int hotSpotY)
1618 {
1619     if ( !bmp.Ok() )
1620     {
1621         // we can't create an icon/cursor form nothing
1622         return 0;
1623     }
1624
1625     if ( bmp.HasAlpha() )
1626     {
1627         // Create an empty mask bitmap.
1628         // it doesn't seem to work if we mess with the mask at all.
1629         HBITMAP hMonoBitmap = CreateBitmap(bmp.GetWidth(),bmp.GetHeight(),1,1,NULL);
1630
1631         ICONINFO iconInfo;
1632         wxZeroMemory(iconInfo);
1633         iconInfo.fIcon = iconWanted;  // do we want an icon or a cursor?
1634         if ( !iconWanted )
1635         {
1636             iconInfo.xHotspot = hotSpotX;
1637             iconInfo.yHotspot = hotSpotY;
1638         }
1639
1640         iconInfo.hbmMask = hMonoBitmap;
1641         iconInfo.hbmColor = GetHbitmapOf(bmp);
1642
1643         HICON hicon = ::CreateIconIndirect(&iconInfo);
1644
1645         ::DeleteObject(hMonoBitmap);
1646
1647         return hicon;
1648     }
1649
1650     wxMask* mask = bmp.GetMask();
1651
1652     if ( !mask )
1653     {
1654         // we must have a mask for an icon, so even if it's probably incorrect,
1655         // do create it (grey is the "standard" transparent colour)
1656         mask = new wxMask(bmp, *wxLIGHT_GREY);
1657     }
1658
1659     ICONINFO iconInfo;
1660     wxZeroMemory(iconInfo);
1661     iconInfo.fIcon = iconWanted;  // do we want an icon or a cursor?
1662     if ( !iconWanted )
1663     {
1664         iconInfo.xHotspot = hotSpotX;
1665         iconInfo.yHotspot = hotSpotY;
1666     }
1667
1668     iconInfo.hbmMask = wxInvertMask((HBITMAP)mask->GetMaskBitmap());
1669     iconInfo.hbmColor = GetHbitmapOf(bmp);
1670
1671     // black out the transparent area to preserve background colour, because
1672     // Windows blits the original bitmap using SRCINVERT (XOR) after applying
1673     // the mask to the dest rect.
1674     {
1675         MemoryHDC dcSrc, dcDst;
1676         SelectInHDC selectMask(dcSrc, (HBITMAP)mask->GetMaskBitmap()),
1677                     selectBitmap(dcDst, iconInfo.hbmColor);
1678
1679         if ( !::BitBlt(dcDst, 0, 0, bmp.GetWidth(), bmp.GetHeight(),
1680                        dcSrc, 0, 0, SRCAND) )
1681         {
1682             wxLogLastError(_T("BitBlt"));
1683         }
1684     }
1685
1686     HICON hicon = ::CreateIconIndirect(&iconInfo);
1687
1688     if ( !bmp.GetMask() && !bmp.HasAlpha() )
1689     {
1690         // we created the mask, now delete it
1691         delete mask;
1692     }
1693
1694     // delete the inverted mask bitmap we created as well
1695     ::DeleteObject(iconInfo.hbmMask);
1696
1697     return hicon;
1698 }
1699
1700 HICON wxBitmapToHICON(const wxBitmap& bmp)
1701 {
1702     return wxBitmapToIconOrCursor(bmp, true, 0, 0);
1703 }
1704
1705 HCURSOR wxBitmapToHCURSOR(const wxBitmap& bmp, int hotSpotX, int hotSpotY)
1706 {
1707     return (HCURSOR)wxBitmapToIconOrCursor(bmp, false, hotSpotX, hotSpotY);
1708 }
1709
1710 HBITMAP wxInvertMask(HBITMAP hbmpMask, int w, int h)
1711 {
1712 #ifndef __WXMICROWIN__
1713     wxCHECK_MSG( hbmpMask, 0, _T("invalid bitmap in wxInvertMask") );
1714
1715     // get width/height from the bitmap if not given
1716     if ( !w || !h )
1717     {
1718         BITMAP bm;
1719         ::GetObject(hbmpMask, sizeof(BITMAP), (LPVOID)&bm);
1720         w = bm.bmWidth;
1721         h = bm.bmHeight;
1722     }
1723
1724     HDC hdcSrc = ::CreateCompatibleDC(NULL);
1725     HDC hdcDst = ::CreateCompatibleDC(NULL);
1726     if ( !hdcSrc || !hdcDst )
1727     {
1728         wxLogLastError(wxT("CreateCompatibleDC"));
1729     }
1730
1731     HBITMAP hbmpInvMask = ::CreateBitmap(w, h, 1, 1, 0);
1732     if ( !hbmpInvMask )
1733     {
1734         wxLogLastError(wxT("CreateBitmap"));
1735     }
1736
1737     HGDIOBJ srcTmp = ::SelectObject(hdcSrc, hbmpMask);
1738     HGDIOBJ dstTmp = ::SelectObject(hdcDst, hbmpInvMask);
1739     if ( !::BitBlt(hdcDst, 0, 0, w, h,
1740                    hdcSrc, 0, 0,
1741                    NOTSRCCOPY) )
1742     {
1743         wxLogLastError(wxT("BitBlt"));
1744     }
1745
1746     // Deselect objects
1747     SelectObject(hdcSrc,srcTmp);
1748     SelectObject(hdcDst,dstTmp);
1749
1750     ::DeleteDC(hdcSrc);
1751     ::DeleteDC(hdcDst);
1752
1753     return hbmpInvMask;
1754 #else
1755     return 0;
1756 #endif
1757 }