[wxWidgets.git] / src / os2 / cursor.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        cursor.cpp
// Purpose:     wxCursor class
// Author:      David Webster
// Modified by:
// Created:     10/13/99
// RCS-ID:      $Id$
// Copyright:   (c) David Webster
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////////

// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"

#ifndef WX_PRECOMP
#include <stdio.h>
#include "wx/setup.h"
#include "wx/list.h"
#include "wx/utils.h"
#include "wx/app.h"
#include "wx/cursor.h"
#include "wx/icon.h"
#endif

#include "wx/os2/private.h"
#include "wx/os2/wxrsc.h"
#include "wx/image.h"

#include "assert.h"

IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxBitmap)

wxCursorRefData::wxCursorRefData(void)
{
  m_nWidth = 32;
  m_nHeight = 32;
  m_hCursor = 0 ;
  m_bDestroyCursor = FALSE;
}

void wxCursorRefData::Free()
{
    if (m_hCursor)
    {
        if (m_bDestroyCursor)
            ::WinDestroyPointer((HPOINTER)m_hCursor);
        m_hCursor = 0;
    }
} // end of wxCursorRefData::Free

// Cursors
wxCursor::wxCursor(void)
{
}

wxCursor::wxCursor(
  const char                        WXUNUSED(bits)[]
, int                               WXUNUSED(width)
, int                               WXUNUSED(height)
, int                               WXUNUSED(hotSpotX)
, int                               WXUNUSED(hotSpotY)
, const char                        WXUNUSED(maskBits)[]
)
{
}

wxCursor::wxCursor(
  const wxImage&                    rImage
)
{
    wxImage                         vImage32 = rImage.Scale(32,32);
    int                             nWidth   = vImage32.GetWidth();
    int                             nHeight  = vImage32.GetHeight();

    //
    // Need a bitmap handle somehow
    //
    HBITMAP                      hBitmap = wxBitmap(vImage32).GetHBITMAP();
    int                          nHotSpotX = vImage32.GetOptionInt(wxCUR_HOTSPOT_X);
    int                          nHotSpotY = vImage32.GetOptionInt(wxCUR_HOTSPOT_Y);

    if (nHotSpotX < 0 || nHotSpotX >= nWidth)
            nHotSpotX = 0;
    if (nHotSpotY < 0 || nHotSpotY >= nHeight)
            nHotSpotY = 0;


    wxCursorRefData*                pRefData = new wxCursorRefData;

    m_refData = pRefData;
    pRefData->m_hCursor = (WXHCURSOR) ::WinCreatePointer( HWND_DESKTOP
                                                         ,hBitmap
                                                         ,TRUE
                                                         ,nHotSpotY
                                                         ,nHotSpotX
                                                        );

} // end of wxCursor::wxCursor

wxCursor::wxCursor(
  const wxString&                   rsCursorFile
, long                              lFlags
, int                               nHotSpotX
, int                               nHotSpotY
)
{
    wxCursorRefData*                pRefData = new wxCursorRefData;

    pRefData = new wxCursorRefData;
    m_refData = pRefData;
    pRefData->m_bDestroyCursor = FALSE;
    if (lFlags == wxBITMAP_TYPE_CUR_RESOURCE)
    {
        pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                           ,0
                                                           ,(ULONG)lFlags // if OS/2 this should be the resource Id
                                                          );
    }
} // end of wxCursor::wxCursor

