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