]> git.saurik.com Git - wxWidgets.git/blame - src/os2/window.cpp
Added what I think is full support for Null column values in the tables, partially...
[wxWidgets.git] / src / os2 / window.cpp
CommitLineData
0e320a79
DW
1/////////////////////////////////////////////////////////////////////////////
2// Name: windows.cpp
3// Purpose: wxWindow
cdf1e714 4// Author: David Webster
0e320a79 5// Modified by:
cdf1e714 6// Created: 10/12/99
0e320a79 7// RCS-ID: $Id$
cdf1e714
DW
8// Copyright: (c) David Webster
9// Licence: wxWindows licence
0e320a79
DW
10/////////////////////////////////////////////////////////////////////////////
11
a885d89a 12//
cdf1e714 13// For compilers that support precompilation, includes "wx.h".
a885d89a 14//
cdf1e714 15#include "wx/wxprec.h"
0e320a79 16
849949b1
DW
17#ifndef WX_PRECOMP
18 #define INCL_DOS
19 #define INCL_PM
20 #include <os2.h>
21 #include "wx/window.h"
22 #include "wx/accel.h"
23 #include "wx/setup.h"
24 #include "wx/menu.h"
25 #include "wx/dc.h"
26 #include "wx/dcclient.h"
27 #include "wx/utils.h"
28 #include "wx/app.h"
29 #include "wx/panel.h"
30 #include "wx/layout.h"
31 #include "wx/dialog.h"
32 #include "wx/frame.h"
33 #include "wx/listbox.h"
34 #include "wx/button.h"
35 #include "wx/msgdlg.h"
36
37 #include <stdio.h>
38#endif
39
40#if wxUSE_OWNER_DRAWN
41 #include "wx/ownerdrw.h"
42#endif
43
44#if wxUSE_DRAG_AND_DROP
45 #include "wx/dnd.h"
46#endif
0e320a79
DW
47
48#include "wx/menuitem.h"
49#include "wx/log.h"
50
cdf1e714
DW
51#include "wx/os2/private.h"
52
849949b1
DW
53#if wxUSE_TOOLTIPS
54 #include "wx/tooltip.h"
0e320a79
DW
55#endif
56
849949b1
DW
57#if wxUSE_CARET
58 #include "wx/caret.h"
59#endif // wxUSE_CARET
60
61#include "wx/intl.h"
62#include "wx/log.h"
63
64
65#include "wx/textctrl.h"
66
0e320a79
DW
67#include <string.h>
68
a885d89a
DW
69//
70// Place compiler, OS specific includes here
71//
849949b1 72
a885d89a
DW
73//
74// Standard macros -- these are for OS/2 PM, but most GUI's have something similar
75//
849949b1 76#ifndef GET_X_LPARAM
a885d89a 77//
849949b1 78// SHORT1FROMMP -- LOWORD
a885d89a 79//
849949b1 80 #define GET_X_LPARAM(mp) ((unsigned short)(unsigned long)(mp))
a885d89a 81//
849949b1 82// SHORT2FROMMP -- HIWORD
a885d89a 83//
849949b1
DW
84 #define GET_Y_LPARAM(mp) ((unsigned short)(unsigned long)(mp >> 16))
85#endif // GET_X_LPARAM
86
29a99be3
DW
87#ifndef CW_USEDEFAULT
88# define CW_USEDEFAULT ((int)0x80000000)
89#endif
90
849949b1
DW
91// ---------------------------------------------------------------------------
92// global variables
93// ---------------------------------------------------------------------------
94
a885d89a
DW
95//
96// The last Windows message we got (MT-UNSAFE)
97//
61243a51 98QMSG s_currentMsg;
849949b1 99
a885d89a
DW
100wxMenu* wxCurrentPopupMenu = NULL;
101extern wxList WXDLLEXPORT wxPendingDelete;
8138a3b0
SN
102#if !defined(__VISAGECPP__) || (__IBMCPP__ < 400)
103extern wxChar wxCanvasClassName[];
61243a51 104#endif
a885d89a 105wxList* wxWinHandleList = NULL;
849949b1
DW
106
107// ---------------------------------------------------------------------------
108// private functions
109// ---------------------------------------------------------------------------
a885d89a
DW
110
111//
849949b1 112// the window proc for all our windows; most gui's have something similar
a885d89a 113//
f23208ca
DW
114MRESULT EXPENTRY wxWndProc( HWND hWnd
115 ,ULONG message
116 ,MPARAM mp1
117 ,MPARAM mp2
118 );
11e59d47
DW
119
120#ifdef __WXDEBUG__
121 const char *wxGetMessageName(int message);
122#endif //__WXDEBUG__
123
a885d89a
DW
124void wxRemoveHandleAssociation(wxWindow* pWin);
125void wxAssociateWinWithHandle( HWND hWnd
126 ,wxWindow* pWin
127 );
128wxWindow* wxFindWinFromHandle(WXHWND hWnd);
849949b1 129
a885d89a
DW
130//
131// This magical function is used to translate VK_APPS key presses to right
132// mouse clicks
133//
134static void TranslateKbdEventToMouse( wxWindow* pWin
135 ,int* pX
136 ,int* pY
137 ,MPARAM* pFlags
138 );
139
140//
141// get the current state of SHIFT/CTRL keys
142//
143static inline bool IsShiftDown() { return (::WinGetKeyState(HWND_DESKTOP, VK_SHIFT) & 0x8000) != 0; }
144static inline bool IsCtrlDown() { return (::WinGetKeyState(HWND_DESKTOP, VK_CTRL) & 0x8000) != 0; }
849949b1
DW
145// ---------------------------------------------------------------------------
146// event tables
147// ---------------------------------------------------------------------------
0e320a79 148
849949b1 149 IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
0e320a79 150
849949b1
DW
151BEGIN_EVENT_TABLE(wxWindow, wxWindowBase)
152 EVT_ERASE_BACKGROUND(wxWindow::OnEraseBackground)
153 EVT_SYS_COLOUR_CHANGED(wxWindow::OnSysColourChanged)
154 EVT_INIT_DIALOG(wxWindow::OnInitDialog)
155 EVT_IDLE(wxWindow::OnIdle)
51c1d535 156 EVT_SET_FOCUS(wxWindow::OnSetFocus)
849949b1 157END_EVENT_TABLE()
0e320a79 158
849949b1
DW
159// ===========================================================================
160// implementation
161// ===========================================================================
0e320a79 162
a885d89a 163//
776d87d5 164// Find an item given the PM Window id
a885d89a 165//
776d87d5 166wxWindow* wxWindow::FindItem(
a885d89a 167 long lId
776d87d5 168) const
cdf1e714 169{
a885d89a
DW
170 wxControl* pItem = wxDynamicCast( this
171 ,wxControl
172 );
173
174 if (pItem)
175 {
176 //
177 // I it we or one of our "internal" children?
178 //
179 if (pItem->GetId() == lId ||
180 (pItem->GetSubcontrols().Index(lId) != wxNOT_FOUND))
181 {
182 return pItem;
183 }
184 }
185
776d87d5
DW
186 wxWindowList::Node* pCurrent = GetChildren().GetFirst();
187
188 while (pCurrent)
cdf1e714 189 {
776d87d5 190 wxWindow* pChildWin = pCurrent->GetData();
a885d89a 191 wxWindow* pWnd = pChildWin->FindItem(lId);
cdf1e714 192
776d87d5
DW
193 if (pWnd)
194 return pWnd;
cdf1e714 195
776d87d5 196 pCurrent = pCurrent->GetNext();
cdf1e714 197 }
776d87d5 198 return(NULL);
a885d89a 199} // end of wxWindow::FindItem
cdf1e714 200
a885d89a 201//
776d87d5 202// Find an item given the PM Window handle
a885d89a 203//
776d87d5
DW
204wxWindow* wxWindow::FindItemByHWND(
205 WXHWND hWnd
206, bool bControlOnly
207) const
cdf1e714 208{
776d87d5
DW
209 wxWindowList::Node* pCurrent = GetChildren().GetFirst();
210
211 while (pCurrent)
cdf1e714 212 {
776d87d5 213 wxWindow* pParent = pCurrent->GetData();
cdf1e714 214
a885d89a 215 //
cdf1e714 216 // Do a recursive search.
a885d89a 217 //
776d87d5
DW
218 wxWindow* pWnd = pParent->FindItemByHWND(hWnd);
219
220 if (pWnd)
221 return(pWnd);
cdf1e714 222
776d87d5 223 if (!bControlOnly || pParent->IsKindOf(CLASSINFO(wxControl)))
cdf1e714 224 {
776d87d5
DW
225 wxWindow* pItem = pCurrent->GetData();
226
227 if (pItem->GetHWND() == hWnd)
228 return(pItem);
cdf1e714
DW
229 else
230 {
776d87d5
DW
231 if (pItem->ContainsHWND(hWnd))
232 return(pItem);
cdf1e714
DW
233 }
234 }
776d87d5 235 pCurrent = pCurrent->GetNext();
cdf1e714 236 }
776d87d5 237 return(NULL);
a885d89a 238} // end of wxWindow::FindItemByHWND
cdf1e714 239
a885d89a 240//
cdf1e714 241// Default command handler
a885d89a 242//
776d87d5
DW
243bool wxWindow::OS2Command(
244 WXUINT WXUNUSED(uParam)
245, WXWORD WXUNUSED(uId)
246)
cdf1e714 247{
776d87d5 248 return(FALSE);
cdf1e714
DW
249}
250
251// ----------------------------------------------------------------------------
252// constructors and such
253// ----------------------------------------------------------------------------
254
849949b1 255void wxWindow::Init()
0e320a79 256{
a885d89a
DW
257 //
258 // Generic
259 //
849949b1 260 InitBase();
0e320a79 261
a885d89a 262 //
849949b1 263 // PM specific
a885d89a 264 //
776d87d5
DW
265 m_bDoubleClickAllowed = 0;
266 m_bWinCaptured = FALSE;
cdf1e714 267
849949b1 268 m_isBeingDeleted = FALSE;
776d87d5
DW
269 m_fnOldWndProc = 0;
270 m_bUseCtl3D = FALSE;
271 m_bMouseInWindow = FALSE;
0e320a79 272
a885d89a 273 //
849949b1 274 // wxWnd
a885d89a 275 //
849949b1 276 m_hMenu = 0;
849949b1 277 m_hWnd = 0;
0e320a79 278
a885d89a
DW
279 //
280 // Pass WM_GETDLGCODE to DefWindowProc()
849949b1 281 m_lDlgCode = 0;
0e320a79 282
776d87d5
DW
283 m_nXThumbSize = 0;
284 m_nYThumbSize = 0;
285 m_bBackgroundTransparent = FALSE;
0e320a79 286
a885d89a
DW
287 //
288 // As all windows are created with WS_VISIBLE style...
289 //
849949b1 290 m_isShown = TRUE;
0e320a79 291
cdf1e714 292#if wxUSE_MOUSEEVENT_HACK
776d87d5
DW
293 m_lLastMouseX =
294 m_lLastMouseY = -1;
295 m_nLastMouseEvent = -1;
cdf1e714 296#endif // wxUSE_MOUSEEVENT_HACK
a885d89a 297} // wxWindow::Init
0e320a79 298
a885d89a 299//
849949b1 300// Destructor
a885d89a 301//
849949b1 302wxWindow::~wxWindow()
0e320a79 303{
849949b1 304 m_isBeingDeleted = TRUE;
0e320a79 305
cdf1e714 306 OS2DetachWindowMenu();
849949b1
DW
307 if (m_parent)
308 m_parent->RemoveChild(this);
309 DestroyChildren();
e604d44b 310
849949b1
DW
311 if (m_hWnd)
312 {
a885d89a 313 if(!::WinDestroyWindow(GetHWND()))
223d09f6 314 wxLogLastError(wxT("DestroyWindow"));
a885d89a 315 //
849949b1 316 // remove hWnd <-> wxWindow association
a885d89a 317 //
849949b1
DW
318 wxRemoveHandleAssociation(this);
319 }
a885d89a 320} // end of wxWindow::~wxWindow
0e320a79 321
776d87d5
DW
322bool wxWindow::Create(
323 wxWindow* pParent
324, wxWindowID vId
325, const wxPoint& rPos
326, const wxSize& rSize
327, long lStyle
328, const wxString& rName
329)
330{
f23208ca
DW
331 HWND hParent = NULLHANDLE;
332
776d87d5
DW
333 wxCHECK_MSG(pParent, FALSE, wxT("can't create wxWindow without parent"));
334
335 if ( !CreateBase( pParent
336 ,vId
337 ,rPos
338 ,rSize
339 ,lStyle
340 ,wxDefaultValidator
341 ,rName
342 ))
343 return(FALSE);
344
f23208ca
DW
345 if (pParent)
346 {
347 pParent->AddChild(this);
348 hParent = GetWinHwnd(pParent);
349 }
350 else
351 hParent = HWND_DESKTOP;
776d87d5 352
f23208ca 353 ULONG ulCreateFlags = 0L;
a885d89a 354
a885d89a
DW
355
356 //
f23208ca
DW
357 // Most wxSTYLES are really PM Class specific styles and will be
358 // set in those class create procs. PM's basic windows styles are
359 // very limited.
a885d89a 360 //
51c1d535
DW
361 ulCreateFlags |= WS_VISIBLE;
362
363
364 if ( lStyle & wxCLIP_SIBLINGS )
365 ulCreateFlags |= WS_CLIPSIBLINGS;
366
a885d89a 367 if (lStyle & wxCLIP_CHILDREN )
f23208ca 368 ulCreateFlags |= WS_CLIPCHILDREN;
a885d89a 369
f23208ca
DW
370 //
371 // Empty stuff for now since PM has no custome 3D effects
372 // Doesn't mean someone cannot make some up though
373 //
776d87d5
DW
374 bool bWant3D;
375 WXDWORD dwExStyle = Determine3DEffects(WS_EX_CLIENTEDGE, &bWant3D);
776d87d5 376
a885d89a 377 //
f23208ca
DW
378 // Generic OS/2 Windows are created with no owner, no Z Order, no Control data,
379 // and no presentation parameters
a885d89a 380 //
f23208ca
DW
381 OS2Create( hParent
382 ,(PSZ)wxCanvasClassName
383 ,rName.c_str()
384 ,ulCreateFlags
776d87d5
DW
385 ,rPos.x
386 ,rPos.y
387 ,WidthDefault(rSize.x)
388 ,HeightDefault(rSize.y)
f23208ca
DW
389 ,NULLHANDLE
390 ,NULLHANDLE
391 ,m_windowId
776d87d5 392 );
e604d44b 393
776d87d5 394 return(TRUE);
a885d89a 395} // end of wxWindow::Create
0e320a79 396
cdf1e714
DW
397// ---------------------------------------------------------------------------
398// basic operations
399// ---------------------------------------------------------------------------
0e320a79 400
cdf1e714 401void wxWindow::SetFocus()
0e320a79 402{
bbdc9a87
DW
403 HWND hWnd = GetHwnd();
404
405 if (hWnd)
406 ::WinSetFocus(HWND_DESKTOP, hWnd);
a885d89a 407} // end of wxWindow::SetFocus
0e320a79 408
11e59d47 409wxWindow* wxWindowBase::FindFocus()
0e320a79 410{
bbdc9a87
DW
411 HWND hWnd = ::WinQueryFocus(HWND_DESKTOP);
412
413 if (hWnd)
414 {
415 return wxFindWinFromHandle((WXHWND)hWnd);
416 }
417 return NULL;
a885d89a 418} // wxWindowBase::FindFocus
0e320a79 419
bbdc9a87
DW
420bool wxWindow::Enable(
421 bool bEnable
422)
0e320a79 423{
bbdc9a87
DW
424 if (!wxWindowBase::Enable(bEnable))
425 return(FALSE);
426
427 HWND hWnd = GetHwnd();
428
429 if ( hWnd )
430 ::WinEnableWindow(hWnd, (BOOL)bEnable);
431
432 wxWindowList::Node* pNode = GetChildren().GetFirst();
433
434 while (pNode)
435 {
436 wxWindow* pChild = pNode->GetData();
437
438 pChild->Enable(bEnable);
439 pNode = pNode->GetNext();
440 }
cdf1e714 441 return(TRUE);
a885d89a 442} // end of wxWindow::Enable
0e320a79 443
bbdc9a87
DW
444bool wxWindow::Show(
445 bool bShow
446)
0e320a79 447{
bbdc9a87
DW
448 if (!wxWindowBase::Show(bShow))
449 return(FALSE);
450
451 HWND hWnd = GetHwnd();
452
453 ::WinShowWindow(hWnd, bShow);
454
455 if (bShow)
456 {
a885d89a 457 ::WinSetWindowPos(hWnd, HWND_TOP, 0, 0, 0, 0, SWP_ACTIVATE | SWP_ZORDER);
bbdc9a87 458 }
849949b1 459 return(TRUE);
a885d89a 460} // end of wxWindow::Show
0e320a79 461
cdf1e714 462void wxWindow::Raise()
0e320a79 463{
a885d89a
DW
464 ::WinSetWindowPos(GetHwnd(), HWND_TOP, 0, 0, 0, 0, SWP_ZORDER | SWP_ACTIVATE);
465} // end of wxWindow::Raise
0e320a79 466
cdf1e714 467void wxWindow::Lower()
0e320a79 468{
a885d89a
DW
469 ::WinSetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0, SWP_ZORDER | SWP_DEACTIVATE);
470} // end of wxWindow::Lower
0e320a79 471
bbdc9a87
DW
472void wxWindow::SetTitle(
473 const wxString& rTitle
474)
0e320a79 475{
f38374d0 476 ::WinSetWindowText(GetHwnd(), rTitle.c_str());
a885d89a 477} // end of wxWindow::SetTitle
0e320a79 478
cdf1e714 479wxString wxWindow::GetTitle() const
0e320a79 480{
cdf1e714 481 return wxGetWindowText(GetHWND());
a885d89a 482} // end of wxWindow::GetTitle
0e320a79 483
cdf1e714 484void wxWindow::CaptureMouse()
0e320a79 485{
f38374d0
DW
486 HWND hWnd = GetHwnd();
487
488 if (hWnd && !m_bWinCaptured)
489 {
490 ::WinSetCapture(HWND_DESKTOP, hWnd);
491 m_bWinCaptured = TRUE;
492 }
a885d89a 493} // end of wxWindow::GetTitle
0e320a79 494
cdf1e714 495void wxWindow::ReleaseMouse()
0e320a79 496{
a885d89a 497 if (m_bWinCaptured)
f38374d0
DW
498 {
499 ::WinSetCapture(HWND_DESKTOP, NULLHANDLE);
500 m_bWinCaptured = FALSE;
501 }
a885d89a 502} // end of wxWindow::ReleaseMouse
0e320a79 503
f38374d0
DW
504bool wxWindow::SetFont(
505 const wxFont& rFont
506)
0e320a79 507{
f38374d0
DW
508 if (!wxWindowBase::SetFont(rFont))
509 {
510 // nothing to do
511 return(FALSE);
512 }
513
514 HWND hWnd = GetHwnd();
515
516 if (hWnd != 0)
517 {
518 wxChar zFont[128];
519
520 sprintf(zFont, "%d.%s", rFont.GetPointSize(), rFont.GetFaceName().c_str());
521 return(::WinSetPresParam(hWnd, PP_FONTNAMESIZE, strlen(zFont), (PVOID)zFont));
522 }
cdf1e714 523 return(TRUE);
0e320a79
DW
524}
525
f38374d0
DW
526bool wxWindow::SetCursor(
527 const wxCursor& rCursor
528) // check if base implementation is OK
0e320a79 529{
f38374d0
DW
530 if ( !wxWindowBase::SetCursor(rCursor))
531 {
532 // no change
533 return FALSE;
534 }
535
536 wxASSERT_MSG( m_cursor.Ok(),
537 wxT("cursor must be valid after call to the base version"));
538
539 HWND hWnd = GetHwnd();
540 POINTL vPoint;
541 RECTL vRect;
542 HPS hPS;
543 HRGN hRGN;
544
545 hPS = ::WinGetPS(hWnd);
546
547 ::WinQueryPointerPos(HWND_DESKTOP, &vPoint);
548 ::WinQueryWindowRect(hWnd, &vRect);
549
550 hRGN = ::GpiCreateRegion(hPS, 1L, &vRect);
551
552 if ((::GpiPtInRegion(hPS, hRGN, &vPoint) == PRGN_INSIDE) && !wxIsBusy())
553 {
a885d89a 554 ::WinSetPointer(HWND_DESKTOP, (HPOINTER)m_cursor.GetHCURSOR());
f38374d0
DW
555 }
556 return TRUE;
a885d89a 557} // end of wxWindow::SetCursor
0e320a79 558
a885d89a
DW
559void wxWindow::WarpPointer(
560 int nXPos
561, int nYPos
562)
0e320a79 563{
a885d89a
DW
564 int nX = nXPos;
565 int nY = nYPos;
566 RECTL vRect;
567
568 ::WinQueryWindowRect(GetHwnd(), &vRect);
569 nX += vRect.xLeft;
570 nY += vRect.yBottom;
571
572 ::WinSetPointerPos(HWND_DESKTOP, (LONG)nX, (LONG)(nY));
573} // end of wxWindow::WarpPointer
0e320a79 574
cdf1e714
DW
575#if WXWIN_COMPATIBILITY
576void wxWindow::OS2DeviceToLogical (float *x, float *y) const
0e320a79 577{
0e320a79 578}
cdf1e714 579#endif // WXWIN_COMPATIBILITY
0e320a79 580
cdf1e714
DW
581// ---------------------------------------------------------------------------
582// scrolling stuff
583// ---------------------------------------------------------------------------
0e320a79 584
cdf1e714 585#if WXWIN_COMPATIBILITY
a885d89a
DW
586void wxWindow::SetScrollRange(
587 int nOrient
588, int nRange
589, bool bRefresh
590)
0e320a79 591{
a885d89a
DW
592 ::WinSendMsg(GetHwnd(), SBM_SETSCROLLBAR, (MPARAM)0, MPFROM2SHORT(0, nRange));
593} // end of wxWindow::SetScrollRange
0e320a79 594
a885d89a
DW
595void wxWindow::SetScrollPage(
596 int nOrient
597, int nPage
598, bool bRefresh
599)
0e320a79 600{
a885d89a
DW
601 if ( orient == wxHORIZONTAL )
602 m_xThumbSize = page;
603 else
604 m_yThumbSize = page;
0e320a79
DW
605}
606
a885d89a
DW
607int wxWindow::OldGetScrollRange(
608 int nOrient
609) const
0e320a79 610{
a885d89a
DW
611 MRESULT mRc;
612 HWND hWnd = GetHwnd();
0e320a79 613
a885d89a
DW
614 if (hWnd)
615 {
616 mRc = WinSendMsg(hWnd, SBM_QUERYRANGE, (MPARAM)0L, (MPARAM)0L);
617 return(SHORT2FROMMR(mRc));
618 }
619 return 0;
620} // end of wxWindow::OldGetScrollRange
621
622int wxWindow::GetScrollPage(
623 int nOrient
624) const
0e320a79 625{
a885d89a 626 if (nOrient == wxHORIZONTAL)
05fc6c0a 627 return m_nXThumbSize;
a885d89a 628 else
05fc6c0a 629 return m_nYThumbSize;
a885d89a 630} // end of wxWindow::GetScrollPage
11e59d47 631#endif // WXWIN_COMPATIBILITY
0e320a79 632
05fc6c0a
DW
633int wxWindow::GetScrollPos(
634 int nOrient
635) const
0e320a79 636{
05fc6c0a
DW
637 return((int)::WinSendMsg(GetHwnd(), SBM_QUERYPOS, (MPARAM)NULL, (MPARAM)NULL));
638} // end of wxWindow::GetScrollPos
0e320a79 639
05fc6c0a
DW
640int wxWindow::GetScrollRange(
641 int nOrient
642) const
0e320a79 643{
05fc6c0a 644 MRESULT mr;
0e320a79 645
05fc6c0a
DW
646 mr = ::WinSendMsg(GetHwnd(), SBM_QUERYRANGE, (MPARAM)NULL, (MPARAM)NULL);
647 return((int)SHORT2FROMMR(mr));
648} // end of wxWindow::GetScrollRange
649
650int wxWindow::GetScrollThumb(
651 int nOrient
652) const
0e320a79 653{
05fc6c0a
DW
654 WNDPARAMS vWndParams;
655 PSBCDATA pSbcd;
656
657 ::WinSendMsg(GetHwnd(), WM_QUERYWINDOWPARAMS, (MPARAM)&vWndParams, (MPARAM)NULL);
658 pSbcd = (PSBCDATA)vWndParams.pCtlData;
659 return((int)pSbcd->posThumb);
660} // end of wxWindow::GetScrollThumb
0e320a79 661
05fc6c0a
DW
662void wxWindow::SetScrollPos(
663 int nOrient
664, int nPos
665, bool bRefresh
666)
0e320a79 667{
05fc6c0a
DW
668 ::WinSendMsg(GetHwnd(), SBM_SETPOS, (MPARAM)nPos, (MPARAM)NULL);
669} // end of wxWindow::SetScrollPos(
0e320a79 670
05fc6c0a
DW
671void wxWindow::SetScrollbar(
672 int nOrient
673, int nPos
674, int nThumbVisible
675, int nRange
676, bool bRefresh
677)
0e320a79 678{
05fc6c0a
DW
679 ::WinSendMsg(GetHwnd(), SBM_SETSCROLLBAR, (MPARAM)nPos, MPFROM2SHORT(0, nRange));
680 if (nOrient == wxHORIZONTAL)
681 {
682 m_nXThumbSize = nThumbVisible;
683 }
684 else
685 {
686 m_nYThumbSize = nThumbVisible;
687 }
688} // end of wxWindow::SetScrollbar
0e320a79 689
05fc6c0a
DW
690void wxWindow::ScrollWindow(
691 int nDx
692, int nDy
693, const wxRect* pRect
694)
0e320a79 695{
05fc6c0a
DW
696 RECTL vRect2;
697
698 if (pRect)
699 {
700 vRect2.xLeft = pRect->x;
701 vRect2.yTop = pRect->y;
702 vRect2.xRight = pRect->x + pRect->width;
703 vRect2.yBottom = pRect->y + pRect->height;
704 }
705
706 if (pRect)
707 ::WinScrollWindow(GetHwnd(), (LONG)nDx, (LONG)nDy, &vRect2, NULL, NULLHANDLE, NULL, 0L);
708 else
709 ::WinScrollWindow(GetHwnd(), nDx, nDy, NULL, NULL, NULLHANDLE, NULL, 0L);
710} // end of wxWindow::ScrollWindow
0e320a79 711
cdf1e714
DW
712// ---------------------------------------------------------------------------
713// subclassing
714// ---------------------------------------------------------------------------
0e320a79 715
c86c44a0
DW
716void wxWindow::SubclassWin(
717 WXHWND hWnd
718)
0e320a79 719{
05fc6c0a
DW
720 HWND hwnd = (HWND)hWnd;
721
776d87d5 722 wxASSERT_MSG( !m_fnOldWndProc, wxT("subclassing window twice?") );
61243a51 723 wxCHECK_RET(::WinIsWindow(vHabmain, hwnd), wxT("invalid HWND in SubclassWin") );
542875a8 724 m_fnOldWndProc = (WXFARPROC) ::WinSubclassWindow(hwnd, (PFNWP)wxWndProc);
c86c44a0 725} // end of wxWindow::SubclassWin
0e320a79 726
cdf1e714 727void wxWindow::UnsubclassWin()
0e320a79 728{
c86c44a0 729 //
cdf1e714 730 // Restore old Window proc
c86c44a0 731 //
e604d44b 732 HWND hwnd = GetHWND();
c86c44a0 733
e604d44b 734 if (m_hWnd)
cdf1e714 735 {
61243a51 736 wxCHECK_RET( ::WinIsWindow(vHabmain, hwnd), wxT("invalid HWND in UnsubclassWin") );
0e320a79 737
e604d44b 738 PFNWP fnProc = (PFNWP)::WinQueryWindowPtr(hwnd, QWP_PFNWP);
51c1d535 739
c86c44a0 740 if ( (m_fnOldWndProc != 0) && (fnProc != (PFNWP) m_fnOldWndProc))
cdf1e714 741 {
c86c44a0
DW
742 WinSubclassWindow(hwnd, (PFNWP)m_fnOldWndProc);
743 m_fnOldWndProc = 0;
cdf1e714
DW
744 }
745 }
c86c44a0 746} // end of wxWindow::UnsubclassWin
0e320a79 747
05fc6c0a 748//
cdf1e714 749// Make a Windows extended style from the given wxWindows window style
05fc6c0a
DW
750//
751WXDWORD wxWindow::MakeExtendedStyle(
752 long lStyle
753, bool bEliminateBorders
754)
0e320a79 755{
05fc6c0a
DW
756 //
757 // PM does not support extended style
758 //
759 WXDWORD exStyle = 0;
cdf1e714 760 return exStyle;
05fc6c0a 761} // end of wxWindow::MakeExtendedStyle
cdf1e714 762
c86c44a0 763//
cdf1e714
DW
764// Determines whether native 3D effects or CTL3D should be used,
765// applying a default border style if required, and returning an extended
766// style to pass to CreateWindowEx.
c86c44a0
DW
767//
768WXDWORD wxWindow::Determine3DEffects(
769 WXDWORD dwDefaultBorderStyle
542875a8 770, bool* pbWant3D
c86c44a0
DW
771) const
772{
542875a8
DW
773 WXDWORD dwStyle = 0L;
774
c86c44a0
DW
775 //
776 // Native PM does not have any specialize 3D effects like WIN32 does
777 //
778 *pbWant3D = FALSE;
779 return dwStyle;
780} // end of wxWindow::Determine3DEffects
cdf1e714
DW
781
782#if WXWIN_COMPATIBILITY
c86c44a0
DW
783void wxWindow::OnCommand(
784 wxWindow& rWin
785, wxCommandEvent& rEvent
786)
cdf1e714 787{
c86c44a0
DW
788 if (GetEventHandler()->ProcessEvent(rEvent))
789 return;
790 if (m_parent)
791 m_parent->GetEventHandler()->OnCommand( rWin
792 ,rEvent
793 );
794} // end of wxWindow::OnCommand
cdf1e714 795
c86c44a0
DW
796wxObject* wxWindow::GetChild(
797 int nNumber
798) const
cdf1e714 799{
c86c44a0
DW
800 //
801 // Return a pointer to the Nth object in the Panel
802 //
803 wxNode* pNode = GetChildren().First();
804 int n = nNumber;
cdf1e714 805
c86c44a0
DW
806 while (pNode && n--)
807 pNode = pNode->Next();
808 if (pNode)
809 {
810 wxObject* pObj = (wxObject*)pNode->Data();
811 return(pObj);
812 }
813 else
814 return NULL;
815} // end of wxWindow::GetChild
cdf1e714
DW
816
817#endif // WXWIN_COMPATIBILITY
818
c86c44a0 819//
cdf1e714 820// Setup background and foreground colours correctly
c86c44a0 821//
cdf1e714
DW
822void wxWindow::SetupColours()
823{
824 if ( GetParent() )
825 SetBackgroundColour(GetParent()->GetBackgroundColour());
c86c44a0 826} // end of wxWindow::SetupColours
cdf1e714 827
c86c44a0
DW
828void wxWindow::OnIdle(
829 wxIdleEvent& rEvent
830)
cdf1e714 831{
c86c44a0
DW
832 //
833 // Check if we need to send a LEAVE event
834 //
835 if (m_bMouseInWindow)
836 {
837 POINTL vPoint;
cdf1e714 838
c86c44a0
DW
839 ::WinQueryPointerPos(HWND_DESKTOP, &vPoint);
840 if (::WinWindowFromPoint(HWND_DESKTOP, &vPoint, FALSE) != (HWND)GetHwnd())
841 {
842 //
843 // Generate a LEAVE event
844 //
845 m_bMouseInWindow = FALSE;
846
847 //
848 // Unfortunately the mouse button and keyboard state may have changed
849 // by the time the OnIdle function is called, so 'state' may be
850 // meaningless.
851 //
852 int nState = 0;
853
854 if (::WinGetKeyState(HWND_DESKTOP, VK_SHIFT) != 0)
855 nState |= VK_SHIFT;
542875a8 856 if (::WinGetKeyState(HWND_DESKTOP, VK_CTRL) != 0);
c86c44a0
DW
857 nState |= VK_CTRL;
858
859 wxMouseEvent rEvent(wxEVT_LEAVE_WINDOW);
860
861 InitMouseEvent( rEvent
862 ,vPoint.x
863 ,vPoint.y
864 ,nState
865 );
542875a8 866 (void)GetEventHandler()->ProcessEvent(rEvent);
c86c44a0
DW
867 }
868 }
869 UpdateWindowUI();
870} // end of wxWindow::OnIdle
871
872//
cdf1e714 873// Set this window to be the child of 'parent'.
c86c44a0
DW
874//
875bool wxWindow::Reparent(
876 wxWindow* pParent
877)
cdf1e714 878{
c86c44a0 879 if (!wxWindowBase::Reparent(pParent))
cdf1e714 880 return FALSE;
c86c44a0
DW
881
882 HWND hWndChild = GetHwnd();
883 HWND hWndParent = GetParent() ? GetWinHwnd(GetParent()) : (HWND)0;
884
885 ::WinSetParent(hWndChild, hWndParent, TRUE);
886 return TRUE;
887} // end of wxWindow::Reparent
cdf1e714
DW
888
889void wxWindow::Clear()
890{
c86c44a0
DW
891 wxClientDC vDc(this);
892 wxBrush vBrush( GetBackgroundColour()
893 ,wxSOLID
894 );
895
896 vDc.SetBackground(vBrush);
897 vDc.Clear();
898} // end of wxWindow::Clear
cdf1e714 899
c86c44a0
DW
900void wxWindow::Refresh(
901 bool bEraseBack
902, const wxRect* pRect
903)
cdf1e714 904{
c86c44a0
DW
905 HWND hWnd = GetHwnd();
906
907 if (hWnd)
908 {
909 if (pRect)
910 {
911 RECTL vOs2Rect;
912
913 vOs2Rect.xLeft = pRect->x;
542875a8 914 vOs2Rect.yTop = pRect->y;
c86c44a0
DW
915 vOs2Rect.xRight = pRect->x + pRect->width;
916 vOs2Rect.yBottom = pRect->y + pRect->height;
917
918 ::WinInvalidateRect(hWnd, &vOs2Rect, bEraseBack);
919 }
920 else
921 ::WinInvalidateRect(hWnd, NULL, bEraseBack);
922 }
923} // end of wxWindow::Refresh
cdf1e714
DW
924
925// ---------------------------------------------------------------------------
926// drag and drop
927// ---------------------------------------------------------------------------
928
929#if wxUSE_DRAG_AND_DROP
c86c44a0
DW
930void wxWindow::SetDropTarget(
931 wxDropTarget* pDropTarget
932)
cdf1e714 933{
542875a8 934 if (m_dropTarget != 0)
c86c44a0
DW
935 {
936 m_dropTarget->Revoke(m_hWnd);
937 delete m_dropTarget;
938 }
939 m_dropTarget = pDropTarget;
940 if (m_dropTarget != 0)
941 m_dropTarget->Register(m_hWnd);
942} // end of wxWindow::SetDropTarget
cdf1e714
DW
943#endif
944
c86c44a0 945//
cdf1e714
DW
946// old style file-manager drag&drop support: we retain the old-style
947// DragAcceptFiles in parallel with SetDropTarget.
c86c44a0
DW
948//
949void wxWindow::DragAcceptFiles(
950 bool bAccept
951)
cdf1e714 952{
c86c44a0
DW
953 HWND hWnd = GetHwnd();
954
955 if (hWnd && bAccept)
542875a8 956 ::DrgAcceptDroppedFiles(hWnd, NULL, NULL, DO_COPY, 0L);
c86c44a0 957} // end of wxWindow::DragAcceptFiles
cdf1e714
DW
958
959// ----------------------------------------------------------------------------
960// tooltips
961// ----------------------------------------------------------------------------
962
963#if wxUSE_TOOLTIPS
964
c86c44a0
DW
965void wxWindow::DoSetToolTip(
966 wxToolTip* pTooltip
967)
cdf1e714 968{
c86c44a0 969 wxWindowBase::DoSetToolTip(pTooltip);
cdf1e714 970
542875a8 971 if (m_tooltip)
cdf1e714 972 m_tooltip->SetWindow(this);
c86c44a0 973} // end of wxWindow::DoSetToolTip
cdf1e714
DW
974
975#endif // wxUSE_TOOLTIPS
976
977// ---------------------------------------------------------------------------
978// moving and resizing
979// ---------------------------------------------------------------------------
980
981// Get total size
542875a8 982void wxWindow::DoGetSize(
a7ef993c
DW
983 int* pWidth
984, int* pHeight
985) const
cdf1e714 986{
a7ef993c
DW
987 HWND hWnd = GetHwnd();
988 RECTL vRect;
c86c44a0 989
a7ef993c
DW
990 ::WinQueryWindowRect(hWnd, &vRect);
991
992 if (pWidth)
993 *pWidth = vRect.xRight - vRect.xLeft;
994 if (pHeight )
995 // OS/2 PM is backwards from windows
996 *pHeight = vRect.yTop - vRect.yBottom;
997} // end of wxWindow::DoGetSize
cdf1e714 998
a7ef993c
DW
999void wxWindow::DoGetPosition(
1000 int* pX
1001, int* pY
1002) const
cdf1e714 1003{
a7ef993c
DW
1004 HWND hWnd = GetHwnd();
1005 RECT vRect;
1006 POINTL vPoint;
c86c44a0 1007
a7ef993c 1008 ::WinQueryWindowRect(hWnd, &vRect);
c86c44a0 1009
a7ef993c
DW
1010 vPoint.x = vRect.xLeft;
1011 vPoint.y = vRect.yBottom;
c86c44a0 1012
a7ef993c
DW
1013 //
1014 // We do the adjustments with respect to the parent only for the "real"
c86c44a0 1015 // children, not for the dialogs/frames
a7ef993c
DW
1016 //
1017 if (!IsTopLevel())
c86c44a0 1018 {
a7ef993c
DW
1019 HWND hParentWnd = 0;
1020 wxWindow* pParent = GetParent();
1021
1022 if (pParent)
1023 hParentWnd = GetWinHwnd(pParent);
c86c44a0 1024
a7ef993c 1025 //
c86c44a0 1026 // Since we now have the absolute screen coords, if there's a parent we
a7ef993c
DW
1027 // must subtract its bottom left corner
1028 //
1029 if (hParentWnd)
c86c44a0 1030 {
a7ef993c
DW
1031 RECTL vRect2;
1032
542875a8 1033 ::WinQueryWindowRect(hParentWnd, &vRect2);
a7ef993c
DW
1034 vPoint.x -= vRect.xLeft;
1035 vPoint.y -= vRect.yBottom;
c86c44a0
DW
1036 }
1037
a7ef993c 1038 //
c86c44a0
DW
1039 // We may be faking the client origin. So a window that's really at (0,
1040 // 30) may appear (to wxWin apps) to be at (0, 0).
a7ef993c
DW
1041 //
1042 wxPoint vPt(pParent->GetClientAreaOrigin());
1043
1044 vPoint.x -= vPt.x;
1045 vPoint.y -= vPt.y;
c86c44a0
DW
1046 }
1047
a7ef993c
DW
1048 if (pX)
1049 *pX = vPoint.x;
542875a8 1050 if (pY)
a7ef993c
DW
1051 *pY = vPoint.y;
1052} // end of wxWindow::DoGetPosition
cdf1e714 1053
a7ef993c
DW
1054void wxWindow::DoScreenToClient(
1055 int* pX
1056, int* pY
1057) const
cdf1e714 1058{
a7ef993c 1059 HWND hWnd = GetHwnd();
542875a8
DW
1060 SWP vSwp;
1061
1062 ::WinQueryWindowPos(hWnd, &vSwp);
cdf1e714 1063
a7ef993c 1064 if (pX)
542875a8 1065 *pX -= vSwp.x;
a7ef993c 1066 if (pY)
542875a8 1067 *pY -= vSwp.y;
a7ef993c
DW
1068} // end of wxWindow::DoScreenToClient
1069
1070void wxWindow::DoClientToScreen(
1071 int* pX
1072, int* pY
1073) const
cdf1e714 1074{
a7ef993c 1075 HWND hWnd = GetHwnd();
542875a8 1076 SWP vSwp;
c86c44a0 1077
542875a8 1078 ::WinQueryWindowPos(hWnd, &vSwp);
c86c44a0 1079
a7ef993c 1080 if (pX)
542875a8 1081 *pX += vSwp.x;
a7ef993c 1082 if (pY)
542875a8 1083 *pY += vSwp.y;
a7ef993c 1084} // end of wxWindow::DoClientToScreen
cdf1e714 1085
a7ef993c 1086//
cdf1e714 1087// Get size *available for subwindows* i.e. excluding menu bar etc.
a7ef993c
DW
1088// Must be a frame type window
1089//
1090void wxWindow::DoGetClientSize(
1091 int* pWidth
1092, int* pHeight
1093) const
cdf1e714 1094{
a7ef993c
DW
1095 HWND hWnd = GetHwnd();
1096 HWND hWndClient;
1097 RECTL vRect;
1098
1099 hWndClient = ::WinWindowFromID(GetHwnd(), FID_CLIENT);
51c1d535
DW
1100 if( hWndClient == NULLHANDLE)
1101 ::WinQueryWindowRect(GetHwnd(), &vRect);
1102 else
1103 ::WinQueryWindowRect(hWndClient, &vRect);
a7ef993c 1104
542875a8 1105 if (pWidth)
a7ef993c 1106 *pWidth = vRect.xRight;
542875a8 1107 if (pHeight)
a7ef993c
DW
1108 *pHeight = vRect.yTop;
1109} // end of wxWindow::DoGetClientSize
cdf1e714 1110
a7ef993c
DW
1111void wxWindow::DoMoveWindow(
1112 int nX
1113, int nY
1114, int nWidth
1115, int nHeight
1116)
cdf1e714 1117{
542875a8
DW
1118 if ( !::WinSetWindowPos( GetHwnd()
1119 ,HWND_TOP
1120 ,(LONG)nX
1121 ,(LONG)nY
1122 ,(LONG)nWidth
1123 ,(LONG)nHeight
1124 ,SWP_SIZE | SWP_MOVE
1125 ))
c86c44a0
DW
1126 {
1127 wxLogLastError("MoveWindow");
1128 }
a7ef993c 1129} // end of wxWindow::DoMoveWindow
cdf1e714 1130
c86c44a0
DW
1131//
1132// Set the size of the window: if the dimensions are positive, just use them,
cdf1e714
DW
1133// but if any of them is equal to -1, it means that we must find the value for
1134// it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1135// which case -1 is a valid value for x and y)
1136//
1137// If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1138// the width/height to best suit our contents, otherwise we reuse the current
1139// width/height
c86c44a0 1140//
a7ef993c
DW
1141void wxWindow::DoSetSize(
1142 int nX
1143, int nY
1144, int nWidth
1145, int nHeight
1146, int nSizeFlags
1147)
cdf1e714 1148{
a7ef993c
DW
1149 //
1150 // Get the current size and position...
1151 //
1152 int nCurrentX;
1153 int nCurrentY;
1154 int nCurrentWidth;
1155 int nCurrentHeight;
542875a8 1156 wxSize vSize(-1, -1);
a7ef993c
DW
1157
1158 GetPosition( &nCurrentX
1159 ,&nCurrentY
1160 );
1161 GetSize( &nCurrentWidth
1162 ,&nCurrentHeight
1163 );
c86c44a0 1164
a7ef993c 1165 //
c86c44a0 1166 // ... and don't do anything (avoiding flicker) if it's already ok
a7ef993c 1167 //
542875a8 1168 if ( nX == nCurrentX &&
a7ef993c 1169 nY == nCurrentY &&
542875a8 1170 nWidth == nCurrentWidth &&
a7ef993c
DW
1171 nHeight == nCurrentHeight
1172 )
c86c44a0
DW
1173 {
1174 return;
1175 }
1176
a7ef993c
DW
1177 if (nX == -1 && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
1178 nX = nCurrentX;
542875a8 1179 if (nY == -1 && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
a7ef993c 1180 nY = nCurrentY;
c86c44a0 1181
a7ef993c
DW
1182 AdjustForParentClientOrigin( nX
1183 ,nY
1184 ,nSizeFlags
1185 );
c86c44a0 1186
a7ef993c 1187 if (nWidth == -1)
c86c44a0 1188 {
a7ef993c 1189 if (nSizeFlags & wxSIZE_AUTO_WIDTH)
c86c44a0 1190 {
a7ef993c
DW
1191 vSize = DoGetBestSize();
1192 nWidth = vSize.x;
c86c44a0
DW
1193 }
1194 else
1195 {
a7ef993c
DW
1196 //
1197 // Just take the current one
1198 //
1199 nWidth = nCurrentWidth;
c86c44a0
DW
1200 }
1201 }
1202
a7ef993c 1203 if (nHeight == -1)
c86c44a0 1204 {
a7ef993c 1205 if (nSizeFlags & wxSIZE_AUTO_HEIGHT)
c86c44a0 1206 {
a7ef993c 1207 if (vSize.x == -1)
c86c44a0 1208 {
a7ef993c 1209 vSize = DoGetBestSize();
c86c44a0 1210 }
a7ef993c 1211 nHeight = vSize.y;
c86c44a0
DW
1212 }
1213 else
1214 {
1215 // just take the current one
a7ef993c 1216 nHeight = nCurrentHeight;
c86c44a0
DW
1217 }
1218 }
1219
a7ef993c
DW
1220 DoMoveWindow( nX
1221 ,nY
1222 ,nWidth
1223 ,nHeight
1224 );
1225} // end of wxWindow::DoSetSize
cdf1e714 1226
a7ef993c
DW
1227void wxWindow::DoSetClientSize(
1228 int nWidth
1229, int nHeight
1230)
cdf1e714 1231{
a7ef993c
DW
1232 wxWindow* pParent = GetParent();
1233 HWND hWnd = GetHwnd();
1234 HWND hParentWnd = (HWND)0;
1235 HWND hClientWnd = (HWND)0;
1236 RECTL vRect;
1237 RECT vRect2;
1238 RECT vRect3;
c86c44a0 1239
542875a8 1240 hClientWnd = ::WinWindowFromID(GetHwnd(), FID_CLIENT);
a7ef993c 1241 ::WinQueryWindowRect(hClientWnd, &vRect2);
c86c44a0 1242
a7ef993c
DW
1243 if (pParent)
1244 hParentWnd = (HWND) pParent->GetHWND();
c86c44a0 1245
a7ef993c
DW
1246 ::WinQueryWindowRect(hWnd, &vRect);
1247 ::WinQueryWindowRect(hParentWnd, &vRect3);
1248 //
c86c44a0
DW
1249 // Find the difference between the entire window (title bar and all)
1250 // and the client area; add this to the new client size to move the
a7ef993c
DW
1251 // window. OS/2 is backward from windows on height
1252 //
1253 int nActualWidth = vRect2.xRight - vRect2.xLeft - vRect.xRight + nWidth;
1254 int nActualHeight = vRect2.yTop - vRect2.yBottom - vRect.yTop + nHeight;
c86c44a0 1255
a7ef993c
DW
1256 //
1257 // If there's a parent, must subtract the parent's bottom left corner
c86c44a0 1258 // since MoveWindow moves relative to the parent
a7ef993c
DW
1259 //
1260 POINTL vPoint;
c86c44a0 1261
a7ef993c
DW
1262 vPoint.x = vRect2.xLeft;
1263 vPoint.y = vRect2.yBottom;
1264 if (pParent)
c86c44a0 1265 {
a7ef993c 1266 vPoint.x -= vRect3.xLeft;
542875a8 1267 vPoint.y -= vRect3.yBottom;
c86c44a0
DW
1268 }
1269
a7ef993c
DW
1270 DoMoveWindow( vPoint.x
1271 ,vPoint.y
1272 ,nActualWidth
1273 ,nActualHeight
1274 );
c86c44a0 1275
a7ef993c
DW
1276 wxSizeEvent vEvent( wxSize( nWidth
1277 ,nHeight
1278 )
1279 ,m_windowId
1280 );
1281
1282 vEvent.SetEventObject(this);
1283 GetEventHandler()->ProcessEvent(vEvent);
1284} // end of wxWindow::DoSetClientSize
cdf1e714
DW
1285
1286wxPoint wxWindow::GetClientAreaOrigin() const
1287{
1288 return wxPoint(0, 0);
a7ef993c 1289} // end of wxWindow::GetClientAreaOrigin
cdf1e714 1290
a7ef993c
DW
1291void wxWindow::AdjustForParentClientOrigin(
1292 int& rX
1293, int& rY
1294, int nSizeFlags
1295)
cdf1e714 1296{
a7ef993c
DW
1297 //
1298 // Don't do it for the dialogs/frames - they float independently of their
c86c44a0 1299 // parent
a7ef993c
DW
1300 //
1301 if (!IsTopLevel())
c86c44a0 1302 {
a7ef993c
DW
1303 wxWindow* pParent = GetParent();
1304
1305 if (!(nSizeFlags & wxSIZE_NO_ADJUSTMENTS) && pParent)
c86c44a0 1306 {
a7ef993c 1307 wxPoint vPoint(pParent->GetClientAreaOrigin());
542875a8 1308 rX += vPoint.x;
a7ef993c 1309 rY += vPoint.y;
c86c44a0
DW
1310 }
1311 }
a7ef993c 1312} // end of wxWindow::AdjustForParentClientOrigin
cdf1e714
DW
1313
1314// ---------------------------------------------------------------------------
1315// text metrics
1316// ---------------------------------------------------------------------------
1317
a7ef993c 1318int wxWindow::GetCharHeight() const
cdf1e714 1319{
a7ef993c
DW
1320 HPS hPs;
1321 FONTMETRICS vFontMetrics;
1322 BOOL bRc;
cdf1e714 1323
a7ef993c
DW
1324 hPs = ::WinGetPS(GetHwnd());
1325
542875a8 1326 if(!GpiQueryFontMetrics(hPs, sizeof(FONTMETRICS), &vFontMetrics))
b7084589
DW
1327 {
1328 ::WinReleasePS(hPs);
a7ef993c 1329 return (0);
b7084589 1330 }
a7ef993c 1331 ::WinReleasePS(hPs);
b7084589 1332 return(vFontMetrics.lMaxAscender + vFontMetrics.lMaxDescender);
a7ef993c
DW
1333} // end of wxWindow::GetCharHeight
1334
1335int wxWindow::GetCharWidth() const
cdf1e714 1336{
542875a8
DW
1337 HPS hPs;
1338 FONTMETRICS vFontMetrics;
1339
a7ef993c 1340 hPs = ::WinGetPS(GetHwnd());
cdf1e714 1341
542875a8 1342 if(!GpiQueryFontMetrics(hPs, sizeof(FONTMETRICS), &vFontMetrics))
b7084589
DW
1343 {
1344 ::WinReleasePS(hPs);
a7ef993c 1345 return (0);
b7084589 1346 }
a7ef993c 1347 ::WinReleasePS(hPs);
b7084589 1348 return(vFontMetrics.lAveCharWidth);
a7ef993c
DW
1349} // end of wxWindow::GetCharWidth
1350
542875a8 1351void wxWindow::GetTextExtent(
a7ef993c
DW
1352 const wxString& rString
1353, int* pX
1354, int* pY
1355, int* pDescent
1356, int* pExternalLeading
1357, const wxFont* pTheFont
1358) const
cdf1e714 1359{
a7ef993c
DW
1360 const wxFont* pFontToUse = pTheFont;
1361 HPS hPs;
1362
1363 hPs = ::WinGetPS(GetHwnd());
1364/*
1365// TODO: Will have to play with fonts later
1366
1367 if (!pFontToUse)
1368 pFontToUse = &m_font;
1369
1370 HFONT hFnt = 0;
1371 HFONT hFfontOld = 0;
1372
1373 if (pFontToUse && pFontToUse->Ok())
1374 {
1375 ::GpiCreateLog
1376 hFnt = (HFONT)((wxFont *)pFontToUse)->GetResourceHandle(); // const_cast
1377 if (hFnt)
1378 hFontOld = (HFONT)SelectObject(dc,fnt);
1379 }
1380
1381 SIZE sizeRect;
1382 TEXTMETRIC tm;
1383 GetTextExtentPoint(dc, string, (int)string.Length(), &sizeRect);
1384 GetTextMetrics(dc, &tm);
1385
1386 if ( fontToUse && fnt && hfontOld )
1387 SelectObject(dc, hfontOld);
1388
1389 ReleaseDC(hWnd, dc);
1390
1391 if ( x )
1392 *x = sizeRect.cx;
1393 if ( y )
1394 *y = sizeRect.cy;
1395 if ( descent )
1396 *descent = tm.tmDescent;
1397 if ( externalLeading )
1398 *externalLeading = tm.tmExternalLeading;
1399*/
1400 ::WinReleasePS(hPs);
cdf1e714
DW
1401}
1402
1403#if wxUSE_CARET && WXWIN_COMPATIBILITY
1404// ---------------------------------------------------------------------------
1405// Caret manipulation
1406// ---------------------------------------------------------------------------
1407
a7ef993c
DW
1408void wxWindow::CreateCaret(
1409 int nWidth
1410, int nHeight
1411)
cdf1e714 1412{
a7ef993c
DW
1413 SetCaret(new wxCaret( this
1414 ,nWidth
1415 ,nHeight
1416 ));
1417} // end of wxWindow::CreateCaret
1418
1419void wxWindow::CreateCaret(
1420 const wxBitmap* pBitmap
1421)
cdf1e714 1422{
a7ef993c
DW
1423 wxFAIL_MSG("not implemented");
1424} // end of wxWindow::CreateCaret
cdf1e714 1425
a7ef993c
DW
1426void wxWindow::ShowCaret(
1427 bool bShow
1428)
cdf1e714 1429{
a7ef993c
DW
1430 wxCHECK_RET( m_caret, "no caret to show" );
1431
1432 m_caret->Show(bShow);
1433} // end of wxWindow::ShowCaret
cdf1e714
DW
1434
1435void wxWindow::DestroyCaret()
1436{
a7ef993c
DW
1437 SetCaret(NULL);
1438} // end of wxWindow::DestroyCaret
cdf1e714 1439
a7ef993c
DW
1440void wxWindow::SetCaretPos(
1441 int nX
1442, int nY)
cdf1e714 1443{
a7ef993c
DW
1444 wxCHECK_RET( m_caret, "no caret to move" );
1445
1446 m_caret->Move( nX
1447 ,nY
1448 );
1449} // end of wxWindow::SetCaretPos
cdf1e714 1450
a7ef993c
DW
1451void wxWindow::GetCaretPos(
1452 int* pX
1453, int* pY
1454) const
cdf1e714 1455{
a7ef993c
DW
1456 wxCHECK_RET( m_caret, "no caret to get position of" );
1457
1458 m_caret->GetPosition( pX
1459 ,pY
1460 );
1461} // end of wxWindow::GetCaretPos
cdf1e714
DW
1462
1463#endif //wxUSE_CARET
1464
1465// ---------------------------------------------------------------------------
1466// popup menu
1467// ---------------------------------------------------------------------------
1468
61243a51
DW
1469bool wxWindow::DoPopupMenu(
1470 wxMenu* pMenu
1471, int nX
1472, int nY
1473)
cdf1e714 1474{
61243a51
DW
1475 HWND hWnd = GetHwnd();
1476 HWND hWndParent = GetParent() ? GetWinHwnd(GetParent()) : (HWND)0;
1477 HWND hMenu = GetHmenuOf(pMenu);
1478
1479 pMenu->SetInvokingWindow(this);
1480 pMenu->UpdateUI();
1481
1482 DoClientToScreen( &nX
1483 ,&nY
1484 );
1485 wxCurrentPopupMenu = pMenu;
1486
1487 ::WinPopupMenu( hWndParent
1488 ,hWnd
1489 ,hMenu
1490 ,nX
1491 ,nY
1492 ,0L
1493 ,PU_MOUSEBUTTON2DOWN | PU_MOUSEBUTTON2 | PU_KEYBOARD
1494 );
1495 wxYield();
1496 wxCurrentPopupMenu = NULL;
1497
1498 pMenu->SetInvokingWindow(NULL);
1499 return TRUE;
1500} // end of wxWindow::DoPopupMenu
cdf1e714
DW
1501
1502// ===========================================================================
1503// pre/post message processing
1504// ===========================================================================
1505
61243a51
DW
1506MRESULT wxWindow::OS2DefWindowProc(
1507 WXUINT uMsg
1508, WXWPARAM wParam
1509, WXLPARAM lParam
1510)
cdf1e714 1511{
61243a51 1512 if (m_fnOldWndProc)
e604d44b 1513 return (MRESULT)m_fnOldWndProc(GetHWND(), (ULONG)uMsg, (MPARAM)wParam, (MPARAM)lParam);
61243a51 1514 else
e604d44b 1515 return ::WinDefWindowProc(GetHWND(), (ULONG)uMsg, (MPARAM)wParam, (MPARAM)lParam);
61243a51 1516} // end of wxWindow::OS2DefWindowProc
cdf1e714 1517
61243a51
DW
1518bool wxWindow::OS2ProcessMessage(
1519 WXMSG* pMsg
1520)
cdf1e714 1521{
61243a51
DW
1522 QMSG* pQMsg = (QMSG*)pMsg;
1523
1524 if (m_hWnd != 0 && (GetWindowStyleFlag() & wxTAB_TRAVERSAL))
1525 {
1526 //
1527 // Intercept dialog navigation keys
1528 //
1529 bool bProcess = TRUE;
1530 USHORT uKeyFlags = SHORT1FROMMP(pQMsg->mp1);
1531
1532 if (uKeyFlags & KC_KEYUP)
1533 bProcess = FALSE;
1534
1535 if (uKeyFlags & KC_ALT)
1536 bProcess = FALSE;
1537
1538 if (!(uKeyFlags & KC_VIRTUALKEY))
1539 bProcess = FALSE;
1540
1541 if (bProcess)
1542 {
1543 bool bCtrlDown = IsCtrlDown();
1544 bool bShiftDown = IsShiftDown();
1545
1546 //
1547 // WM_QUERYDLGCODE: ask the control if it wants the key for itself,
1548 // don't process it if it's the case (except for Ctrl-Tab/Enter
1549 // combinations which are always processed)
1550 //
1551 ULONG ulDlgCode = 0;
1552
1553 if (!bCtrlDown)
1554 {
1555 ulDlgCode = (ULONG)::WinSendMsg(pQMsg->hwnd, WM_QUERYDLGCODE, pQMsg, 0);
1556 }
1557
1558 bool bForward = TRUE;
1559 bool bWindowChange = FALSE;
1560
1561 switch (SHORT2FROMMP(pQMsg->mp2))
1562 {
1563 //
1564 // Going to make certain assumptions about specific types of controls
1565 // here, so we may have to alter some things later if they prove invalid
1566 //
1567 case VK_TAB:
1568 //
1569 // Shift tabl will always be a nav-key but tabs may be wanted
1570 //
1571 if (!bShiftDown)
1572 {
1573 bProcess = FALSE;
1574 }
1575 else
1576 {
1577 //
1578 // Entry Fields want tabs for themselve usually
1579 //
1580 switch (ulDlgCode)
1581 {
1582 case DLGC_ENTRYFIELD:
1583 case DLGC_MLE:
1584 bProcess = TRUE;
1585 break;
1586
1587 default:
1588 bProcess = FALSE;
1589 }
1590
1591 //
1592 // Ctrl-Tab cycles thru notebook pages
1593 //
1594 bWindowChange = bCtrlDown;
1595 bForward = !bShiftDown;
1596 }
1597 break;
1598
1599 case VK_UP:
1600 case VK_LEFT:
1601 if (bCtrlDown)
1602 bProcess = FALSE;
1603 else
1604 bForward = FALSE;
1605 break;
1606
1607 case VK_DOWN:
1608 case VK_RIGHT:
1609 if (bCtrlDown)
1610 bProcess = FALSE;
1611 break;
1612
1613 case VK_ENTER:
1614 {
1615 if (bCtrlDown)
1616 {
1617 //
1618 // ctrl-enter is not processed
1619 //
1620 return FALSE;
1621 }
1622 else if (ulDlgCode & DLGC_BUTTON)
1623 {
1624 //
1625 // buttons want process Enter themselevs
1626 //
1627 bProcess = FALSE;
1628 }
1629 else
1630 {
1631 wxPanel* pPanel = wxDynamicCast(this, wxPanel);
1632 wxButton* pBtn = NULL;
1633
1634 if (pPanel)
1635 {
1636 //
1637 // Panel may have a default button which should
1638 // be activated by Enter
1639 //
1640 pBtn = pPanel->GetDefaultItem();
1641 }
1642
1643 if (pBtn && pBtn->IsEnabled())
1644 {
1645 //
1646 // If we do have a default button, do press it
1647 //
1648 pBtn->OS2Command(BN_CLICKED, 0 /* unused */);
1649 return TRUE;
1650 }
1651 // else: but if it does not it makes sense to make
1652 // it work like a TAB - and that's what we do.
1653 // Note that Ctrl-Enter always works this way.
1654 }
1655 }
1656 break;
1657
1658 default:
1659 bProcess = FALSE;
1660 }
1661
1662 if (bProcess)
1663 {
1664 wxNavigationKeyEvent vEvent;
1665
1666 vEvent.SetDirection(bForward);
1667 vEvent.SetWindowChange(bWindowChange);
1668 vEvent.SetEventObject(this);
1669
1670 if (GetEventHandler()->ProcessEvent(vEvent))
1671 {
1672 wxButton* pBtn = wxDynamicCast(FindFocus(), wxButton);
1673
1674 if (pBtn)
1675 {
1676 //
1677 // The button which has focus should be default
1678 //
1679 pBtn->SetDefault();
1680 }
1681 return TRUE;
1682 }
1683 }
1684 }
dae16775
DW
1685 //
1686 // Let Dialogs process
1687 //
1688 if (::WinSendMsg(pQMsg->hwnd, WM_QUERYDLGCODE, pQMsg, 0));
1689 return TRUE;
61243a51 1690 }
61243a51
DW
1691
1692#if wxUSE_TOOLTIPS
1693 if ( m_tooltip )
1694 {
1695 // relay mouse move events to the tooltip control
1696 QMSG* pQMsg = (QMSG*)pMsg;
1697
1698 if (pQMsg->msg == WM_MOUSEMOVE )
1699 m_tooltip->RelayEvent(pMsg);
1700 }
1701#endif // wxUSE_TOOLTIPS
1702
cdf1e714 1703 return FALSE;
61243a51 1704} // end of wxWindow::OS2ProcessMessage
cdf1e714 1705
61243a51
DW
1706bool wxWindow::OS2TranslateMessage(
1707 WXMSG* pMsg
1708)
cdf1e714 1709{
7e99520b
DW
1710#if wxUSE_ACCEL
1711 return m_acceleratorTable.Translate(m_hWnd, pMsg);
1712#else
1713 return FALSE;
1714#endif //wxUSE_ACCEL
61243a51 1715} // end of wxWindow::OS2TranslateMessage
cdf1e714
DW
1716
1717// ---------------------------------------------------------------------------
61243a51 1718// message params unpackers
cdf1e714
DW
1719// ---------------------------------------------------------------------------
1720
61243a51
DW
1721void wxWindow::UnpackCommand(
1722 WXWPARAM wParam
1723, WXLPARAM lParam
1724, WORD* pId
1725, WXHWND* phWnd
1726, WORD* pCmd
1727)
cdf1e714 1728{
5b3ed311
DW
1729 *pId = LOWORD(wParam);
1730 *phWnd = NULL; // or may be GetHWND() ?
1731 *pCmd = LOWORD(lParam);
61243a51 1732} // end of wxWindow::UnpackCommand
cdf1e714 1733
61243a51
DW
1734void wxWindow::UnpackActivate(
1735 WXWPARAM wParam
1736, WXLPARAM lParam
1737, WXWORD* pState
1738, WXHWND* phWnd
1739)
cdf1e714 1740{
61243a51
DW
1741 *pState = LOWORD(wParam);
1742 *phWnd = (WXHWND)lParam;
1743} // end of wxWindow::UnpackActivate
cdf1e714 1744
61243a51
DW
1745void wxWindow::UnpackScroll(
1746 WXWPARAM wParam
1747, WXLPARAM lParam
1748, WXWORD* pCode
1749, WXWORD* pPos
1750, WXHWND* phWnd
1751)
cdf1e714 1752{
61243a51
DW
1753 *pCode = LOWORD(wParam);
1754 *pPos = HIWORD(wParam);
1755 *phWnd = (WXHWND)lParam;
1756} // end of wxWindow::UnpackScroll
1757
1758void wxWindow::UnpackMenuSelect(
1759 WXWPARAM wParam
1760, WXLPARAM lParam
1761, WXWORD* pItem
1762, WXWORD* pFlags
1763, WXHMENU* phMenu
1764)
cdf1e714 1765{
61243a51
DW
1766 *pItem = (WXWORD)LOWORD(wParam);
1767 *pFlags = HIWORD(wParam);
1768 *phMenu = (WXHMENU)lParam;
1769} // end of wxWindow::UnpackMenuSelect
cdf1e714
DW
1770
1771// ---------------------------------------------------------------------------
1772// Main wxWindows window proc and the window proc for wxWindow
1773// ---------------------------------------------------------------------------
1774
61243a51 1775//
cdf1e714
DW
1776// Hook for new window just as it's being created, when the window isn't yet
1777// associated with the handle
61243a51
DW
1778//
1779wxWindow* wxWndHook = NULL;
cdf1e714 1780
61243a51 1781//
cdf1e714 1782// Main window proc
61243a51 1783//
f23208ca 1784MRESULT EXPENTRY wxWndProc(
61243a51
DW
1785 HWND hWnd
1786, ULONG ulMsg
1787, MPARAM wParam
1788, MPARAM lParam
1789)
cdf1e714 1790{
61243a51
DW
1791 //
1792 // Trace all ulMsgs - useful for the debugging
1793 //
cdf1e714
DW
1794#ifdef __WXDEBUG__
1795 wxLogTrace(wxTraceMessages, wxT("Processing %s(wParam=%8lx, lParam=%8lx)"),
61243a51 1796 wxGetMessageName(ulMsg), wParam, lParam);
cdf1e714
DW
1797#endif // __WXDEBUG__
1798
61243a51 1799 wxWindow* pWnd = wxFindWinFromHandle((WXHWND)hWnd);
cdf1e714 1800
61243a51
DW
1801 //
1802 // When we get the first message for the HWND we just created, we associate
cdf1e714 1803 // it with wxWindow stored in wxWndHook
61243a51
DW
1804 //
1805 if (!pWnd && wxWndHook)
cdf1e714 1806 {
cdf1e714 1807 wxAssociateWinWithHandle(hWnd, wxWndHook);
61243a51 1808 pWnd = wxWndHook;
cdf1e714 1809 wxWndHook = NULL;
61243a51 1810 pWnd->SetHWND((WXHWND)hWnd);
cdf1e714
DW
1811 }
1812
5b3ed311 1813 MRESULT rc = (MRESULT)0;
e604d44b 1814
cdf1e714 1815
61243a51 1816 //
cdf1e714 1817 // Stop right here if we don't have a valid handle in our wxWindow object.
61243a51
DW
1818 //
1819 if (pWnd && !pWnd->GetHWND())
cdf1e714 1820 {
61243a51
DW
1821 pWnd->SetHWND((WXHWND) hWnd);
1822 rc = pWnd->OS2DefWindowProc(ulMsg, wParam, lParam );
1823 pWnd->SetHWND(0);
cdf1e714
DW
1824 }
1825 else
1826 {
61243a51
DW
1827 if (pWnd)
1828 rc = pWnd->OS2WindowProc(ulMsg, wParam, lParam);
e604d44b 1829 else
61243a51 1830 rc = ::WinDefWindowProc(hWnd, ulMsg, wParam, lParam);
cdf1e714 1831 }
5b3ed311 1832
cdf1e714 1833 return rc;
61243a51 1834} // end of wxWndProc
cdf1e714 1835
61243a51
DW
1836//
1837// We will add (or delete) messages we need to handle at this default
1838// level as we go
1839//
1840MRESULT wxWindow::OS2WindowProc(
1841 WXUINT uMsg
1842, WXWPARAM wParam
1843, WXLPARAM lParam
1844)
cdf1e714 1845{
61243a51
DW
1846 //
1847 // Did we process the uMsg?
1848 //
1849 bool bProcessed = FALSE;
e604d44b
DW
1850 bool bAllow;
1851 MRESULT mResult;
1852 WXHICON hIcon;
1853 WXHBRUSH hBrush;
cdf1e714 1854
61243a51
DW
1855 //
1856 // For most messages we should return 0 when we do process the message
1857 //
e604d44b 1858 mResult = (MRESULT)0;
61243a51
DW
1859
1860 switch (uMsg)
cdf1e714
DW
1861 {
1862 case WM_CREATE:
1863 {
61243a51
DW
1864 bool bMayCreate;
1865
1866 bProcessed = HandleCreate( (WXLPCREATESTRUCT)lParam
1867 ,&bMayCreate
1868 );
1869 if (bProcessed)
cdf1e714 1870 {
61243a51
DW
1871 //
1872 // Return 0 to bAllow window creation
1873 //
e604d44b 1874 mResult = (MRESULT)(bMayCreate ? 0 : -1);
cdf1e714
DW
1875 }
1876 }
1877 break;
1878
1879 case WM_DESTROY:
e604d44b
DW
1880 HandleDestroy();
1881 bProcessed = TRUE;
e604d44b 1882 break;
cdf1e714
DW
1883
1884 case WM_MOVE:
61243a51
DW
1885 bProcessed = HandleMove( LOWORD(lParam)
1886 ,HIWORD(lParam)
1887 );
cdf1e714
DW
1888 break;
1889
1890 case WM_SIZE:
61243a51
DW
1891 bProcessed = HandleSize( LOWORD(lParam)
1892 ,HIWORD(lParam)
1893 ,(WXUINT)wParam
1894 );
cdf1e714
DW
1895 break;
1896
1897 case WM_ACTIVATE:
1898 {
61243a51
DW
1899 WXWORD wState;
1900 WXHWND hWnd;
1901
1902 UnpackActivate( wParam
1903 ,lParam
1904 ,&wState
1905 ,&hWnd
1906 );
1907
1908 bProcessed = HandleActivate( wState
1909 ,(WXHWND)hWnd
1910 );
e604d44b 1911 bProcessed = FALSE;
cdf1e714
DW
1912 }
1913 break;
1914
1915 case WM_SETFOCUS:
61243a51
DW
1916 if (SHORT1FROMMP((MPARAM)lParam) == TRUE)
1917 bProcessed = HandleSetFocus((WXHWND)(HWND)wParam);
1918 else
1919 bProcessed = HandleKillFocus((WXHWND)(HWND)wParam);
cdf1e714
DW
1920 break;
1921
1922 case WM_PAINT:
61243a51 1923 bProcessed = HandlePaint();
cdf1e714
DW
1924 break;
1925
1926 case WM_CLOSE:
61243a51
DW
1927 //
1928 // Don't let the DefWindowProc() destroy our window - we'll do it
cdf1e714 1929 // ourselves in ~wxWindow
61243a51
DW
1930 //
1931 bProcessed = TRUE;
e604d44b 1932 mResult = (MRESULT)TRUE;
cdf1e714
DW
1933 break;
1934
61243a51
DW
1935 case WM_SHOW:
1936 bProcessed = HandleShow(wParam != 0, (int)lParam);
cdf1e714
DW
1937 break;
1938
61243a51
DW
1939 //
1940 // Under OS2 PM Joysticks are treated just like mouse events
1941 // The "Motion" events will be prevelent in joysticks
1942 //
cdf1e714 1943 case WM_MOUSEMOVE:
61243a51
DW
1944 case WM_BUTTON1DOWN:
1945 case WM_BUTTON1UP:
1946 case WM_BUTTON1DBLCLK:
1947 case WM_BUTTON1MOTIONEND:
1948 case WM_BUTTON1MOTIONSTART:
1949 case WM_BUTTON2DOWN:
1950 case WM_BUTTON2UP:
1951 case WM_BUTTON2DBLCLK:
1952 case WM_BUTTON2MOTIONEND:
1953 case WM_BUTTON2MOTIONSTART:
1954 case WM_BUTTON3DOWN:
1955 case WM_BUTTON3UP:
1956 case WM_BUTTON3DBLCLK:
1957 case WM_BUTTON3MOTIONEND:
1958 case WM_BUTTON3MOTIONSTART:
cdf1e714
DW
1959 {
1960 short x = LOWORD(lParam);
1961 short y = HIWORD(lParam);
1962
61243a51 1963 bProcessed = HandleMouseEvent(uMsg, x, y, (WXUINT)wParam);
cdf1e714
DW
1964 }
1965 break;
cdf1e714 1966 case WM_SYSCOMMAND:
61243a51 1967 bProcessed = HandleSysCommand(wParam, lParam);
cdf1e714
DW
1968 break;
1969
1970 case WM_COMMAND:
1971 {
1972 WORD id, cmd;
1973 WXHWND hwnd;
1974 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
1975
61243a51 1976 bProcessed = HandleCommand(id, cmd, hwnd);
cdf1e714
DW
1977 }
1978 break;
1979
61243a51
DW
1980 //
1981 // For these messages we must return TRUE if process the message
1982 //
cdf1e714
DW
1983 case WM_DRAWITEM:
1984 case WM_MEASUREITEM:
1985 {
1986 int idCtrl = (UINT)wParam;
61243a51 1987 if ( uMsg == WM_DRAWITEM )
cdf1e714 1988 {
61243a51 1989 bProcessed = OS2OnDrawItem(idCtrl,
cdf1e714
DW
1990 (WXDRAWITEMSTRUCT *)lParam);
1991 }
1992 else
1993 {
61243a51 1994 bProcessed = OS2OnMeasureItem(idCtrl,
cdf1e714
DW
1995 (WXMEASUREITEMSTRUCT *)lParam);
1996 }
1997
61243a51 1998 if ( bProcessed )
e604d44b 1999 mResult = (MRESULT)TRUE;
cdf1e714
DW
2000 }
2001 break;
2002
61243a51 2003 case WM_QUERYDLGCODE:
cdf1e714
DW
2004 if ( m_lDlgCode )
2005 {
e604d44b 2006 mResult = (MRESULT)m_lDlgCode;
61243a51 2007 bProcessed = TRUE;
cdf1e714 2008 }
61243a51 2009 //
cdf1e714 2010 //else: get the dlg code from the DefWindowProc()
61243a51 2011 //
cdf1e714
DW
2012 break;
2013
61243a51
DW
2014 //
2015 // In OS/2 PM all keyboard events are of the WM_CHAR type. Virtual key and key-up
2016 // and key-down events are obtained from the WM_CHAR params.
2017 //
2018 case WM_CHAR:
cdf1e714 2019 {
61243a51 2020 USHORT uKeyFlags = SHORT1FROMMP((MPARAM)wParam);
cdf1e714 2021
61243a51
DW
2022 if (uKeyFlags & KC_KEYUP)
2023 {
2024 bProcessed = HandleKeyUp((WXDWORD)wParam, lParam);
cdf1e714 2025 break;
61243a51
DW
2026 }
2027 else // keydown event
2028 {
2029 //
2030 // If this has been processed by an event handler,
2031 // return 0 now (we've handled it). DON't RETURN
2032 // we still need to process further
2033 //
2034 HandleKeyDown((WXDWORD)wParam, lParam);
2035 if (uKeyFlags & KC_VIRTUALKEY)
cdf1e714 2036 {
61243a51
DW
2037 USHORT uVk = SHORT2FROMMP((MPARAM)lParam);
2038
2039 //
2040 // We consider these message "not interesting" to OnChar
2041 //
2042 if (uVk == VK_SHIFT || uVk == VK_CTRL )
2043 {
2044 bProcessed = TRUE;
2045 break;
2046 }
2047 switch(uVk)
2048 {
2049 //
2050 // Avoid duplicate messages to OnChar for these ASCII keys: they
2051 // will be translated by TranslateMessage() and received in WM_CHAR
2052 case VK_ESC:
2053 case VK_SPACE:
2054 case VK_ENTER:
2055 case VK_BACKSPACE:
2056 case VK_TAB:
2057 // But set processed to FALSE, not TRUE to still pass them to
2058 // the control's default window proc - otherwise built-in
2059 // keyboard handling won't work
2060 bProcessed = FALSE;
2061 break;
2062
2063 case VK_LEFT:
2064 case VK_RIGHT:
2065 case VK_DOWN:
2066 case VK_UP:
2067 default:
2068 bProcessed = HandleChar((WXDWORD)wParam, lParam);
2069 }
2070 break;
cdf1e714 2071 }
61243a51
DW
2072 else // WM_CHAR -- Always an ASCII character
2073 {
2074 bProcessed = HandleChar((WXDWORD)wParam, lParam, TRUE);
2075 break;
2076 }
2077 }
cdf1e714 2078 }
cdf1e714
DW
2079
2080 case WM_HSCROLL:
2081 case WM_VSCROLL:
2082 {
61243a51
DW
2083 WXWORD wCode;
2084 WXWORD wPos;
2085 WXHWND hWnd;
2086 UnpackScroll( wParam
2087 ,lParam
2088 ,&wCode
2089 ,&wPos
2090 ,&hWnd
2091 );
2092
2093 bProcessed = OS2OnScroll( uMsg == WM_HSCROLL ? wxHORIZONTAL
2094 : wxVERTICAL
2095 ,wCode
2096 ,wPos
2097 ,hWnd
2098 );
cdf1e714
DW
2099 }
2100 break;
2101
61243a51
DW
2102#if defined(__VISAGECPP__) && (__IBMCPP__ >= 400)
2103 case WM_CTLCOLORCHANGE:
cdf1e714 2104 {
e604d44b 2105 bProcessed = HandleCtlColor(&hBrush);
61243a51
DW
2106 }
2107 break;
2108#endif
2109 //
2110 // Instead of CTLCOLOR messages PM sends QUERYWINDOWPARAMS to
2111 // things such as colors and fonts and such
2112 //
2113 case WM_QUERYWINDOWPARAMS:
2114 {
2115 PWNDPARAMS pWndParams = (PWNDPARAMS)wParam;
2116
2117 bProcessed = HandleWindowParams( pWndParams
2118 ,lParam
2119 );
cdf1e714
DW
2120 }
2121 break;
2122
2123 // the return value for this message is ignored
2124 case WM_SYSCOLORCHANGE:
61243a51 2125 bProcessed = HandleSysColorChange();
cdf1e714
DW
2126 break;
2127
61243a51
DW
2128 case WM_REALIZEPALETTE:
2129 bProcessed = HandlePaletteChanged();
cdf1e714
DW
2130 break;
2131
61243a51
DW
2132 case WM_PRESPARAMCHANGED:
2133 bProcessed = HandlePresParamChanged(wParam);
cdf1e714
DW
2134 break;
2135
61243a51
DW
2136 // move this to wxFrame
2137 case WM_ERASEBACKGROUND:
2138 bProcessed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2139 if (bProcessed)
cdf1e714 2140 {
61243a51
DW
2141 //
2142 // We processed the message, i.e. erased the background
2143 //
e604d44b 2144 mResult = (MRESULT)TRUE;
cdf1e714
DW
2145 }
2146 break;
2147
61243a51
DW
2148 // move all drag and drops to wxDrg
2149 case WM_ENDDRAG:
2150 bProcessed = HandleEndDrag(wParam);
cdf1e714
DW
2151 break;
2152
61243a51
DW
2153 case WM_INITDLG:
2154 bProcessed = HandleInitDialog((WXHWND)(HWND)wParam);
cdf1e714 2155
61243a51 2156 if ( bProcessed )
cdf1e714
DW
2157 {
2158 // we never set focus from here
e604d44b 2159 mResult = FALSE;
cdf1e714
DW
2160 }
2161 break;
2162
61243a51
DW
2163 // wxFrame specific message
2164 case WM_MINMAXFRAME:
f6bcfd97 2165 bProcessed = HandleGetMinMaxInfo((PSWP)wParam);
cdf1e714
DW
2166 break;
2167
61243a51
DW
2168 case WM_SYSVALUECHANGED:
2169 // TODO: do something
e604d44b 2170 mResult = (MRESULT)TRUE;
cdf1e714
DW
2171 break;
2172
61243a51
DW
2173 //
2174 // Comparable to WM_SETPOINTER for windows, only for just controls
2175 //
2176 case WM_CONTROLPOINTER:
2177 bProcessed = HandleSetCursor( SHORT1FROMMP(wParam) // Control ID
2178 ,(HWND)lParam // Cursor Handle
2179 );
2180 if (bProcessed )
cdf1e714 2181 {
61243a51
DW
2182 //
2183 // Returning TRUE stops the DefWindowProc() from further
cdf1e714
DW
2184 // processing this message - exactly what we need because we've
2185 // just set the cursor.
61243a51 2186 //
e604d44b 2187 mResult = (MRESULT)TRUE;
cdf1e714
DW
2188 }
2189 break;
2190 }
61243a51 2191 if (!bProcessed)
cdf1e714
DW
2192 {
2193#ifdef __WXDEBUG__
2194 wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
61243a51 2195 wxGetMessageName(uMsg));
cdf1e714 2196#endif // __WXDEBUG__
d08f23a7
DW
2197 if (IsKindOf(CLASSINFO(wxFrame)))
2198 mResult = ::WinDefWindowProc(m_hWnd, uMsg, wParam, lParam);
2199 else
2200 mResult = OS2DefWindowProc(uMsg, wParam, lParam);
cdf1e714 2201 }
e604d44b 2202 return mResult;
61243a51 2203} // end of wxWindow::OS2WindowProc
cdf1e714 2204
61243a51 2205//
cdf1e714 2206// Dialog window proc
61243a51
DW
2207//
2208MRESULT wxDlgProc(
2209 HWND hWnd
2210, UINT uMsg
2211, MPARAM wParam
2212, MPARAM lParam)
cdf1e714 2213{
61243a51 2214 if (uMsg == WM_INITDLG)
cdf1e714 2215 {
61243a51
DW
2216 //
2217 // For this message, returning TRUE tells system to set focus to the
cdf1e714 2218 // first control in the dialog box
61243a51
DW
2219 //
2220 return (MRESULT)TRUE;
cdf1e714
DW
2221 }
2222 else
2223 {
61243a51
DW
2224 //
2225 // For all the other ones, FALSE means that we didn't process the
cdf1e714 2226 // message
61243a51
DW
2227 //
2228 return (MRESULT)0;
cdf1e714 2229 }
61243a51 2230} // end of wxDlgProc
cdf1e714 2231
61243a51
DW
2232wxWindow* wxFindWinFromHandle(
2233 WXHWND hWnd
2234)
cdf1e714 2235{
61243a51
DW
2236 wxNode* pNode = wxWinHandleList->Find((long)hWnd);
2237
2238 if (!pNode)
cdf1e714 2239 return NULL;
61243a51
DW
2240 return (wxWindow *)pNode->Data();
2241} // end of wxFindWinFromHandle
cdf1e714 2242
61243a51
DW
2243void wxAssociateWinWithHandle(
2244 HWND hWnd
2245, wxWindow* pWin
2246)
cdf1e714 2247{
61243a51
DW
2248 //
2249 // Adding NULL hWnd is (first) surely a result of an error and
cdf1e714 2250 // (secondly) breaks menu command processing
61243a51 2251 //
cdf1e714
DW
2252 wxCHECK_RET( hWnd != (HWND)NULL,
2253 wxT("attempt to add a NULL hWnd to window list ignored") );
2254
2255
61243a51
DW
2256 wxWindow* pOldWin = wxFindWinFromHandle((WXHWND) hWnd);
2257
2258 if (pOldWin && (pOldWin != pWin))
cdf1e714 2259 {
61243a51
DW
2260 wxString str(pWin->GetClassInfo()->GetClassName());
2261 wxLogError( "Bug! Found existing HWND %X for new window of class %s"
2262 ,(int)hWnd
2263 ,(const char*)str
2264 );
cdf1e714 2265 }
61243a51 2266 else if (!pOldWin)
cdf1e714 2267 {
61243a51
DW
2268 wxWinHandleList->Append( (long)hWnd
2269 ,pWin
2270 );
cdf1e714 2271 }
61243a51 2272} // end of wxAssociateWinWithHandle
cdf1e714 2273
61243a51
DW
2274void wxRemoveHandleAssociation(
2275 wxWindow* pWin
2276)
cdf1e714 2277{
61243a51
DW
2278 wxWinHandleList->DeleteObject(pWin);
2279} // end of wxRemoveHandleAssociation
cdf1e714 2280
61243a51 2281//
cdf1e714
DW
2282// Default destroyer - override if you destroy it in some other way
2283// (e.g. with MDI child windows)
61243a51 2284//
cdf1e714
DW
2285void wxWindow::OS2DestroyWindow()
2286{
2287}
2288
2289void wxWindow::OS2DetachWindowMenu()
2290{
61243a51 2291 if (m_hMenu)
cdf1e714 2292 {
61243a51 2293 HMENU hMenu = (HMENU)m_hMenu;
cdf1e714 2294
61243a51
DW
2295 int nN = (int)::WinSendMsg(hMenu, MM_QUERYITEMCOUNT, 0, 0);
2296 int i;
2297
2298 for (i = 0; i < nN; i++)
cdf1e714 2299 {
61243a51
DW
2300 wxChar zBuf[100];
2301 int nChars = (int)::WinSendMsg( hMenu
2302 ,MM_QUERYITEMTEXT
2303 ,MPFROM2SHORT(i, nN)
2304 ,zBuf
2305 );
2306 if (!nChars)
cdf1e714
DW
2307 {
2308 wxLogLastError(wxT("GetMenuString"));
cdf1e714
DW
2309 continue;
2310 }
2311
61243a51 2312 if (wxStrcmp(zBuf, wxT("&Window")) == 0)
cdf1e714 2313 {
61243a51 2314 ::WinSendMsg(hMenu, MM_DELETEITEM, MPFROM2SHORT(i, TRUE), 0);
cdf1e714
DW
2315 break;
2316 }
2317 }
2318 }
61243a51 2319} // end of wxWindow::OS2DetachWindowMenu
cdf1e714 2320
61243a51 2321bool wxWindow::OS2Create(
f23208ca
DW
2322 WXHWND hParent
2323, PSZ zClass
61243a51 2324, const wxChar* zTitle
61243a51 2325, WXDWORD dwStyle
f23208ca
DW
2326, long lX
2327, long lY
2328, long lWidth
2329, long lHeight
2330, WXHWND hOwner
2331, WXHWND hZOrder
2332, unsigned long ulId
2333, void* pCtlData
2334, void* pPresParams
61243a51
DW
2335)
2336{
914589c2
DW
2337 ERRORID vError;
2338 wxString sError;
5b3ed311 2339 long lX1 = 0L;
f23208ca 2340 long lY1 = 0L;
5b3ed311
DW
2341 long lWidth1 = 20L;
2342 long lHeight1 = 20L;
f23208ca 2343 int nControlId = 0;
51c1d535
DW
2344 int nNeedsubclass = 0;
2345 PCSZ pszClass = zClass;
cdf1e714 2346
61243a51 2347 //
cdf1e714
DW
2348 // Find parent's size, if it exists, to set up a possible default
2349 // panel size the size of the parent window
61243a51
DW
2350 //
2351 RECTL vParentRect;
2352 HWND hWndClient;
2353
f23208ca
DW
2354 if (lX > -1L)
2355 lX1 = lX;
2356 if (lY > -1L)
2357 lY1 = lY;
2358 if (lWidth > -1L)
2359 lWidth1 = lWidth;
2360 if (lHeight > -1L)
2361 lHeight1 = lHeight;
cdf1e714
DW
2362
2363 wxWndHook = this;
2364
f23208ca
DW
2365 //
2366 // check to see if the new window is a standard control
2367 //
2368 if ((ULONG)zClass == (ULONG)WC_BUTTON ||
2369 (ULONG)zClass == (ULONG)WC_COMBOBOX ||
2370 (ULONG)zClass == (ULONG)WC_CONTAINER ||
2371 (ULONG)zClass == (ULONG)WC_ENTRYFIELD ||
40bd6154 2372 (ULONG)zClass == (ULONG)WC_FRAME ||
f23208ca
DW
2373 (ULONG)zClass == (ULONG)WC_LISTBOX ||
2374 (ULONG)zClass == (ULONG)WC_MENU ||
2375 (ULONG)zClass == (ULONG)WC_NOTEBOOK ||
2376 (ULONG)zClass == (ULONG)WC_SCROLLBAR ||
2377 (ULONG)zClass == (ULONG)WC_SPINBUTTON ||
2378 (ULONG)zClass == (ULONG)WC_STATIC ||
2379 (ULONG)zClass == (ULONG)WC_TITLEBAR ||
2380 (ULONG)zClass == (ULONG)WC_VALUESET
2381 )
cdf1e714 2382 {
f23208ca 2383 nControlId = ulId;
cdf1e714 2384 }
51c1d535
DW
2385 else
2386 {
2387 // no standard controls
2388 if(wxString (wxT("wxFrameClass")) == wxString(zClass) )
2389 {
2390 pszClass = WC_FRAME;
2391 nNeedsubclass = 1;
2392 }
2393 else
2394 {
2395 nControlId = ulId;
2396 if(nControlId < 0)
2397 nControlId = FID_CLIENT;
2398 }
2399 }
cdf1e714 2400
f23208ca
DW
2401 //
2402 // We will either have a registered class via string name or a standard PM Class via a long
2403 //
2404 m_hWnd = (WXHWND)::WinCreateWindow( (HWND)hParent
2405 ,zClass
2406 ,(PSZ)zTitle ? zTitle : wxT("")
2407 ,(ULONG)dwStyle
2408 ,(LONG)lX1
2409 ,(LONG)lY1
2410 ,(LONG)lWidth
2411 ,(LONG)lHeight
51c1d535 2412 ,hOwner
f23208ca 2413 ,HWND_TOP
51c1d535 2414 ,(ULONG)nControlId
f23208ca
DW
2415 ,pCtlData
2416 ,pPresParams
2417 );
2418 if (!m_hWnd)
2419 {
2420 vError = ::WinGetLastError(vHabmain);
2421 sError = wxPMErrorToStr(vError);
2422 wxLogError("Can't create window of class %s!. Error: %s\n", zClass, sError);
2423 return FALSE;
cdf1e714 2424 }
f6bcfd97 2425 ::WinSetWindowULong(m_hWnd, QWL_USER, (ULONG) this);
cdf1e714 2426 wxWndHook = NULL;
61243a51 2427
cdf1e714 2428#ifdef __WXDEBUG__
61243a51
DW
2429 wxNode* pNode = wxWinHandleList->Member(this);
2430
2431 if (pNode)
cdf1e714 2432 {
61243a51
DW
2433 HWND hWnd = (HWND)pNode->GetKeyInteger();
2434
2435 if (hWnd != (HWND)m_hWnd)
2436
cdf1e714
DW
2437 {
2438 wxLogError("A second HWND association is being added for the same window!");
2439 }
2440 }
2441#endif
61243a51
DW
2442 wxAssociateWinWithHandle((HWND)m_hWnd
2443 ,this
2444 );
cd212ee4 2445 //
e604d44b
DW
2446 // Now need to subclass window.
2447 //
51c1d535
DW
2448 if(!nNeedsubclass)
2449 {
2450 wxAssociateWinWithHandle((HWND)m_hWnd,this);
2451 }
2452 else
2453 {
2454 SubclassWin(GetHWND());
2455 }
cdf1e714 2456 return TRUE;
61243a51 2457} // end of wxWindow::OS2Create
cdf1e714
DW
2458
2459// ===========================================================================
2460// OS2 PM message handlers
2461// ===========================================================================
2462
2463// ---------------------------------------------------------------------------
61243a51 2464// window creation/destruction
cdf1e714
DW
2465// ---------------------------------------------------------------------------
2466
61243a51
DW
2467bool wxWindow::HandleCreate(
2468 WXLPCREATESTRUCT vCs
2469, bool* pbMayCreate
2470)
cdf1e714 2471{
61243a51 2472 wxWindowCreateEvent vEvent(this);
cdf1e714 2473
61243a51
DW
2474 (void)GetEventHandler()->ProcessEvent(vEvent);
2475 *pbMayCreate = TRUE;
cdf1e714 2476 return TRUE;
61243a51 2477} // end of wxWindow::HandleCreate
cdf1e714
DW
2478
2479bool wxWindow::HandleDestroy()
2480{
61243a51 2481 wxWindowDestroyEvent vEvent(this);
cdf1e714 2482
61243a51
DW
2483 (void)GetEventHandler()->ProcessEvent(vEvent);
2484
2485 //
2486 // Delete our drop target if we've got one
2487 //
cdf1e714 2488#if wxUSE_DRAG_AND_DROP
61243a51 2489 if (m_dropTarget != NULL)
cdf1e714 2490 {
61243a51 2491 m_dropTarget->Revoke(m_hWnd);
cdf1e714
DW
2492 delete m_dropTarget;
2493 m_dropTarget = NULL;
2494 }
2495#endif // wxUSE_DRAG_AND_DROP
2496
61243a51 2497 //
cdf1e714 2498 // WM_DESTROY handled
61243a51 2499 //
cdf1e714 2500 return TRUE;
61243a51 2501} // end of wxWindow::HandleDestroy
cdf1e714
DW
2502
2503// ---------------------------------------------------------------------------
2504// activation/focus
2505// ---------------------------------------------------------------------------
61243a51
DW
2506void wxWindow::OnSetFocus(
2507 wxFocusEvent& rEvent
2508)
cdf1e714 2509{
61243a51
DW
2510 //
2511 // Panel wants to track the window which was the last to have focus in it,
2512 // so we want to set ourselves as the window which last had focus
2513 //
2514 // Notice that it's also important to do it upwards the tree becaus
2515 // otherwise when the top level panel gets focus, it won't set it back to
2516 // us, but to some other sibling
2517 //
2518 wxWindow* pWin = this;
cdf1e714 2519
61243a51
DW
2520 while (pWin)
2521 {
2522 wxWindow* pParent = pWin->GetParent();
2523 wxPanel* pPanel = wxDynamicCast( pParent
2524 ,wxPanel
2525 );
2526 if (pPanel)
2527 {
2528 pPanel->SetLastFocus(pWin);
2529 }
2530 pWin = pParent;
2531 }
cdf1e714 2532
61243a51
DW
2533 wxLogTrace(_T("focus"), _T("%s (0x%08x) gets focus"),
2534 GetClassInfo()->GetClassName(), GetHandle());
2535
2536 rEvent.Skip();
2537} // end of wxWindow::OnSetFocus
2538
2539bool wxWindow::HandleActivate(
2540 int nState
2541, WXHWND WXUNUSED(hActivate)
2542)
2543{
2544 wxActivateEvent vEvent( wxEVT_ACTIVATE
2545 ,(bool)nState
2546 ,m_windowId
2547 );
2548 vEvent.SetEventObject(this);
2549 return GetEventHandler()->ProcessEvent(vEvent);
2550} // end of wxWindow::HandleActivate
2551
2552bool wxWindow::HandleSetFocus(
2553 WXHWND WXUNUSED(hWnd)
2554)
cdf1e714
DW
2555{
2556#if wxUSE_CARET
61243a51 2557 //
cdf1e714 2558 // Deal with caret
61243a51
DW
2559 //
2560 if (m_caret)
cdf1e714
DW
2561 {
2562 m_caret->OnSetFocus();
2563 }
2564#endif // wxUSE_CARET
2565
61243a51
DW
2566 //
2567 // Panel wants to track the window which was the last to have focus in it
2568 //
2569 wxPanel* pPanel = wxDynamicCast( GetParent()
2570 ,wxPanel
2571 );
2572 if (pPanel)
cdf1e714 2573 {
61243a51 2574 pPanel->SetLastFocus(this);
cdf1e714
DW
2575 }
2576
61243a51 2577 wxFocusEvent vEvent(wxEVT_SET_FOCUS, m_windowId);
cdf1e714 2578
61243a51
DW
2579 vEvent.SetEventObject(this);
2580 return GetEventHandler()->ProcessEvent(vEvent);
2581} // end of wxWindow::HandleSetFocus
cdf1e714 2582
61243a51
DW
2583bool wxWindow::HandleKillFocus(
2584 WXHWND WXUNUSED(hWnd)
2585)
cdf1e714
DW
2586{
2587#if wxUSE_CARET
61243a51 2588 //
cdf1e714 2589 // Deal with caret
61243a51
DW
2590 //
2591 if (m_caret)
cdf1e714
DW
2592 {
2593 m_caret->OnKillFocus();
2594 }
2595#endif // wxUSE_CARET
2596
61243a51
DW
2597 wxFocusEvent vEvent( wxEVT_KILL_FOCUS
2598 ,m_windowId
2599 );
cdf1e714 2600
61243a51
DW
2601 vEvent.SetEventObject(this);
2602 return GetEventHandler()->ProcessEvent(vEvent);
2603} // end of wxWindow::HandleKillFocus
cdf1e714
DW
2604
2605// ---------------------------------------------------------------------------
2606// miscellaneous
2607// ---------------------------------------------------------------------------
2608
61243a51
DW
2609bool wxWindow::HandleShow(
2610 bool bShow
2611, int nStatus
2612)
cdf1e714 2613{
61243a51
DW
2614 wxShowEvent vEvent( GetId()
2615 ,bShow
2616 );
cdf1e714 2617
61243a51
DW
2618 vEvent.m_eventObject = this;
2619 return GetEventHandler()->ProcessEvent(vEvent);
2620} // end of wxWindow::HandleShow
cdf1e714 2621
61243a51
DW
2622bool wxWindow::HandleInitDialog(
2623 WXHWND WXUNUSED(hWndFocus)
2624)
cdf1e714 2625{
61243a51 2626 wxInitDialogEvent vEvent(GetId());
cdf1e714 2627
61243a51
DW
2628 vEvent.m_eventObject = this;
2629 return GetEventHandler()->ProcessEvent(vEvent);
2630} // end of wxWindow::HandleInitDialog
cdf1e714 2631
61243a51 2632bool wxWindow::HandleEndDrag(WXWPARAM wParam)
cdf1e714 2633{
61243a51 2634 // TODO: We'll handle drag and drop later
cdf1e714
DW
2635 return FALSE;
2636}
2637
61243a51
DW
2638bool wxWindow::HandleSetCursor(
2639 USHORT vId
2640, WXHWND hPointer
2641)
cdf1e714 2642{
61243a51
DW
2643 //
2644 // Under OS/2 PM this allows the pointer to be changed
2645 // as it passes over a control
2646 //
2647 ::WinSetPointer(HWND_DESKTOP, (HPOINTER)hPointer);
2648 return TRUE;
2649} // end of wxWindow::HandleSetCursor
cdf1e714
DW
2650
2651// ---------------------------------------------------------------------------
2652// owner drawn stuff
2653// ---------------------------------------------------------------------------
61243a51
DW
2654bool wxWindow::OS2OnDrawItem(
2655 int vId
2656, WXDRAWITEMSTRUCT* pItemStruct
2657)
cdf1e714 2658{
61243a51
DW
2659 //
2660 // I'll get to owner drawn stuff later
2661 //
2662
2663 //
2664 // is it a menu item or control?
2665 //
2666 wxWindow* pItem = FindItem(vId);
2667
cdf1e714 2668#if wxUSE_OWNER_DRAWN
61243a51 2669 if (pItem && pItem->IsKindOf(CLASSINFO(wxControl)))
cdf1e714 2670 {
61243a51
DW
2671 return ((wxControl *)pItem)->OS2OnDraw(pItemStruct);
2672 }
2673 else if (pItem && pItem->IsKindOf(CLASSINFO(wxMenu)))
2674 {
2675 /*
2676 // TODO: draw a menu item
2677 //
2678 POWNERITEM pDrawStruct = (OWNERITEM *)pItemStruct;
2679 wxMenuItem* pMenuItem = (wxMenuItem *)(pDrawStruct->pItemData);
cdf1e714 2680
61243a51 2681 wxCHECK(pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE);
cdf1e714 2682
61243a51
DW
2683 //
2684 // Prepare to call OnDrawItem()
2685 //
2686 HPSdc;
cdf1e714
DW
2687 dc.SetHDC((WXHDC)pDrawStruct->hDC, FALSE);
2688 wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
2689 pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
2690 pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
2691
2692 return pMenuItem->OnDrawItem
2693 (
2694 dc, rect,
2695 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
2696 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
2697 );
61243a51 2698 */
cdf1e714
DW
2699 }
2700
cdf1e714 2701 else
cdf1e714 2702 return FALSE;
61243a51
DW
2703#endif
2704 return TRUE;
2705} // end of wxWindow::OS2OnDrawItem
cdf1e714
DW
2706
2707bool wxWindow::OS2OnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
0e320a79 2708{
61243a51 2709 // TODO: more owner drawn menu related stuff, get to it later
cdf1e714
DW
2710/*
2711#if wxUSE_OWNER_DRAWN
2712 // is it a menu item?
2713 if ( id == 0 )
2714 {
2715 MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
2716 wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
2717
2718 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
2719
2720 return pMenuItem->OnMeasureItem(&pMeasureStruct->itemWidth,
2721 &pMeasureStruct->itemHeight);
2722 }
2723
2724 wxWindow *item = FindItem(id);
2725 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
2726 {
2727 return ((wxControl *)item)->MSWOnMeasure(itemStruct);
2728 }
2729#endif // owner-drawn menus
2730*/
2731 return FALSE;
0e320a79
DW
2732}
2733
cdf1e714
DW
2734// ---------------------------------------------------------------------------
2735// colours and palettes
2736// ---------------------------------------------------------------------------
849949b1 2737
cdf1e714 2738bool wxWindow::HandleSysColorChange()
0e320a79 2739{
61243a51 2740 wxSysColourChangedEvent vEvent;
cdf1e714 2741
61243a51
DW
2742 vEvent.SetEventObject(this);
2743 return GetEventHandler()->ProcessEvent(vEvent);
2744} // end of wxWindow::HandleSysColorChange
0e320a79 2745
61243a51
DW
2746bool wxWindow::HandleCtlColor(
2747 WXHBRUSH* phBrush
2748)
0e320a79 2749{
61243a51
DW
2750 //
2751 // Not much provided with message. So not sure I can do anything with it
2752 //
2753 return TRUE;
2754} // end of wxWindow::HandleCtlColor
cdf1e714 2755
61243a51
DW
2756bool wxWindow::HandleWindowParams(
2757 PWNDPARAMS pWndParams
2758, WXLPARAM lParam
2759)
2760{
2761// TODO: I'll do something here, just not sure what yet
2762 return TRUE;
0e320a79
DW
2763}
2764
cdf1e714
DW
2765// Define for each class of dialog and control
2766WXHBRUSH wxWindow::OnCtlColor(WXHDC hDC,
2767 WXHWND hWnd,
2768 WXUINT nCtlColor,
2769 WXUINT message,
2770 WXWPARAM wParam,
2771 WXLPARAM lParam)
0e320a79 2772{
cdf1e714 2773 return (WXHBRUSH)0;
0e320a79
DW
2774}
2775
61243a51 2776bool wxWindow::HandlePaletteChanged()
0e320a79 2777{
61243a51
DW
2778 // need to set this to something first
2779 WXHWND hWndPalChange = NULLHANDLE;
cdf1e714 2780
61243a51
DW
2781 wxPaletteChangedEvent vEvent(GetId());
2782
2783 vEvent.SetEventObject(this);
2784 vEvent.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
0e320a79 2785
61243a51
DW
2786 return GetEventHandler()->ProcessEvent(vEvent);
2787} // end of wxWindow::HandlePaletteChanged
2788
2789bool wxWindow::HandlePresParamChanged(
2790 WXWPARAM wParam
2791)
0e320a79 2792{
61243a51
DW
2793 //
2794 // TODO: Once again I'll do something here when I need it
2795 //
2796 //wxQueryNewPaletteEvent event(GetId());
2797 //event.SetEventObject(this);
2798 // if the background is erased
2799// bProcessed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
cdf1e714 2800
61243a51 2801 return FALSE; //GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
0e320a79
DW
2802}
2803
61243a51 2804//
cdf1e714 2805// Responds to colour changes: passes event on to children.
61243a51
DW
2806//
2807void wxWindow::OnSysColourChanged(
2808 wxSysColourChangedEvent& rEvent
2809)
0e320a79 2810{
61243a51
DW
2811 wxNode* pNode = GetChildren().First();
2812
2813 while (pNode)
cdf1e714 2814 {
61243a51 2815 //
cdf1e714 2816 // Only propagate to non-top-level windows
61243a51
DW
2817 //
2818 wxWindow* pWin = (wxWindow *)pNode->Data();
2819
2820 if (pWin->GetParent())
cdf1e714 2821 {
61243a51 2822 wxSysColourChangedEvent vEvent;
cdf1e714 2823
61243a51
DW
2824 rEvent.m_eventObject = pWin;
2825 pWin->GetEventHandler()->ProcessEvent(vEvent);
2826 }
2827 pNode = pNode->Next();
cdf1e714 2828 }
61243a51 2829} // end of wxWindow::OnSysColourChanged
0e320a79 2830
cdf1e714
DW
2831// ---------------------------------------------------------------------------
2832// painting
2833// ---------------------------------------------------------------------------
2834
2835bool wxWindow::HandlePaint()
0e320a79 2836{
61243a51 2837 HRGN hRgn = NULLHANDLE;
40bd6154
DW
2838 wxPaintEvent vEvent;
2839 HPS hPS;
2840 RECTL vRect;
61243a51
DW
2841
2842 if (::WinQueryUpdateRegion(GetHwnd(), hRgn) == RGN_NULL)
2843 {
2844 wxLogLastError("CreateRectRgn");
2845 return FALSE;
2846 }
7e99520b
DW
2847 //
2848 // Debug code
2849 //
2850#ifdef __WXDEBUG__
2851 {
f44fdfb0 2852 HWND hWnd;
7e99520b
DW
2853 HWND hWnd0 = NULLHANDLE;
2854
2855 hWnd = GetHwnd();
2856 if(hWnd != hWnd0)
2857 printf("HandlePaint hWnd=%x ",hWnd);
2858 }
2859#endif
2860
61243a51 2861 m_updateRegion = wxRegion(hRgn);
61243a51
DW
2862 vEvent.SetEventObject(this);
2863 return (GetEventHandler()->ProcessEvent(vEvent));
2864} // end of wxWindow::HandlePaint
0e320a79 2865
cdf1e714 2866bool wxWindow::HandleEraseBkgnd(WXHDC hdc)
0e320a79 2867{
61243a51
DW
2868 // TODO: will have to worry about this later as part of
2869 // the handling of changed presentation parameters
2870 /*
2871 if ( ::IsIconic(GetHwnd()) )
2872 return TRUE;
cdf1e714
DW
2873
2874 wxDC dc;
2875
2876 dc.SetHDC(hdc);
2877 dc.SetWindow(this);
2878 dc.BeginDrawing();
2879
2880 wxEraseEvent event(m_windowId, &dc);
2881 event.SetEventObject(this);
2882 bool rc = GetEventHandler()->ProcessEvent(event);
2883
2884 dc.EndDrawing();
2885 dc.SelectOldObjects(hdc);
2886 dc.SetHDC((WXHDC) NULL);
61243a51
DW
2887 */
2888 return TRUE;
2889} // end of wxWindow::HandleEraseBkgnd
cdf1e714 2890
61243a51
DW
2891void wxWindow::OnEraseBackground(
2892 wxEraseEvent& rEvent
2893)
0e320a79 2894{
849949b1 2895 // TODO:
61243a51 2896} // end of wxWindow::OnEraseBackground
0e320a79 2897
cdf1e714
DW
2898// ---------------------------------------------------------------------------
2899// moving and resizing
2900// ---------------------------------------------------------------------------
0e320a79 2901
cdf1e714 2902bool wxWindow::HandleMinimize()
0e320a79 2903{
61243a51 2904 wxIconizeEvent vEvent(m_windowId);
cdf1e714 2905
61243a51
DW
2906 vEvent.SetEventObject(this);
2907 return GetEventHandler()->ProcessEvent(vEvent);
2908} // end of wxWindow::HandleMinimize
0e320a79 2909
cdf1e714 2910bool wxWindow::HandleMaximize()
0e320a79 2911{
61243a51 2912 wxMaximizeEvent vEvent(m_windowId);
cdf1e714 2913
61243a51
DW
2914 vEvent.SetEventObject(this);
2915 return GetEventHandler()->ProcessEvent(vEvent);
2916} // end of wxWindow::HandleMaximize
0e320a79 2917
61243a51
DW
2918bool wxWindow::HandleMove(
2919 int nX
2920, int nY
2921)
0e320a79 2922{
61243a51
DW
2923 wxMoveEvent vEvent( wxPoint( nX
2924 ,nY
2925 )
2926 ,m_windowId
2927 );
cdf1e714 2928
61243a51
DW
2929 vEvent.SetEventObject(this);
2930 return GetEventHandler()->ProcessEvent(vEvent);
2931} // end of wxWindow::HandleMove
0e320a79 2932
61243a51
DW
2933bool wxWindow::HandleSize(
2934 int nWidth
2935, int nHeight
2936, WXUINT WXUNUSED(nFlag)
2937)
0e320a79 2938{
61243a51
DW
2939 wxSizeEvent vEvent( wxSize( nWidth
2940 ,nHeight
2941 )
2942 ,m_windowId
2943 );
cdf1e714 2944
61243a51
DW
2945 vEvent.SetEventObject(this);
2946 return GetEventHandler()->ProcessEvent(vEvent);
2947} // end of wxWindow::HandleSize
0e320a79 2948
61243a51
DW
2949bool wxWindow::HandleGetMinMaxInfo(
2950 PSWP pSwp
2951)
0e320a79 2952{
61243a51
DW
2953 bool bRc = FALSE;
2954 POINTL vPoint;
cdf1e714 2955
61243a51 2956 switch(pSwp->fl)
cdf1e714 2957 {
61243a51
DW
2958 case SWP_MAXIMIZE:
2959 ::WinGetMaxPosition(GetHwnd(), pSwp);
2960 m_maxWidth = pSwp->cx;
2961 m_maxHeight = pSwp->cy;
2962 break;
cdf1e714 2963
61243a51
DW
2964 case SWP_MINIMIZE:
2965 ::WinGetMinPosition(GetHwnd(), pSwp, &vPoint);
2966 m_minWidth = pSwp->cx;
2967 m_minHeight = pSwp->cy;
2968 break;
cdf1e714 2969
61243a51
DW
2970 default:
2971 return FALSE;
cdf1e714 2972 }
61243a51
DW
2973 return TRUE;
2974} // end of wxWindow::HandleGetMinMaxInfo
0e320a79 2975
cdf1e714
DW
2976// ---------------------------------------------------------------------------
2977// command messages
2978// ---------------------------------------------------------------------------
61243a51
DW
2979bool wxWindow::HandleCommand(
2980 WXWORD wId
2981, WXWORD wCmd
2982, WXHWND hControl
2983)
0e320a79 2984{
61243a51 2985 if (wxCurrentPopupMenu)
0e320a79 2986 {
61243a51 2987 wxMenu* pPopupMenu = wxCurrentPopupMenu;
0e320a79 2988
61243a51
DW
2989 wxCurrentPopupMenu = NULL;
2990 return pPopupMenu->OS2Command(wCmd, wId);
cdf1e714 2991 }
0e320a79 2992
61243a51
DW
2993 wxWindow* pWin = FindItem(wId);
2994
2995 if (!pWin)
cdf1e714 2996 {
61243a51 2997 pWin = wxFindWinFromHandle(hControl);
0e320a79 2998 }
cdf1e714 2999
61243a51
DW
3000 if (pWin)
3001 return pWin->OS2Command( wCmd
3002 ,wId
3003 );
cdf1e714 3004 return FALSE;
61243a51 3005} // end of wxWindow::HandleCommand
de44a9f0 3006
61243a51
DW
3007bool wxWindow::HandleSysCommand(
3008 WXWPARAM wParam
3009, WXLPARAM lParam
3010)
0e320a79 3011{
61243a51
DW
3012 //
3013 // 4 bits are reserved
3014 //
3015 switch (SHORT1FROMMP(wParam))
3016 {
3017 case SC_MAXIMIZE:
3018 return HandleMaximize();
3019
3020 case SC_MINIMIZE:
3021 return HandleMinimize();
3022 }
cdf1e714 3023 return FALSE;
61243a51 3024} // end of wxWindow::HandleSysCommand
cdf1e714
DW
3025
3026// ---------------------------------------------------------------------------
3027// mouse events
3028// ---------------------------------------------------------------------------
3029
61243a51
DW
3030void wxWindow::InitMouseEvent(
3031 wxMouseEvent& rEvent
3032, int nX
3033, int nY
3034, WXUINT uFlags
3035)
cdf1e714 3036{
61243a51
DW
3037 rEvent.m_x = nX;
3038 rEvent.m_y = nY;
3039 rEvent.m_shiftDown = ((uFlags & VK_SHIFT) != 0);
3040 rEvent.m_controlDown = ((uFlags & VK_CTRL) != 0);
3041 rEvent.m_leftDown = ((uFlags & VK_BUTTON1) != 0);
3042 rEvent.m_middleDown = ((uFlags & VK_BUTTON3) != 0);
3043 rEvent.m_rightDown = ((uFlags & VK_BUTTON2) != 0);
3044 rEvent.SetTimestamp(s_currentMsg.time);
3045 rEvent.m_eventObject = this;
cdf1e714
DW
3046
3047#if wxUSE_MOUSEEVENT_HACK
61243a51
DW
3048 m_lastMouseX = nX;
3049 m_lastMouseY = nY;
3050 m_lastMouseEvent = rEvent.GetEventType();
cdf1e714 3051#endif // wxUSE_MOUSEEVENT_HACK
61243a51 3052} // end of wxWindow::InitMouseEvent
0e320a79 3053
61243a51
DW
3054bool wxWindow::HandleMouseEvent(
3055 WXUINT uMsg
3056, int nX
3057, int nY
3058, WXUINT uFlags
3059)
0e320a79 3060{
61243a51
DW
3061 //
3062 // The mouse events take consecutive IDs from WM_MOUSEFIRST to
cdf1e714
DW
3063 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
3064 // from the message id and take the value in the table to get wxWin event
3065 // id
61243a51 3066 //
cdf1e714
DW
3067 static const wxEventType eventsMouse[] =
3068 {
3069 wxEVT_MOTION,
3070 wxEVT_LEFT_DOWN,
3071 wxEVT_LEFT_UP,
3072 wxEVT_LEFT_DCLICK,
3073 wxEVT_RIGHT_DOWN,
3074 wxEVT_RIGHT_UP,
3075 wxEVT_RIGHT_DCLICK,
3076 wxEVT_MIDDLE_DOWN,
3077 wxEVT_MIDDLE_UP,
3078 wxEVT_MIDDLE_DCLICK
3079 };
3080
61243a51 3081 wxMouseEvent vEvent(eventsMouse[uMsg - WM_MOUSEMOVE]);
cdf1e714 3082
61243a51
DW
3083 InitMouseEvent( vEvent
3084 ,nX
3085 ,nY
3086 ,uFlags
3087 );
0e320a79 3088
61243a51
DW
3089 return GetEventHandler()->ProcessEvent(vEvent);
3090} // end of wxWindow::HandleMouseEvent
3091
3092bool wxWindow::HandleMouseMove(
3093 int nX
3094, int nY
3095, WXUINT uFlags
3096)
0e320a79 3097{
61243a51 3098 if (!m_bMouseInWindow)
cdf1e714 3099 {
61243a51 3100 //
cdf1e714 3101 // Generate an ENTER event
61243a51 3102 //
776d87d5 3103 m_bMouseInWindow = TRUE;
cdf1e714 3104
61243a51 3105 wxMouseEvent vEvent(wxEVT_ENTER_WINDOW);
cdf1e714 3106
61243a51
DW
3107 InitMouseEvent( vEvent
3108 ,nX
3109 ,nY
3110 ,uFlags
3111 );
cdf1e714 3112
61243a51 3113 (void)GetEventHandler()->ProcessEvent(vEvent);
cdf1e714 3114 }
61243a51
DW
3115 return HandleMouseEvent( WM_MOUSEMOVE
3116 ,nX
3117 ,nY
3118 ,uFlags
3119 );
3120} // end of wxWindow::HandleMouseMove
0e320a79 3121
cdf1e714
DW
3122// ---------------------------------------------------------------------------
3123// keyboard handling
3124// ---------------------------------------------------------------------------
3125
61243a51
DW
3126//
3127// Create the key event of the given type for the given key - used by
3128// HandleChar and HandleKeyDown/Up
3129//
3130wxKeyEvent wxWindow::CreateKeyEvent(
3131 wxEventType eType
3132, int nId
3133, WXLPARAM lParam
3134) const
3135{
3136 wxKeyEvent vEvent(eType);
3137
3138 vEvent.SetId(GetId());
3139 vEvent.m_shiftDown = IsShiftDown();
3140 vEvent.m_controlDown = IsCtrlDown();
3141 vEvent.m_altDown = (HIWORD(lParam) & KC_ALT) == KC_ALT;
3142
3143 vEvent.m_eventObject = (wxWindow *)this; // const_cast
3144 vEvent.m_keyCode = nId;
3145 vEvent.SetTimestamp(s_currentMsg.time);
3146
3147 //
3148 // Translate the position to client coords
3149 //
3150 POINTL vPoint;
3151 RECTL vRect;
3152
3153 ::WinQueryPointerPos(HWND_DESKTOP, &vPoint);
3154 ::WinQueryWindowRect( GetHwnd()
3155 ,&vRect
3156 );
3157
3158 vPoint.x -= vRect.xLeft;
3159 vPoint.y -= vRect.yBottom;
3160
3161 vEvent.m_x = vPoint.x;
3162 vEvent.m_y = vPoint.y;
3163
3164 return vEvent;
3165} // end of wxWindow::CreateKeyEvent
3166
3167//
cdf1e714
DW
3168// isASCII is TRUE only when we're called from WM_CHAR handler and not from
3169// WM_KEYDOWN one
61243a51
DW
3170//
3171bool wxWindow::HandleChar(
3172 WXWORD wParam
3173, WXLPARAM lParam
3174, bool isASCII
3175)
86de7616 3176{
61243a51
DW
3177 bool bCtrlDown = FALSE;
3178 int vId;
3179
3180 if (isASCII)
3181 {
3182 //
3183 // If 1 -> 26, translate to CTRL plus a letter.
3184 //
3185 vId = wParam;
3186 if ((vId > 0) && (vId < 27))
3187 {
3188 switch (vId)
3189 {
3190 case 13:
3191 vId = WXK_RETURN;
3192 break;
3193
3194 case 8:
3195 vId = WXK_BACK;
3196 break;
3197
3198 case 9:
3199 vId = WXK_TAB;
3200 break;
3201
3202 default:
3203 bCtrlDown = TRUE;
3204 vId = vId + 96;
3205 }
3206 }
3207 }
3208 else if ( (vId = wxCharCodeOS2ToWX(wParam)) == 0)
3209 {
3210 //
3211 // It's ASCII and will be processed here only when called from
3212 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
3213 //
3214 vId = -1;
3215 }
3216
3217 if (vId != -1)
3218 {
3219 wxKeyEvent vEvent(CreateKeyEvent( wxEVT_CHAR
3220 ,vId
3221 ,lParam
3222 ));
3223
3224 if (bCtrlDown)
3225 {
3226 vEvent.m_controlDown = TRUE;
3227 }
3228
3229 if (GetEventHandler()->ProcessEvent(vEvent))
3230 return TRUE;
3231 }
3232 return FALSE;
cdf1e714 3233}
86de7616 3234
61243a51
DW
3235bool wxWindow::HandleKeyDown(
3236 WXWORD wParam
3237, WXLPARAM lParam
3238)
cdf1e714 3239{
61243a51 3240 int nId = wxCharCodeOS2ToWX(wParam);
86de7616 3241
61243a51
DW
3242 if (!nId)
3243 {
3244 //
3245 // Normal ASCII char
3246 //
3247 nId = wParam;
3248 }
3249
3250 if (nId != -1)
3251 {
3252 wxKeyEvent vEvent(CreateKeyEvent( wxEVT_KEY_DOWN
3253 ,nId
3254 ,lParam
3255 ));
3256
3257 if (GetEventHandler()->ProcessEvent(vEvent))
3258 {
3259 return TRUE;
3260 }
3261 }
3262 return FALSE;
3263} // end of wxWindow::HandleKeyDown
3264
3265bool wxWindow::HandleKeyUp(
3266 WXWORD wParam
3267, WXLPARAM lParam
3268)
86de7616 3269{
61243a51
DW
3270 int nId = wxCharCodeOS2ToWX(wParam);
3271
3272 if (!nId)
3273 {
3274 //
3275 // Normal ASCII char
3276 //
3277 nId = wParam;
3278 }
3279
3280 if (nId != -1)
3281 {
3282 wxKeyEvent vEvent(CreateKeyEvent( wxEVT_KEY_UP
3283 ,nId
3284 ,lParam
3285 ));
3286
3287 if (GetEventHandler()->ProcessEvent(vEvent))
3288 return TRUE;
3289 }
3290 return FALSE;
3291} // end of wxWindow::HandleKeyUp
86de7616 3292
cdf1e714
DW
3293// ---------------------------------------------------------------------------
3294// joystick
3295// ---------------------------------------------------------------------------
86de7616 3296
cdf1e714
DW
3297// ---------------------------------------------------------------------------
3298// scrolling
3299// ---------------------------------------------------------------------------
3300
61243a51
DW
3301bool wxWindow::OS2OnScroll(
3302 int nOrientation
3303, WXWORD wParam
3304, WXWORD wPos
3305, WXHWND hControl
3306)
cdf1e714 3307{
61243a51 3308 if (hControl)
86de7616 3309 {
61243a51
DW
3310 wxWindow* pChild = wxFindWinFromHandle(hControl);
3311
3312 if (pChild )
3313 return pChild->OS2OnScroll( nOrientation
3314 ,wParam
3315 ,wPos
3316 ,hControl
3317 );
cdf1e714 3318 }
86de7616 3319
61243a51
DW
3320 wxScrollWinEvent vEvent;
3321
3322 vEvent.SetPosition(wPos);
3323 vEvent.SetOrientation(nOrientation);
3324 vEvent.m_eventObject = this;
3325
3326 switch (wParam)
3327 {
3328 case SB_LINEUP:
3329 vEvent.m_eventType = wxEVT_SCROLLWIN_LINEUP;
3330 break;
3331
3332 case SB_LINEDOWN:
3333 vEvent.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
3334 break;
3335
3336 case SB_PAGEUP:
3337 vEvent.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
3338 break;
3339
3340 case SB_PAGEDOWN:
3341 vEvent.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
3342 break;
3343
3344 case SB_SLIDERPOSITION:
3345 vEvent.m_eventType = wxEVT_SCROLLWIN_THUMBRELEASE;
3346 break;
3347
3348 case SB_SLIDERTRACK:
3349 vEvent.m_eventType = wxEVT_SCROLLWIN_THUMBTRACK;
3350 break;
3351
3352 default:
3353 return FALSE;
3354 }
3355 return GetEventHandler()->ProcessEvent(vEvent);
3356} // end of wxWindow::OS2OnScroll
86de7616 3357
cdf1e714
DW
3358// ===========================================================================
3359// global functions
3360// ===========================================================================
3361
61243a51
DW
3362void wxGetCharSize(
3363 WXHWND hWnd
3364, int* pX
3365, int* pY
3366,wxFont* pTheFont
3367)
cdf1e714 3368{
61243a51
DW
3369 // TODO: we'll do this later
3370} // end of wxGetCharSize
cdf1e714 3371
61243a51 3372//
cdf1e714
DW
3373// Returns 0 if was a normal ASCII value, not a special key. This indicates that
3374// the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
61243a51
DW
3375//
3376int wxCharCodeOS2ToWX(
3377 int nKeySym
3378)
cdf1e714 3379{
61243a51
DW
3380 int nId = 0;
3381
3382 switch (nKeySym)
3383 {
3384 case VK_BACKTAB: nId = WXK_BACK; break;
3385 case VK_TAB: nId = WXK_TAB; break;
3386 case VK_CLEAR: nId = WXK_CLEAR; break;
3387 case VK_ENTER: nId = WXK_RETURN; break;
3388 case VK_SHIFT: nId = WXK_SHIFT; break;
3389 case VK_CTRL: nId = WXK_CONTROL; break;
3390 case VK_PAUSE: nId = WXK_PAUSE; break;
3391 case VK_SPACE: nId = WXK_SPACE; break;
3392 case VK_ESC: nId = WXK_ESCAPE; break;
3393 case VK_END: nId = WXK_END; break;
3394 case VK_HOME : nId = WXK_HOME; break;
3395 case VK_LEFT : nId = WXK_LEFT; break;
3396 case VK_UP: nId = WXK_UP; break;
3397 case VK_RIGHT: nId = WXK_RIGHT; break;
3398 case VK_DOWN : nId = WXK_DOWN; break;
3399 case VK_PRINTSCRN: nId = WXK_PRINT; break;
3400 case VK_INSERT: nId = WXK_INSERT; break;
3401 case VK_DELETE: nId = WXK_DELETE; break;
3402 case VK_F1: nId = WXK_F1; break;
3403 case VK_F2: nId = WXK_F2; break;
3404 case VK_F3: nId = WXK_F3; break;
3405 case VK_F4: nId = WXK_F4; break;
3406 case VK_F5: nId = WXK_F5; break;
3407 case VK_F6: nId = WXK_F6; break;
3408 case VK_F7: nId = WXK_F7; break;
3409 case VK_F8: nId = WXK_F8; break;
3410 case VK_F9: nId = WXK_F9; break;
3411 case VK_F10: nId = WXK_F10; break;
3412 case VK_F11: nId = WXK_F11; break;
3413 case VK_F12: nId = WXK_F12; break;
3414 case VK_F13: nId = WXK_F13; break;
3415 case VK_F14: nId = WXK_F14; break;
3416 case VK_F15: nId = WXK_F15; break;
3417 case VK_F16: nId = WXK_F16; break;
3418 case VK_F17: nId = WXK_F17; break;
3419 case VK_F18: nId = WXK_F18; break;
3420 case VK_F19: nId = WXK_F19; break;
3421 case VK_F20: nId = WXK_F20; break;
3422 case VK_F21: nId = WXK_F21; break;
3423 case VK_F22: nId = WXK_F22; break;
3424 case VK_F23: nId = WXK_F23; break;
3425 case VK_F24: nId = WXK_F24; break;
3426 case VK_NUMLOCK: nId = WXK_NUMLOCK; break;
3427 case VK_SCRLLOCK: nId = WXK_SCROLL; break;
3428 default:
86de7616 3429 {
cdf1e714 3430 return 0;
86de7616
DW
3431 }
3432 }
61243a51
DW
3433 return nId;
3434} // end of wxCharCodeOS2ToWX
86de7616 3435
61243a51
DW
3436int wxCharCodeWXToOS2(
3437 int nId
3438, bool* bIsVirtual
3439)
86de7616 3440{
61243a51
DW
3441 int nKeySym = 0;
3442
3443 *bIsVirtual = TRUE;
3444 switch (nId)
3445 {
3446 case WXK_CLEAR: nKeySym = VK_CLEAR; break;
3447 case WXK_SHIFT: nKeySym = VK_SHIFT; break;
3448 case WXK_CONTROL: nKeySym = VK_CTRL; break;
3449 case WXK_PAUSE: nKeySym = VK_PAUSE; break;
3450 case WXK_END: nKeySym = VK_END; break;
3451 case WXK_HOME : nKeySym = VK_HOME; break;
3452 case WXK_LEFT : nKeySym = VK_LEFT; break;
3453 case WXK_UP: nKeySym = VK_UP; break;
3454 case WXK_RIGHT: nKeySym = VK_RIGHT; break;
3455 case WXK_DOWN : nKeySym = VK_DOWN; break;
3456 case WXK_PRINT: nKeySym = VK_PRINTSCRN; break;
3457 case WXK_INSERT: nKeySym = VK_INSERT; break;
3458 case WXK_DELETE: nKeySym = VK_DELETE; break;
3459 case WXK_F1: nKeySym = VK_F1; break;
3460 case WXK_F2: nKeySym = VK_F2; break;
3461 case WXK_F3: nKeySym = VK_F3; break;
3462 case WXK_F4: nKeySym = VK_F4; break;
3463 case WXK_F5: nKeySym = VK_F5; break;
3464 case WXK_F6: nKeySym = VK_F6; break;
3465 case WXK_F7: nKeySym = VK_F7; break;
3466 case WXK_F8: nKeySym = VK_F8; break;
3467 case WXK_F9: nKeySym = VK_F9; break;
3468 case WXK_F10: nKeySym = VK_F10; break;
3469 case WXK_F11: nKeySym = VK_F11; break;
3470 case WXK_F12: nKeySym = VK_F12; break;
3471 case WXK_F13: nKeySym = VK_F13; break;
3472 case WXK_F14: nKeySym = VK_F14; break;
3473 case WXK_F15: nKeySym = VK_F15; break;
3474 case WXK_F16: nKeySym = VK_F16; break;
3475 case WXK_F17: nKeySym = VK_F17; break;
3476 case WXK_F18: nKeySym = VK_F18; break;
3477 case WXK_F19: nKeySym = VK_F19; break;
3478 case WXK_F20: nKeySym = VK_F20; break;
3479 case WXK_F21: nKeySym = VK_F21; break;
3480 case WXK_F22: nKeySym = VK_F22; break;
3481 case WXK_F23: nKeySym = VK_F23; break;
3482 case WXK_F24: nKeySym = VK_F24; break;
3483 case WXK_NUMLOCK: nKeySym = VK_NUMLOCK; break;
3484 case WXK_SCROLL: nKeySym = VK_SCRLLOCK; break;
3485 default:
cdf1e714 3486 {
61243a51
DW
3487 *bIsVirtual = FALSE;
3488 nKeySym = nId;
cdf1e714
DW
3489 break;
3490 }
86de7616 3491 }
61243a51
DW
3492 return nKeySym;
3493} // end of wxCharCodeWXToOS2
86de7616 3494
61243a51 3495wxWindow* wxGetActiveWindow()
cdf1e714 3496{
61243a51 3497 HWND hWnd = ::WinQueryActiveWindow(HWND_DESKTOP);
86de7616 3498
61243a51
DW
3499 if (hWnd != 0)
3500 {
3501 return wxFindWinFromHandle((WXHWND)hWnd);
3502 }
3503 return NULL;
3504} // end of wxGetActiveWindow
cdf1e714
DW
3505
3506#ifdef __WXDEBUG__
61243a51
DW
3507const char* wxGetMessageName(
3508 int nMessage)
cdf1e714 3509{
61243a51 3510 switch (nMessage)
86de7616 3511 {
cdf1e714
DW
3512 case 0x0000: return "WM_NULL";
3513 case 0x0001: return "WM_CREATE";
3514 case 0x0002: return "WM_DESTROY";
61243a51
DW
3515 case 0x0004: return "WM_ENABLE";
3516 case 0x0005: return "WM_SHOW";
3517 case 0x0006: return "WM_MOVE";
3518 case 0x0007: return "WM_SIZE";
3519 case 0x0008: return "WM_ADJUSTWINDOWPOS";
3520 case 0x0009: return "WM_CALCVALIDRECTS";
3521 case 0x000A: return "WM_SETWINDOWPARAMS";
3522 case 0x000B: return "WM_QUERYWINDOWPARAMS";
3523 case 0x000C: return "WM_HITTEST";
3524 case 0x000D: return "WM_ACTIVATE";
3525 case 0x000F: return "WM_SETFOCUS";
3526 case 0x0010: return "WM_SETSELECTION";
3527 case 0x0011: return "WM_PPAINT";
3528 case 0x0012: return "WM_PSETFOCUS";
3529 case 0x0013: return "WM_PSYSCOLORCHANGE";
3530 case 0x0014: return "WM_PSIZE";
3531 case 0x0015: return "WM_PACTIVATE";
3532 case 0x0016: return "WM_PCONTROL";
3533 case 0x0020: return "WM_COMMAND";
3534 case 0x0021: return "WM_SYSCOMMAND";
3535 case 0x0022: return "WM_HELP";
3536 case 0x0023: return "WM_PAINT";
3537 case 0x0024: return "WM_TIMER";
3538 case 0x0025: return "WM_SEM1";
3539 case 0x0026: return "WM_SEM2";
3540 case 0x0027: return "WM_SEM3";
3541 case 0x0028: return "WM_SEM4";
3542 case 0x0029: return "WM_CLOSE";
3543 case 0x002A: return "WM_QUIT";
3544 case 0x002B: return "WM_SYSCOLORCHANGE";
3545 case 0x002D: return "WM_SYSVALUECHANGE";
3546 case 0x002E: return "WM_APPTERMINATENOTIFY";
3547 case 0x002F: return "WM_PRESPARAMCHANGED";
3548 // Control notification messages
3549 case 0x0030: return "WM_CONTROL";
3550 case 0x0031: return "WM_VSCROLL";
3551 case 0x0032: return "WM_HSCROLL";
3552 case 0x0033: return "WM_INITMENU";
3553 case 0x0034: return "WM_MENUSELECT";
3554 case 0x0035: return "WM_MENUSEND";
3555 case 0x0036: return "WM_DRAWITEM";
3556 case 0x0037: return "WM_MEASUREITEM";
3557 case 0x0038: return "WM_CONTROLPOINTER";
3558 case 0x003A: return "WM_QUERYDLGCODE";
3559 case 0x003B: return "WM_INITDLG";
3560 case 0x003C: return "WM_SUBSTITUTESTRING";
3561 case 0x003D: return "WM_MATCHMNEMONIC";
3562 case 0x003E: return "WM_SAVEAPPLICATION";
3563 case 0x0129: return "WM_CTLCOLORCHANGE";
3564 case 0x0130: return "WM_QUERYCTLTYPE";
3565 // Frame messages
3566 case 0x0040: return "WM_FLASHWINDOW";
3567 case 0x0041: return "WM_FORMATFRAME";
3568 case 0x0042: return "WM_UPDATEFRAME";
3569 case 0x0043: return "WM_FOCUSCHANGE";
3570 case 0x0044: return "WM_SETBORDERSIZE";
3571 case 0x0045: return "WM_TRACKFRAME";
3572 case 0x0046: return "WM_MINMAXFRAME";
3573 case 0x0047: return "WM_SETICON";
3574 case 0x0048: return "WM_QUERYICON";
3575 case 0x0049: return "WM_SETACCELTABLE";
3576 case 0x004A: return "WM_QUERYACCELTABLE";
3577 case 0x004B: return "WM_TRANSLATEACCEL";
3578 case 0x004C: return "WM_QUERYTRACKINFO";
3579 case 0x004D: return "WM_QUERYBORDERSIZE";
3580 case 0x004E: return "WM_NEXTMENU";
3581 case 0x004F: return "WM_ERASEBACKGROUND";
3582 case 0x0050: return "WM_QUERYFRAMEINFO";
3583 case 0x0051: return "WM_QUERYFOCUSCHAIN";
3584 case 0x0052: return "WM_OWNERPOSCHANGE";
3585 case 0x0053: return "WM_CACLFRAMERECT";
3586 case 0x0055: return "WM_WINDOWPOSCHANGED";
3587 case 0x0056: return "WM_ADJUSTFRAMEPOS";
3588 case 0x0059: return "WM_QUERYFRAMECTLCOUNT";
3589 case 0x005B: return "WM_QUERYHELPINFO";
3590 case 0x005C: return "WM_SETHELPINFO";
3591 case 0x005D: return "WM_ERROR";
3592 case 0x005E: return "WM_REALIZEPALETTE";
3593 // Clipboard messages
3594 case 0x0060: return "WM_RENDERFMT";
3595 case 0x0061: return "WM_RENDERALLFMTS";
3596 case 0x0062: return "WM_DESTROYCLIPBOARD";
3597 case 0x0063: return "WM_PAINTCLIPBOARD";
3598 case 0x0064: return "WM_SIZECLIPBOARD";
3599 case 0x0065: return "WM_HSCROLLCLIPBOARD";
3600 case 0x0066: return "WM_VSCROLLCLIPBOARD";
3601 case 0x0067: return "WM_DRAWCLIPBOARD";
3602 // mouse messages
3603 case 0x0070: return "WM_MOUSEMOVE";
3604 case 0x0071: return "WM_BUTTON1DOWN";
3605 case 0x0072: return "WM_BUTTON1UP";
3606 case 0x0073: return "WM_BUTTON1DBLCLK";
3607 case 0x0074: return "WM_BUTTON2DOWN";
3608 case 0x0075: return "WM_BUTTON2UP";
3609 case 0x0076: return "WM_BUTTON2DBLCLK";
3610 case 0x0077: return "WM_BUTTON3DOWN";
3611 case 0x0078: return "WM_BUTTON3UP";
3612 case 0x0079: return "WM_BUTTON3DBLCLK";
3613 case 0x007D: return "WM_MOUSEMAP";
3614 case 0x007E: return "WM_VRNDISABLED";
3615 case 0x007F: return "WM_VRNENABLED";
3616 case 0x0410: return "WM_CHORD";
3617 case 0x0411: return "WM_BUTTON1MOTIONSTART";
3618 case 0x0412: return "WM_BUTTON1MOTIONEND";
3619 case 0x0413: return "WM_BUTTON1CLICK";
3620 case 0x0414: return "WM_BUTTON2MOTIONSTART";
3621 case 0x0415: return "WM_BUTTON2MOTIONEND";
3622 case 0x0416: return "WM_BUTTON2CLICK";
3623 case 0x0417: return "WM_BUTTON3MOTIONSTART";
3624 case 0x0418: return "WM_BUTTON3MOTIONEND";
3625 case 0x0419: return "WM_BUTTON3CLICK";
3626 case 0x0420: return "WM_BEGINDRAG";
3627 case 0x0421: return "WM_ENDDRAG";
3628 case 0x0422: return "WM_SINGLESELECT";
3629 case 0x0423: return "WM_OPEN";
3630 case 0x0424: return "WM_CONTEXTMENU";
3631 case 0x0425: return "WM_CONTEXTHELP";
3632 case 0x0426: return "WM_TEXTEDIT";
3633 case 0x0427: return "WM_BEGINSELECT";
3634 case 0x0228: return "WM_ENDSELECT";
3635 case 0x0429: return "WM_PICKUP";
3636 case 0x04C0: return "WM_PENFIRST";
3637 case 0x04FF: return "WM_PENLAST";
3638 case 0x0500: return "WM_MMPMFIRST";
3639 case 0x05FF: return "WM_MMPMLAST";
3640 case 0x0600: return "WM_STDDLGFIRST";
3641 case 0x06FF: return "WM_STDDLGLAST";
3642 case 0x0BD0: return "WM_BIDI_FIRST";
3643 case 0x0BFF: return "WM_BIDI_LAST";
3644 // keyboard input
3645 case 0x007A: return "WM_CHAR";
3646 case 0x007B: return "WM_VIOCHAR";
3647 // DDE messages
3648 case 0x00A0: return "WM_DDE_INITIATE";
3649 case 0x00A1: return "WM_DDE_REQUEST";
3650 case 0x00A2: return "WM_DDE_ACK";
3651 case 0x00A3: return "WM_DDE_DATA";
3652 case 0x00A4: return "WM_DDE_ADVISE";
3653 case 0x00A5: return "WM_DDE_UNADVISE";
3654 case 0x00A6: return "WM_DDE_POKE";
3655 case 0x00A7: return "WM_DDE_EXECUTE";
3656 case 0x00A8: return "WM_DDE_TERMINATE";
3657 case 0x00A9: return "WM_DDE_INITIATEACK";
3658 case 0x00AF: return "WM_DDE_LAST";
3659 // Buttons
3660 case 0x0120: return "BM_CLICK";
3661 case 0x0121: return "BM_QUERYCHECKINDEX";
3662 case 0x0122: return "BM_QUERYHILITE";
3663 case 0x0123: return "BM_SETHILITE";
3664 case 0x0124: return "BM_QUERYCHECK";
3665 case 0x0125: return "BM_SETCHECK";
3666 case 0x0126: return "BM_SETDEFAULT";
3667 case 0x0128: return "BM_AUTOSIZE";
3668 // Combo boxes
3669 case 0x029A: return "CBID_LIST";
3670 case 0x029B: return "CBID_EDIT";
3671 case 0x0170: return "CBM_SHOWLIST";
3672 case 0x0171: return "CBM_HILITE";
3673 case 0x0172: return "CBM_ISLISTSHOWING";
3674 // Edit fields
3675 case 0x0140: return "EM_QUERYCHANGED";
3676 case 0x0141: return "EM_QUERYSEL";
3677 case 0x0142: return "EM_SETSEL";
3678 case 0x0143: return "EM_SETTEXTLIMIT";
3679 case 0x0144: return "EM_CUT";
3680 case 0x0145: return "EM_COPY";
3681 case 0x0146: return "EM_CLEAR";
3682 case 0x0147: return "EM_PASTE";
3683 case 0x0148: return "EM_QUERYFIRSTCHAR";
3684 case 0x0149: return "EM_SETFIRSTCHAR";
3685 case 0x014A: return "EM_QUERYREADONLY";
3686 case 0x014B: return "EM_SETREADONLY";
3687 case 0x014C: return "EM_SETINSERTMODE";
3688 // Listboxes
3689 case 0x0160: return "LM_QUERYITEMCOUNT";
3690 case 0x0161: return "LM_INSERTITEM";
3691 case 0x0162: return "LM_SETOPENINDEX";
3692 case 0x0163: return "LM_DELETEITEM";
3693 case 0x0164: return "LM_SELECTITEM";
3694 case 0x0165: return "LM_QUERYSELECTION";
3695 case 0x0166: return "LM_SETITEMTEXT";
3696 case 0x0167: return "LM_QUERYITEMTEXTLENGTH";
3697 case 0x0168: return "LM_QUERYITEMTEXT";
3698 case 0x0169: return "LM_SETITEMHANDLE";
3699 case 0x016A: return "LM_QUERYITEMHANDLE";
3700 case 0x016B: return "LM_SEARCHSTRING";
3701 case 0x016C: return "LM_SETITEMHEIGHT";
3702 case 0x016D: return "LM_QUERYTOPINDEX";
3703 case 0x016E: return "LM_DELETEALL";
3704 case 0x016F: return "LM_INSERTMULITEMS";
3705 case 0x0660: return "LM_SETITEMWIDTH";
3706 // Menus
3707 case 0x0180: return "MM_INSERTITEM";
3708 case 0x0181: return "MM_DELETEITEM";
3709 case 0x0182: return "MM_QUERYITEM";
3710 case 0x0183: return "MM_SETITEM";
3711 case 0x0184: return "MM_QUERYITEMCOUNT";
3712 case 0x0185: return "MM_STARTMENUMODE";
3713 case 0x0186: return "MM_ENDMENUMODE";
3714 case 0x0188: return "MM_REMOVEITEM";
3715 case 0x0189: return "MM_SELECTITEM";
3716 case 0x018A: return "MM_QUERYSELITEMID";
3717 case 0x018B: return "MM_QUERYITEMTEXT";
3718 case 0x018C: return "MM_QUERYITEMTEXTLENGTH";
3719 case 0x018D: return "MM_SETITEMHANDLE";
3720 case 0x018E: return "MM_SETITEMTEXT";
3721 case 0x018F: return "MM_ITEMPOSITIONFROMID";
3722 case 0x0190: return "MM_ITEMIDFROMPOSITION";
3723 case 0x0191: return "MM_QUERYITEMATTR";
3724 case 0x0192: return "MM_SETITEMATTR";
3725 case 0x0193: return "MM_ISITEMVALID";
3726 case 0x0194: return "MM_QUERYITEMRECT";
3727 case 0x0431: return "MM_QUERYDEFAULTITEMID";
3728 case 0x0432: return "MM_SETDEFAULTITEMID";
3729 // Scrollbars
3730 case 0x01A0: return "SBM_SETSCROLLBAR";
3731 case 0x01A1: return "SBM_SETPOS";
3732 case 0x01A2: return "SBM_QUERYPOS";
3733 case 0x01A3: return "SBM_QUERYRANGE";
3734 case 0x01A6: return "SBM_SETTHUMBSIZE";
3735
3736 // Help messages
3737 case 0x0F00: return "WM_HELPBASE";
3738 case 0x0FFF: return "WM_HELPTOP";
3739 // Beginning of user defined messages
3740 case 0x1000: return "WM_USER";
3741
3742 // wxWindows user defined types
cdf1e714
DW
3743
3744 // listview
61243a51 3745 // case 0x1000 + 0: return "LVM_GETBKCOLOR";
cdf1e714
DW
3746 case 0x1000 + 1: return "LVM_SETBKCOLOR";
3747 case 0x1000 + 2: return "LVM_GETIMAGELIST";
3748 case 0x1000 + 3: return "LVM_SETIMAGELIST";
3749 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
3750 case 0x1000 + 5: return "LVM_GETITEMA";
3751 case 0x1000 + 75: return "LVM_GETITEMW";
3752 case 0x1000 + 6: return "LVM_SETITEMA";
3753 case 0x1000 + 76: return "LVM_SETITEMW";
3754 case 0x1000 + 7: return "LVM_INSERTITEMA";
3755 case 0x1000 + 77: return "LVM_INSERTITEMW";
3756 case 0x1000 + 8: return "LVM_DELETEITEM";
3757 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
3758 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
3759 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
3760 case 0x1000 + 12: return "LVM_GETNEXTITEM";
3761 case 0x1000 + 13: return "LVM_FINDITEMA";
3762 case 0x1000 + 83: return "LVM_FINDITEMW";
3763 case 0x1000 + 14: return "LVM_GETITEMRECT";
3764 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
3765 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
3766 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
3767 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
3768 case 0x1000 + 18: return "LVM_HITTEST";
3769 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
3770 case 0x1000 + 20: return "LVM_SCROLL";
3771 case 0x1000 + 21: return "LVM_REDRAWITEMS";
3772 case 0x1000 + 22: return "LVM_ARRANGE";
3773 case 0x1000 + 23: return "LVM_EDITLABELA";
3774 case 0x1000 + 118: return "LVM_EDITLABELW";
3775 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
3776 case 0x1000 + 25: return "LVM_GETCOLUMNA";
3777 case 0x1000 + 95: return "LVM_GETCOLUMNW";
3778 case 0x1000 + 26: return "LVM_SETCOLUMNA";
3779 case 0x1000 + 96: return "LVM_SETCOLUMNW";
3780 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
3781 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
3782 case 0x1000 + 28: return "LVM_DELETECOLUMN";
3783 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
3784 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
3785 case 0x1000 + 31: return "LVM_GETHEADER";
3786 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
3787 case 0x1000 + 34: return "LVM_GETVIEWRECT";
3788 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
3789 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
3790 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
3791 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
3792 case 0x1000 + 39: return "LVM_GETTOPINDEX";
3793 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
3794 case 0x1000 + 41: return "LVM_GETORIGIN";
3795 case 0x1000 + 42: return "LVM_UPDATE";
3796 case 0x1000 + 43: return "LVM_SETITEMSTATE";
3797 case 0x1000 + 44: return "LVM_GETITEMSTATE";
3798 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
3799 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
3800 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
3801 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
3802 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
3803 case 0x1000 + 48: return "LVM_SORTITEMS";
3804 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
3805 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
3806 case 0x1000 + 51: return "LVM_GETITEMSPACING";
3807 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
3808 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
3809 case 0x1000 + 53: return "LVM_SETICONSPACING";
3810 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
3811 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
3812 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
3813 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
3814 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
3815 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
3816 case 0x1000 + 60: return "LVM_SETHOTITEM";
3817 case 0x1000 + 61: return "LVM_GETHOTITEM";
3818 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
3819 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
3820 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
3821 case 0x1000 + 65: return "LVM_SETWORKAREA";
3822
3823 // tree view
3824 case 0x1100 + 0: return "TVM_INSERTITEMA";
3825 case 0x1100 + 50: return "TVM_INSERTITEMW";
3826 case 0x1100 + 1: return "TVM_DELETEITEM";
3827 case 0x1100 + 2: return "TVM_EXPAND";
3828 case 0x1100 + 4: return "TVM_GETITEMRECT";
3829 case 0x1100 + 5: return "TVM_GETCOUNT";
3830 case 0x1100 + 6: return "TVM_GETINDENT";
3831 case 0x1100 + 7: return "TVM_SETINDENT";
3832 case 0x1100 + 8: return "TVM_GETIMAGELIST";
3833 case 0x1100 + 9: return "TVM_SETIMAGELIST";
3834 case 0x1100 + 10: return "TVM_GETNEXTITEM";
3835 case 0x1100 + 11: return "TVM_SELECTITEM";
3836 case 0x1100 + 12: return "TVM_GETITEMA";
3837 case 0x1100 + 62: return "TVM_GETITEMW";
3838 case 0x1100 + 13: return "TVM_SETITEMA";
3839 case 0x1100 + 63: return "TVM_SETITEMW";
3840 case 0x1100 + 14: return "TVM_EDITLABELA";
3841 case 0x1100 + 65: return "TVM_EDITLABELW";
3842 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
3843 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
3844 case 0x1100 + 17: return "TVM_HITTEST";
3845 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
3846 case 0x1100 + 19: return "TVM_SORTCHILDREN";
3847 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
3848 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
3849 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
3850 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
3851 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
3852 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
3853 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
3854
3855 // header
3856 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
3857 case 0x1200 + 1: return "HDM_INSERTITEMA";
3858 case 0x1200 + 10: return "HDM_INSERTITEMW";
3859 case 0x1200 + 2: return "HDM_DELETEITEM";
3860 case 0x1200 + 3: return "HDM_GETITEMA";
3861 case 0x1200 + 11: return "HDM_GETITEMW";
3862 case 0x1200 + 4: return "HDM_SETITEMA";
3863 case 0x1200 + 12: return "HDM_SETITEMW";
3864 case 0x1200 + 5: return "HDM_LAYOUT";
3865 case 0x1200 + 6: return "HDM_HITTEST";
3866 case 0x1200 + 7: return "HDM_GETITEMRECT";
3867 case 0x1200 + 8: return "HDM_SETIMAGELIST";
3868 case 0x1200 + 9: return "HDM_GETIMAGELIST";
3869 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
3870 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
3871 case 0x1200 + 17: return "HDM_GETORDERARRAY";
3872 case 0x1200 + 18: return "HDM_SETORDERARRAY";
3873 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
3874
3875 // tab control
3876 case 0x1300 + 2: return "TCM_GETIMAGELIST";
3877 case 0x1300 + 3: return "TCM_SETIMAGELIST";
3878 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
3879 case 0x1300 + 5: return "TCM_GETITEMA";
3880 case 0x1300 + 60: return "TCM_GETITEMW";
3881 case 0x1300 + 6: return "TCM_SETITEMA";
3882 case 0x1300 + 61: return "TCM_SETITEMW";
3883 case 0x1300 + 7: return "TCM_INSERTITEMA";
3884 case 0x1300 + 62: return "TCM_INSERTITEMW";
3885 case 0x1300 + 8: return "TCM_DELETEITEM";
3886 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
3887 case 0x1300 + 10: return "TCM_GETITEMRECT";
3888 case 0x1300 + 11: return "TCM_GETCURSEL";
3889 case 0x1300 + 12: return "TCM_SETCURSEL";
3890 case 0x1300 + 13: return "TCM_HITTEST";
3891 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
3892 case 0x1300 + 40: return "TCM_ADJUSTRECT";
3893 case 0x1300 + 41: return "TCM_SETITEMSIZE";
3894 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
3895 case 0x1300 + 43: return "TCM_SETPADDING";
3896 case 0x1300 + 44: return "TCM_GETROWCOUNT";
3897 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
3898 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
3899 case 0x1300 + 47: return "TCM_GETCURFOCUS";
3900 case 0x1300 + 48: return "TCM_SETCURFOCUS";
3901 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
3902 case 0x1300 + 50: return "TCM_DESELECTALL";
3903
3904 // toolbar
61243a51
DW
3905 case WM_USER+1000+1: return "TB_ENABLEBUTTON";
3906 case WM_USER+1000+2: return "TB_CHECKBUTTON";
3907 case WM_USER+1000+3: return "TB_PRESSBUTTON";
3908 case WM_USER+1000+4: return "TB_HIDEBUTTON";
3909 case WM_USER+1000+5: return "TB_INDETERMINATE";
3910 case WM_USER+1000+9: return "TB_ISBUTTONENABLED";
3911 case WM_USER+1000+10: return "TB_ISBUTTONCHECKED";
3912 case WM_USER+1000+11: return "TB_ISBUTTONPRESSED";
3913 case WM_USER+1000+12: return "TB_ISBUTTONHIDDEN";
3914 case WM_USER+1000+13: return "TB_ISBUTTONINDETERMINATE";
3915 case WM_USER+1000+17: return "TB_SETSTATE";
3916 case WM_USER+1000+18: return "TB_GETSTATE";
3917 case WM_USER+1000+19: return "TB_ADDBITMAP";
3918 case WM_USER+1000+20: return "TB_ADDBUTTONS";
3919 case WM_USER+1000+21: return "TB_INSERTBUTTON";
3920 case WM_USER+1000+22: return "TB_DELETEBUTTON";
3921 case WM_USER+1000+23: return "TB_GETBUTTON";
3922 case WM_USER+1000+24: return "TB_BUTTONCOUNT";
3923 case WM_USER+1000+25: return "TB_COMMANDTOINDEX";
3924 case WM_USER+1000+26: return "TB_SAVERESTOREA";
3925 case WM_USER+1000+76: return "TB_SAVERESTOREW";
3926 case WM_USER+1000+27: return "TB_CUSTOMIZE";
3927 case WM_USER+1000+28: return "TB_ADDSTRINGA";
3928 case WM_USER+1000+77: return "TB_ADDSTRINGW";
3929 case WM_USER+1000+29: return "TB_GETITEMRECT";
3930 case WM_USER+1000+30: return "TB_BUTTONSTRUCTSIZE";
3931 case WM_USER+1000+31: return "TB_SETBUTTONSIZE";
3932 case WM_USER+1000+32: return "TB_SETBITMAPSIZE";
3933 case WM_USER+1000+33: return "TB_AUTOSIZE";
3934 case WM_USER+1000+35: return "TB_GETTOOLTIPS";
3935 case WM_USER+1000+36: return "TB_SETTOOLTIPS";
3936 case WM_USER+1000+37: return "TB_SETPARENT";
3937 case WM_USER+1000+39: return "TB_SETROWS";
3938 case WM_USER+1000+40: return "TB_GETROWS";
3939 case WM_USER+1000+42: return "TB_SETCMDID";
3940 case WM_USER+1000+43: return "TB_CHANGEBITMAP";
3941 case WM_USER+1000+44: return "TB_GETBITMAP";
3942 case WM_USER+1000+45: return "TB_GETBUTTONTEXTA";
3943 case WM_USER+1000+75: return "TB_GETBUTTONTEXTW";
3944 case WM_USER+1000+46: return "TB_REPLACEBITMAP";
3945 case WM_USER+1000+47: return "TB_SETINDENT";
3946 case WM_USER+1000+48: return "TB_SETIMAGELIST";
3947 case WM_USER+1000+49: return "TB_GETIMAGELIST";
3948 case WM_USER+1000+50: return "TB_LOADIMAGES";
3949 case WM_USER+1000+51: return "TB_GETRECT";
3950 case WM_USER+1000+52: return "TB_SETHOTIMAGELIST";
3951 case WM_USER+1000+53: return "TB_GETHOTIMAGELIST";
3952 case WM_USER+1000+54: return "TB_SETDISABLEDIMAGELIST";
3953 case WM_USER+1000+55: return "TB_GETDISABLEDIMAGELIST";
3954 case WM_USER+1000+56: return "TB_SETSTYLE";
3955 case WM_USER+1000+57: return "TB_GETSTYLE";
3956 case WM_USER+1000+58: return "TB_GETBUTTONSIZE";
3957 case WM_USER+1000+59: return "TB_SETBUTTONWIDTH";
3958 case WM_USER+1000+60: return "TB_SETMAXTEXTROWS";
3959 case WM_USER+1000+61: return "TB_GETTEXTROWS";
3960 case WM_USER+1000+41: return "TB_GETBITMAPFLAGS";
cdf1e714
DW
3961
3962 default:
3963 static char s_szBuf[128];
61243a51 3964 sprintf(s_szBuf, "<unknown message = %d>", nMessage);
cdf1e714 3965 return s_szBuf;
86de7616 3966 }
cdf1e714 3967 return NULL;
61243a51 3968} // end of wxGetMessageName
86de7616 3969
11e59d47
DW
3970#endif // __WXDEBUG__
3971
61243a51
DW
3972static void TranslateKbdEventToMouse(
3973 wxWindow* pWin
3974, int* pX
3975, int* pY
3976, ULONG* pFlags
3977)
3978{
3979 //
3980 // Construct the key mask
3981 ULONG& fwKeys = *pFlags;
3982
3983 fwKeys = VK_BUTTON2;
3984 if ((::WinGetKeyState(HWND_DESKTOP, VK_CTRL) & 0x100) != 0)
3985 fwKeys |= VK_CTRL;
3986 if ((::WinGetKeyState(HWND_DESKTOP, VK_SHIFT) & 0x100) != 0)
3987 fwKeys |= VK_SHIFT;
3988
3989 //
3990 // Simulate right mouse button click
3991 //
3992 POINTL vPoint;
3993
3994 ::WinQueryMsgPos(vHabmain, &vPoint);
3995 *pX = vPoint.x;
3996 *pY = vPoint.y;
3997
3998 pWin->ScreenToClient(pX, pY);
3999} // end of TranslateKbdEventToMouse
4000
cd212ee4
DW
4001// Find the wxWindow at the current mouse position, returning the mouse
4002// position.
f44fdfb0
DW
4003wxWindow* wxFindWindowAtPointer(
4004 wxPoint& rPt
4005)
cd212ee4
DW
4006{
4007 return wxFindWindowAtPoint(wxGetMousePosition());
4008}
4009
f44fdfb0
DW
4010wxWindow* wxFindWindowAtPoint(
4011 const wxPoint& rPt
4012)
cd212ee4 4013{
f44fdfb0 4014 POINTL vPt2;
cd212ee4 4015
f44fdfb0
DW
4016 vPt2.x = rPt.x;
4017 vPt2.y = rPt.y;
cd212ee4 4018
f44fdfb0
DW
4019 HWND hWndHit = ::WinWindowFromPoint(HWND_DESKTOP, &vPt2, FALSE);
4020 wxWindow* pWin = wxFindWinFromHandle((WXHWND)hWndHit) ;
4021 HWND hWnd = hWndHit;
4022
4023 //
cd212ee4 4024 // Try to find a window with a wxWindow associated with it
f44fdfb0
DW
4025 //
4026 while (!pWin && (hWnd != 0))
cd212ee4 4027 {
f44fdfb0
DW
4028 hWnd = ::WinQueryWindow(hWnd, QW_PARENT);
4029 pWin = wxFindWinFromHandle((WXHWND)hWnd) ;
cd212ee4 4030 }
f44fdfb0 4031 return pWin;
cd212ee4
DW
4032}
4033
f44fdfb0
DW
4034// Get the current mouse position.
4035wxPoint wxGetMousePosition()
4036{
4037 POINTL vPt;
4038
4039 ::WinQueryPointerPos(HWND_DESKTOP, &vPt);
4040 return wxPoint(vPt.x, vPt.y);
4041}
cd212ee4 4042