// Cursors by stock number
wxCursor::wxCursor(
  int                               nCursorType
)
{
    wxCursorRefData*                pRefData = new wxCursorRefData;

    m_refData = pRefData;
    switch (nCursorType)
    {
        case wxCURSOR_ARROWWAIT:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_WAIT
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_WAIT:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_WAIT
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_IBEAM:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_TEXT
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_CROSS:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_MOVE
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_SIZENWSE:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_SIZENWSE
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_SIZENESW:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_SIZENESW
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_SIZEWE:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_SIZEWE
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_SIZENS:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_SIZENS
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_CHAR:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_ARROW
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_HAND:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)wxCURSOR_HAND
                                                              );
            break;

        case wxCURSOR_BULLSEYE:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)wxCURSOR_BULLSEYE
                                                              );
            break;

        case wxCURSOR_PENCIL:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)wxCURSOR_PENCIL
                                                              );
            break;

        case wxCURSOR_MAGNIFIER:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)wxCURSOR_MAGNIFIER
                                                              );
            break;

        case wxCURSOR_NO_ENTRY:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)wxCURSOR_NO_ENTRY
                                                              );
            break;

        case wxCURSOR_LEFT_BUTTON:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_ARROW
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_RIGHT_BUTTON:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_ARROW
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_MIDDLE_BUTTON:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_ARROW
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_SIZING:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_SIZE
                                                                   ,FALSE
                                                                  );
            break;

        case wxCURSOR_WATCH:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)wxCURSOR_WATCH
                                                              );
            break;

        case wxCURSOR_SPRAYCAN:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                              ,0
                                                              ,(ULONG)WXCURSOR_ROLLER
                                                             );
            break;

        case wxCURSOR_PAINT_BRUSH:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)WXCURSOR_PBRUSH
                                                              );
            break;

        case wxCURSOR_POINT_LEFT:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)WXCURSOR_PLEFT
                                                              );
            break;

        case wxCURSOR_POINT_RIGHT:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)WXCURSOR_PRIGHT
                                                              );
            break;

        case wxCURSOR_QUESTION_ARROW:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)WXCURSOR_QARROW
                                                              );
            break;

        case wxCURSOR_BLANK:
            pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
                                                               ,0
                                                               ,(ULONG)WXCURSOR_BLANK
                                                              );
            break;

        default:
        case wxCURSOR_ARROW:
            pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
                                                                   ,(ULONG)SPTR_ARROW
                                                                   ,FALSE
                                                                  );
            break;
    }
    //
    // No need to destroy the stock cursors
    //
    ((wxCursorRefData *)m_refData)->m_bDestroyCursor = FALSE;
} // end of wxCursor::wxCursor

// Global cursor setting
void wxSetCursor(const wxCursor& cursor)
{
    extern wxCursor *g_globalCursor;

    if ( cursor.Ok() && cursor.GetHCURSOR() )
    {
//        ::SetCursor((HCURSOR) cursor.GetHCURSOR());

        if ( g_globalCursor )
            (*g_globalCursor) = cursor;
    }
}
Commit	Line	Data
0e320a79 DW	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: cursor.cpp
	3	// Purpose: wxCursor class
37f214d5	4	// Author: David Webster
0e320a79	5	// Modified by:
37f214d5	6	// Created: 10/13/99
0e320a79	7	// RCS-ID: $Id$
37f214d5 DW	8	// Copyright: (c) David Webster
37f214d5 DW	9	// Licence: wxWindows licence
0e320a79 DW	10	/////////////////////////////////////////////////////////////////////////////
0e320a79 DW	11
37f214d5 DW	12	// For compilers that support precompilation, includes "wx.h".
37f214d5 DW	13	#include "wx/wxprec.h"
0e320a79	14
37f214d5 DW	15	#ifndef WX_PRECOMP
	16	#include <stdio.h>
	17	#include "wx/setup.h"
	18	#include "wx/list.h"
	19	#include "wx/utils.h"
	20	#include "wx/app.h"
0e320a79 DW	21	#include "wx/cursor.h"
0e320a79 DW	22	#include "wx/icon.h"
37f214d5 DW	23	#endif
	24
	25	#include "wx/os2/private.h"
28410cdc	26	#include "wx/os2/wxrsc.h"
b9b1d6c8	27	#include "wx/image.h"
37f214d5 DW	28
37f214d5 DW	29	#include "assert.h"
0e320a79	30
0e320a79	31	IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxBitmap)
0e320a79	32
37f214d5	33	wxCursorRefData::wxCursorRefData(void)
0e320a79	34	{
43543d98 DW	35	m_nWidth = 32;
43543d98 DW	36	m_nHeight = 32;
37f214d5	37	m_hCursor = 0 ;
b389a12d	38	m_bDestroyCursor = FALSE;
0e320a79 DW	39	}
0e320a79 DW	40
b389a12d	41	void wxCursorRefData::Free()
0e320a79	42	{
b389a12d DW	43	if (m_hCursor)
	44	{
	45	if (m_bDestroyCursor)
	46	::WinDestroyPointer((HPOINTER)m_hCursor);
	47	m_hCursor = 0;
	48	}
	49	} // end of wxCursorRefData::Free
