src/msw/bitmap.cpp

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