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