0e320a79 DW	50
0e320a79 DW	51	// Cursors
37f214d5	52	wxCursor::wxCursor(void)
0e320a79 DW	53	{
	54	}
	55
b389a12d DW	56	wxCursor::wxCursor(
	57	const char WXUNUSED(bits)[]
	58	, int WXUNUSED(width)
	59	, int WXUNUSED(height)
	60	, int WXUNUSED(hotSpotX)
	61	, int WXUNUSED(hotSpotY)
	62	, const char WXUNUSED(maskBits)[]
	63	)
0e320a79 DW	64	{
	65	}
	66
b9b1d6c8 DW	67	wxCursor::wxCursor(
	68	const wxImage& rImage
	69	)
	70	{
	71	wxImage vImage32 = rImage.Scale(32,32);
	72	int nWidth = vImage32.GetWidth();
	73	int nHeight = vImage32.GetHeight();
	74
	75	//
	76	// Need a bitmap handle somehow
	77	//
	78	HBITMAP hBitmap = wxBitmap(vImage32).GetHBITMAP();
	79	int nHotSpotX = vImage32.GetOptionInt(wxCUR_HOTSPOT_X);
	80	int nHotSpotY = vImage32.GetOptionInt(wxCUR_HOTSPOT_Y);
	81
	82	if (nHotSpotX < 0 \|\| nHotSpotX >= nWidth)
	83	nHotSpotX = 0;
	84	if (nHotSpotY < 0 \|\| nHotSpotY >= nHeight)
	85	nHotSpotY = 0;
	86
	87
	88	wxCursorRefData* pRefData = new wxCursorRefData;
	89
	90	m_refData = pRefData;
	91	pRefData->m_hCursor = (WXHCURSOR) ::WinCreatePointer( HWND_DESKTOP
	92	,hBitmap
	93	,TRUE
	94	,nHotSpotY
	95	,nHotSpotX
	96	);
	97
	98	} // end of wxCursor::wxCursor
	99
b389a12d DW	100	wxCursor::wxCursor(
	101	const wxString& rsCursorFile
	102	, long lFlags
	103	, int nHotSpotX
	104	, int nHotSpotY
	105	)
0e320a79	106	{
b389a12d	107	wxCursorRefData* pRefData = new wxCursorRefData;
0e320a79	108
b389a12d DW	109	pRefData = new wxCursorRefData;
	110	m_refData = pRefData;
	111	pRefData->m_bDestroyCursor = FALSE;
	112	if (lFlags == wxBITMAP_TYPE_CUR_RESOURCE)
0e320a79	113	{
b389a12d DW	114	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
	115	,0
	116	,(ULONG)lFlags // if OS/2 this should be the resource Id
	117	);
0e320a79	118	}
b389a12d	119	} // end of wxCursor::wxCursor
0e320a79	120
b389a12d DW	121	// Cursors by stock number
	122	wxCursor::wxCursor(
	123	int nCursorType
	124	)
37f214d5	125	{
b389a12d	126	wxCursorRefData* pRefData = new wxCursorRefData;
0e320a79	127
b389a12d DW	128	m_refData = pRefData;
	129	switch (nCursorType)
	130	{
	131	case wxCURSOR_ARROWWAIT:
	132	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	133	,(ULONG)SPTR_WAIT
	134	,FALSE
	135	);
	136	break;
37f214d5	137
b389a12d DW	138	case wxCURSOR_WAIT:
	139	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	140	,(ULONG)SPTR_WAIT
	141	,FALSE
	142	);
	143	break;
