src/msw/dragimag.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dragimag.cpp
   3 // Purpose:     wxDragImage
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     08/04/99
   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 #ifdef __GNUG__
  21 #pragma implementation "dragimag.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 #if wxUSE_DRAGIMAGE
  32
  33 #if defined(__WIN95__)
  34
  35 #ifndef WX_PRECOMP
  36 #include <stdio.h>
  37 #include "wx/setup.h"
  38 #include "wx/window.h"
  39 #include "wx/dcclient.h"
  40 #include "wx/dcscreen.h"
  41 #include "wx/dcmemory.h"
  42 #include "wx/settings.h"
  43 #endif
  44
  45 #include "wx/msw/private.h"
  46 #include "wx/log.h"
  47 #include "wx/intl.h"
  48 #include "wx/frame.h"
  49 #include "wx/image.h"
  50
  51 #include "wx/msw/dragimag.h"
  52 #include "wx/msw/private.h"
  53
  54 #if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) && !defined(__CYGWIN10__))
  55 #include <commctrl.h>
  56 #endif
  57
  58 // Wine doesn't have this yet
  59 #ifndef ListView_CreateDragImage
  60 #define ListView_CreateDragImage(hwnd, i, lpptUpLeft) \
  61     (HIMAGELIST)SNDMSG((hwnd), LVM_CREATEDRAGIMAGE, (WPARAM)(int)(i), (LPARAM)(LPPOINT)(lpptUpLeft))
  62 #endif
  63
  64 // ----------------------------------------------------------------------------
  65 // macros
  66 // ----------------------------------------------------------------------------
  67
  68 IMPLEMENT_DYNAMIC_CLASS(wxDragImage, wxObject)
  69
  70 #define GetHimageList() ((HIMAGELIST) m_hImageList)
  71
  72 // ============================================================================
  73 // implementation
  74 // ============================================================================
  75
  76 // ----------------------------------------------------------------------------
  77 // wxDragImage ctors/dtor
  78 // ----------------------------------------------------------------------------
  79
  80 wxDragImage::wxDragImage()
  81 {
  82     Init();
  83 }
  84
  85 wxDragImage::~wxDragImage()
  86 {
  87     if ( m_hImageList )
  88         ImageList_Destroy(GetHimageList());
  89 #if !wxUSE_SIMPLER_DRAGIMAGE
  90     if ( m_hCursorImageList )
  91         ImageList_Destroy((HIMAGELIST) m_hCursorImageList);
  92 #endif
  93 }
  94
  95 void wxDragImage::Init()
  96 {
  97     m_hImageList = 0;
  98 #if !wxUSE_SIMPLER_DRAGIMAGE
  99     m_hCursorImageList = 0;
 100 #endif
 101     m_window = (wxWindow*) NULL;
 102     m_fullScreen = FALSE;
 103 }
 104
 105 // Attributes
 106 ////////////////////////////////////////////////////////////////////////////
 107
 108
 109 // Operations
 110 ////////////////////////////////////////////////////////////////////////////
 111
 112 // Create a drag image from a bitmap and optional cursor
 113 bool wxDragImage::Create(const wxBitmap& image, const wxCursor& cursor)
 114 {
 115     if ( m_hImageList )
 116         ImageList_Destroy(GetHimageList());
 117     m_hImageList = 0;
 118
 119     UINT flags = 0 ;
 120     if (image.GetDepth() <= 4)
 121         flags = ILC_COLOR4;
 122     else if (image.GetDepth() <= 8)
 123         flags = ILC_COLOR8;
 124     else if (image.GetDepth() <= 16)
 125         flags = ILC_COLOR16;
 126     else if (image.GetDepth() <= 24)
 127         flags = ILC_COLOR24;
 128     else
 129         flags = ILC_COLOR32;
 130
 131     bool mask = (image.GetMask() != 0);
 132
 133     // Curiously, even if the image doesn't have a mask,
 134     // we still have to use ILC_MASK or the image won't show
 135     // up when dragged.
 136 //    if ( mask )
 137     flags |= ILC_MASK;
 138
 139     m_hImageList = (WXHIMAGELIST) ImageList_Create(image.GetWidth(), image.GetHeight(), flags, 1, 1);
 140
 141     int index;
 142     if (!mask)
 143     {
 144         HBITMAP hBitmap1 = (HBITMAP) image.GetHBITMAP();
 145         index = ImageList_Add(GetHimageList(), hBitmap1, 0);
 146     }
 147     else
 148     {
 149         HBITMAP hBitmap1 = (HBITMAP) image.GetHBITMAP();
 150         HBITMAP hBitmap2 = (HBITMAP) image.GetMask()->GetMaskBitmap();
 151         HBITMAP hbmpMask = wxInvertMask(hBitmap2);
 152
 153         index = ImageList_Add(GetHimageList(), hBitmap1, hbmpMask);
 154         ::DeleteObject(hbmpMask);
 155     }
 156     if ( index == -1 )
 157     {
 158         wxLogError(_("Couldn't add an image to the image list."));
 159     }
 160     m_cursor = cursor; // Can only combine with drag image after calling BeginDrag.
 161
 162     return (index != -1) ;
 163 }
 164
 165 // Create a drag image from an icon and optional cursor
 166 bool wxDragImage::Create(const wxIcon& image, const wxCursor& cursor)
 167 {
 168     if ( m_hImageList )
 169         ImageList_Destroy(GetHimageList());
 170     m_hImageList = 0;
 171
 172     UINT flags = 0 ;
 173     if (image.GetDepth() <= 4)
 174         flags = ILC_COLOR4;
 175     else if (image.GetDepth() <= 8)
 176         flags = ILC_COLOR8;
 177     else if (image.GetDepth() <= 16)
 178         flags = ILC_COLOR16;
 179     else if (image.GetDepth() <= 24)
 180         flags = ILC_COLOR24;
 181     else
 182         flags = ILC_COLOR32;
 183     bool mask = TRUE;
 184     if ( mask )
 185         flags |= ILC_MASK;
 186
 187     m_hImageList = (WXHIMAGELIST) ImageList_Create(image.GetWidth(), image.GetHeight(), flags, 1, 1);
 188
 189     HICON hIcon = (HICON) image.GetHICON();
 190
 191     int index = ImageList_AddIcon(GetHimageList(), hIcon);
 192     if ( index == -1 )
 193     {
 194         wxLogError(_("Couldn't add an image to the image list."));
 195     }
 196
 197     m_cursor = cursor; // Can only combine with drag image after calling BeginDrag.
 198
 199     return (index != -1) ;
 200 }
 201
 202 // Create a drag image from a string and optional cursor
 203 bool wxDragImage::Create(const wxString& str, const wxCursor& cursor)
 204 {
 205     wxFont font(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
 206
 207     long w, h;
 208     wxScreenDC dc;
 209     dc.SetFont(font);
 210     dc.GetTextExtent(str, & w, & h);
 211     dc.SetFont(wxNullFont);
 212
 213     wxMemoryDC dc2;
 214     dc2.SetFont(font);
 215     wxBitmap bitmap((int) w+2, (int) h+2);
 216     dc2.SelectObject(bitmap);
 217
 218     dc2.SetBackground(* wxWHITE_BRUSH);
 219     dc2.Clear();
 220     dc2.SetBackgroundMode(wxTRANSPARENT);
 221     dc2.SetTextForeground(* wxLIGHT_GREY);
 222     dc2.DrawText(str, 0, 0);
 223     dc2.DrawText(str, 1, 0);
 224     dc2.DrawText(str, 2, 0);
 225     dc2.DrawText(str, 1, 1);
 226     dc2.DrawText(str, 2, 1);
 227     dc2.DrawText(str, 1, 2);
 228     dc2.DrawText(str, 2, 2);
 229     dc2.SetTextForeground(* wxBLACK);
 230     dc2.DrawText(str, 1, 1);
 231
 232     dc2.SelectObject(wxNullBitmap);
 233
 234     // Make the bitmap masked
 235     wxImage image = bitmap.ConvertToImage();
 236     image.SetMaskColour(255, 255, 255);
 237     return Create(wxBitmap(image), cursor);
 238 }
 239
 240 #if wxUSE_TREECTRL
 241 // Create a drag image for the given tree control item
 242 bool wxDragImage::Create(const wxTreeCtrl& treeCtrl, wxTreeItemId& id)
 243 {
 244     if ( m_hImageList )
 245         ImageList_Destroy(GetHimageList());
 246     m_hImageList = (WXHIMAGELIST) TreeView_CreateDragImage((HWND) treeCtrl.GetHWND(), (HTREEITEM) (WXHTREEITEM) id);
 247     return TRUE;
 248 }
 249 #endif
 250
 251 #if wxUSE_LISTCTRL
 252 // Create a drag image for the given list control item
 253 bool wxDragImage::Create(const wxListCtrl& listCtrl, long id)
 254 {
 255     if ( m_hImageList )
 256         ImageList_Destroy(GetHimageList());
 257     POINT pt;
 258     pt.x = 0; pt.y = 0;
 259     m_hImageList = (WXHIMAGELIST) ListView_CreateDragImage((HWND) listCtrl.GetHWND(), id, & pt);
 260     return TRUE;
 261 }
 262 #endif
 263
 264 // Begin drag
 265 bool wxDragImage::BeginDrag(const wxPoint& hotspot, wxWindow* window, bool fullScreen, wxRect* rect)
 266 {
 267     wxASSERT_MSG( (m_hImageList != 0), wxT("Image list must not be null in BeginDrag."));
 268     wxASSERT_MSG( (window != 0), wxT("Window must not be null in BeginDrag."));
 269
 270     m_fullScreen = fullScreen;
 271     if (rect)
 272         m_boundingRect = * rect;
 273
 274     bool ret = (ImageList_BeginDrag(GetHimageList(), 0, hotspot.x, hotspot.y) != 0);
 275
 276     if (!ret)
 277     {
 278         wxFAIL_MSG( _T("BeginDrag failed.") );
 279
 280         return FALSE;
 281     }
 282
 283     if (m_cursor.Ok())
 284     {
 285 #if wxUSE_SIMPLER_DRAGIMAGE
 286             m_oldCursor = window->GetCursor();
 287             window->SetCursor(m_cursor);
 288 #else
 289         if (!m_hCursorImageList)
 290         {
 291             int cxCursor = GetSystemMetrics(SM_CXCURSOR);
 292             int cyCursor = GetSystemMetrics(SM_CYCURSOR);
 293
 294             m_hCursorImageList = (WXHIMAGELIST) ImageList_Create(cxCursor, cyCursor, ILC_MASK, 1, 1);
 295         }
 296
 297         // See if we can find the cursor hotspot
 298         wxPoint curHotSpot(hotspot);
 299
 300         // Although it seems to produce the right position, when the hotspot goeos
 301         // negative it has strange effects on the image.
 302         // How do we stop the cursor jumping right and below of where it should be?
 303 #if 0
 304         ICONINFO iconInfo;
 305         if (::GetIconInfo((HICON) (HCURSOR) m_cursor.GetHCURSOR(), & iconInfo) != 0)
 306         {
 307             curHotSpot.x -= iconInfo.xHotspot;
 308             curHotSpot.y -= iconInfo.yHotspot;
 309         }
 310 #endif
 311         //wxString msg;
 312         //msg.Printf("Hotspot = %d, %d", curHotSpot.x, curHotSpot.y);
 313         //wxLogDebug(msg);
 314
 315         // First add the cursor to the image list
 316         HCURSOR hCursor = (HCURSOR) m_cursor.GetHCURSOR();
 317         int cursorIndex = ImageList_AddIcon((HIMAGELIST) m_hCursorImageList, (HICON) hCursor);
 318
 319         wxASSERT_MSG( (cursorIndex != -1), wxT("ImageList_AddIcon failed in BeginDrag."));
 320
 321         if (cursorIndex != -1)
 322         {
 323             ImageList_SetDragCursorImage((HIMAGELIST) m_hCursorImageList, cursorIndex, curHotSpot.x, curHotSpot.y);
 324         }
 325 #endif
 326     }
 327
 328 #if !wxUSE_SIMPLER_DRAGIMAGE
 329     if (m_cursor.Ok())
 330         ::ShowCursor(FALSE);
 331 #endif
 332
 333     m_window = window;
 334
 335     ::SetCapture(GetHwndOf(window));
 336
 337     return TRUE;
 338 }
 339
 340 // Begin drag. hotspot is the location of the drag position relative to the upper-left
 341 // corner of the image. This is full screen only. fullScreenRect gives the
 342 // position of the window on the screen, to restrict the drag to.
 343 bool wxDragImage::BeginDrag(const wxPoint& hotspot, wxWindow* window, wxWindow* fullScreenRect)
 344 {
 345     wxRect rect;
 346
 347     int x = fullScreenRect->GetPosition().x;
 348     int y = fullScreenRect->GetPosition().y;
 349
 350     wxSize sz = fullScreenRect->GetSize();
 351
 352     if (fullScreenRect->GetParent() && !fullScreenRect->IsKindOf(CLASSINFO(wxFrame)))
 353         fullScreenRect->GetParent()->ClientToScreen(& x, & y);
 354
 355     rect.x = x; rect.y = y;
 356     rect.width = sz.x; rect.height = sz.y;
 357
 358     return BeginDrag(hotspot, window, TRUE, & rect);
 359 }
 360
 361 // End drag
 362 bool wxDragImage::EndDrag()
 363 {
 364     wxASSERT_MSG( (m_hImageList != 0), wxT("Image list must not be null in EndDrag."));
 365
 366     ImageList_EndDrag();
 367
 368     if ( !::ReleaseCapture() )
 369     {
 370         wxLogLastError(wxT("ReleaseCapture"));
 371     }
 372
 373 #if wxUSE_SIMPLER_DRAGIMAGE
 374     if (m_cursor.Ok() && m_oldCursor.Ok())
 375             m_window->SetCursor(m_oldCursor);
 376 #else
 377     ::ShowCursor(TRUE);
 378 #endif
 379
 380     m_window = (wxWindow*) NULL;
 381
 382     return TRUE;
 383 }
 384
 385 // Move the image: call from OnMouseMove. Pt is in window client coordinates if window
 386 // is non-NULL, or in screen coordinates if NULL.
 387 bool wxDragImage::Move(const wxPoint& pt)
 388 {
 389     wxASSERT_MSG( (m_hImageList != 0), wxT("Image list must not be null in Move."));
 390
 391     // These are in window, not client coordinates.
 392     // So need to convert to client coordinates.
 393     wxPoint pt2(pt);
 394     if (m_window && !m_fullScreen)
 395     {
 396         RECT rect;
 397         rect.left = 0; rect.top = 0;
 398         rect.right = 0; rect.bottom = 0;
 399         DWORD style = ::GetWindowLong((HWND) m_window->GetHWND(), GWL_STYLE);
 400 #ifdef __WIN32__
 401         DWORD exStyle = ::GetWindowLong((HWND) m_window->GetHWND(), GWL_EXSTYLE);
 402         ::AdjustWindowRectEx(& rect, style, FALSE, exStyle);
 403 #else
 404         ::AdjustWindowRect(& rect, style, FALSE);
 405 #endif
 406         // Subtract the (negative) values, i.e. add a small increment
 407         pt2.x -= rect.left; pt2.y -= rect.top;
 408     }
 409     else if (m_window && m_fullScreen)
 410     {
 411         pt2 = m_window->ClientToScreen(pt2);
 412     }
 413
 414     bool ret = (ImageList_DragMove( pt2.x, pt2.y ) != 0);
 415
 416     m_position = pt2;
 417
 418     return ret;
 419 }
 420
 421 bool wxDragImage::Show()
 422 {
 423     wxASSERT_MSG( (m_hImageList != 0), wxT("Image list must not be null in Show."));
 424
 425     HWND hWnd = 0;
 426     if (m_window && !m_fullScreen)
 427         hWnd = (HWND) m_window->GetHWND();
 428
 429     bool ret = (ImageList_DragEnter( hWnd, m_position.x, m_position.y ) != 0);
 430
 431     return ret;
 432 }
 433
 434 bool wxDragImage::Hide()
 435 {
 436     wxASSERT_MSG( (m_hImageList != 0), wxT("Image list must not be null in Hide."));
 437
 438     HWND hWnd = 0;
 439     if (m_window && !m_fullScreen)
 440         hWnd = (HWND) m_window->GetHWND();
 441
 442     bool ret = (ImageList_DragLeave( hWnd ) != 0);
 443
 444     return ret;
 445 }
 446
 447 #endif
 448     // __WIN95__
 449
 450 #endif // wxUSE_DRAGIMAGE