37f214d5	144
b389a12d DW	145	case wxCURSOR_IBEAM:
	146	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	147	,(ULONG)SPTR_TEXT
	148	,FALSE
	149	);
	150	break;
	151
	152	case wxCURSOR_CROSS:
	153	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	154	,(ULONG)SPTR_MOVE
	155	,FALSE
	156	);
	157	break;
	158
	159	case wxCURSOR_SIZENWSE:
	160	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	161	,(ULONG)SPTR_SIZENWSE
	162	,FALSE
	163	);
	164	break;
	165
	166	case wxCURSOR_SIZENESW:
	167	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	168	,(ULONG)SPTR_SIZENESW
	169	,FALSE
	170	);
	171	break;
	172
	173	case wxCURSOR_SIZEWE:
	174	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	175	,(ULONG)SPTR_SIZEWE
	176	,FALSE
	177	);
	178	break;
	179
	180	case wxCURSOR_SIZENS:
	181	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	182	,(ULONG)SPTR_SIZENS
	183	,FALSE
	184	);
	185	break;
	186
	187	case wxCURSOR_CHAR:
	188	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
	189	,(ULONG)SPTR_ARROW
	190	,FALSE
	191	);
	192	break;
	193
	194	case wxCURSOR_HAND:
	195	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
	196	,0
	197	,(ULONG)wxCURSOR_HAND
	198	);
	199	break;
	200
	201	case wxCURSOR_BULLSEYE:
	202	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
	203	,0
	204	,(ULONG)wxCURSOR_BULLSEYE
	205	);
	206	break;
	207
	208	case wxCURSOR_PENCIL:
209	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
210	,0
211	,(ULONG)wxCURSOR_PENCIL
212	);
213	break;
214
215	case wxCURSOR_MAGNIFIER:
216	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
217	,0
218	,(ULONG)wxCURSOR_MAGNIFIER
219	);
220	break;
221
222	case wxCURSOR_NO_ENTRY:
223	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
224	,0
225	,(ULONG)wxCURSOR_NO_ENTRY
226	);
227	break;
228
229	case wxCURSOR_LEFT_BUTTON:
230	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
231	,(ULONG)SPTR_ARROW
232	,FALSE
233	);
234	break;
235
236	case wxCURSOR_RIGHT_BUTTON:
237	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
238	,(ULONG)SPTR_ARROW
239	,FALSE
240	);
241	break;
242
243	case wxCURSOR_MIDDLE_BUTTON:
244	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
245	,(ULONG)SPTR_ARROW
246	,FALSE
247	);
248	break;
249
250	case wxCURSOR_SIZING:
251	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
252	,(ULONG)SPTR_SIZE
253	,FALSE
254	);
255	break;
256
257	case wxCURSOR_WATCH:
258	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
259	,0
260	,(ULONG)wxCURSOR_WATCH
261	);
262	break;
263
264	case wxCURSOR_SPRAYCAN:
265	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
266	,0
267	,(ULONG)WXCURSOR_ROLLER
268	);
269	break;
270
271	case wxCURSOR_PAINT_BRUSH:
272	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
273	,0
274	,(ULONG)WXCURSOR_PBRUSH
275	);
276	break;
277
278	case wxCURSOR_POINT_LEFT:
279	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
280	,0
281	,(ULONG)WXCURSOR_PLEFT
282	);
283	break;
284
285	case wxCURSOR_POINT_RIGHT:
286	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
287	,0
288	,(ULONG)WXCURSOR_PRIGHT
289	);
290	break;
291
292	case wxCURSOR_QUESTION_ARROW:
293	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
294	,0
295	,(ULONG)WXCURSOR_QARROW
296	);
297	break;
298
299	case wxCURSOR_BLANK:
300	pRefData->m_hCursor = (WXHCURSOR) ::WinLoadPointer( HWND_DESKTOP
301	,0
302	,(ULONG)WXCURSOR_BLANK
303	);
304	break;
305
306	default:
307	case wxCURSOR_ARROW:
308	pRefData->m_hCursor = (WXHCURSOR) ::WinQuerySysPointer( HWND_DESKTOP
309	,(ULONG)SPTR_ARROW
310	,FALSE
311	);
312	break;
313	}
6e348b12 DW	314	//
	315	// No need to destroy the stock cursors
	316	//
	317	((wxCursorRefData *)m_refData)->m_bDestroyCursor = FALSE;
b389a12d	318	} // end of wxCursor::wxCursor
0e320a79 DW	319
	320	// Global cursor setting
	321	void wxSetCursor(const wxCursor& cursor)
	322	{
37f214d5	323	extern wxCursor *g_globalCursor;
0e320a79	324
37f214d5 DW	325	if ( cursor.Ok() && cursor.GetHCURSOR() )
	326	{
	327	// ::SetCursor((HCURSOR) cursor.GetHCURSOR());
	328
	329	if ( g_globalCursor )
	330	(*g_globalCursor) = cursor;
	331	}
	332	}
0e320a79	333