]> git.saurik.com Git - wxWidgets.git/blob - src/os2/window.cpp
Corrected test for _vsnprintf
[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 // Let Dialogs process
1679 //
1680 if (::WinSendMsg(pQMsg->hwnd, WM_QUERYDLGCODE, pQMsg, 0));
1681 return TRUE;
1682 }
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(m_hWnd, 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 if (!rc)
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 case WM_SYSCOMMAND:
1958 bProcessed = HandleSysCommand(wParam, lParam);
1959 break;
1960
1961 case WM_COMMAND:
1962 {
1963 WORD id, cmd;
1964 WXHWND hwnd;
1965 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
1966
1967 bProcessed = HandleCommand(id, cmd, hwnd);
1968 }
1969 break;
1970
1971 //
1972 // For these messages we must return TRUE if process the message
1973 //
1974 case WM_DRAWITEM:
1975 case WM_MEASUREITEM:
1976 {
1977 int idCtrl = (UINT)wParam;
1978 if ( uMsg == WM_DRAWITEM )
1979 {
1980 bProcessed = OS2OnDrawItem(idCtrl,
1981 (WXDRAWITEMSTRUCT *)lParam);
1982 }
1983 else
1984 {
1985 bProcessed = OS2OnMeasureItem(idCtrl,
1986 (WXMEASUREITEMSTRUCT *)lParam);
1987 }
1988
1989 if ( bProcessed )
1990 vRc.mResult = (MRESULT)TRUE;
1991 }
1992 break;
1993
1994 case WM_QUERYDLGCODE:
1995 if ( m_lDlgCode )
1996 {
1997 vRc.mResult = (MRESULT)m_lDlgCode;
1998 bProcessed = TRUE;
1999 }
2000 //
2001 //else: get the dlg code from the DefWindowProc()
2002 //
2003 break;
2004
2005 //
2006 // In OS/2 PM all keyboard events are of the WM_CHAR type. Virtual key and key-up
2007 // and key-down events are obtained from the WM_CHAR params.
2008 //
2009 case WM_CHAR:
2010 {
2011 USHORT uKeyFlags = SHORT1FROMMP((MPARAM)wParam);
2012
2013 if (uKeyFlags & KC_KEYUP)
2014 {
2015 bProcessed = HandleKeyUp((WXDWORD)wParam, lParam);
2016 break;
2017 }
2018 else // keydown event
2019 {
2020 //
2021 // If this has been processed by an event handler,
2022 // return 0 now (we've handled it). DON't RETURN
2023 // we still need to process further
2024 //
2025 HandleKeyDown((WXDWORD)wParam, lParam);
2026 if (uKeyFlags & KC_VIRTUALKEY)
2027 {
2028 USHORT uVk = SHORT2FROMMP((MPARAM)lParam);
2029
2030 //
2031 // We consider these message "not interesting" to OnChar
2032 //
2033 if (uVk == VK_SHIFT || uVk == VK_CTRL )
2034 {
2035 bProcessed = TRUE;
2036 break;
2037 }
2038 switch(uVk)
2039 {
2040 //
2041 // Avoid duplicate messages to OnChar for these ASCII keys: they
2042 // will be translated by TranslateMessage() and received in WM_CHAR
2043 case VK_ESC:
2044 case VK_SPACE:
2045 case VK_ENTER:
2046 case VK_BACKSPACE:
2047 case VK_TAB:
2048 // But set processed to FALSE, not TRUE to still pass them to
2049 // the control's default window proc - otherwise built-in
2050 // keyboard handling won't work
2051 bProcessed = FALSE;
2052 break;
2053
2054 case VK_LEFT:
2055 case VK_RIGHT:
2056 case VK_DOWN:
2057 case VK_UP:
2058 default:
2059 bProcessed = HandleChar((WXDWORD)wParam, lParam);
2060 }
2061 break;
2062 }
2063 else // WM_CHAR -- Always an ASCII character
2064 {
2065 bProcessed = HandleChar((WXDWORD)wParam, lParam, TRUE);
2066 break;
2067 }
2068 }
2069 }
2070
2071 case WM_HSCROLL:
2072 case WM_VSCROLL:
2073 {
2074 WXWORD wCode;
2075 WXWORD wPos;
2076 WXHWND hWnd;
2077 UnpackScroll( wParam
2078 ,lParam
2079 ,&wCode
2080 ,&wPos
2081 ,&hWnd
2082 );
2083
2084 bProcessed = OS2OnScroll( uMsg == WM_HSCROLL ? wxHORIZONTAL
2085 : wxVERTICAL
2086 ,wCode
2087 ,wPos
2088 ,hWnd
2089 );
2090 }
2091 break;
2092
2093 #if defined(__VISAGECPP__) && (__IBMCPP__ >= 400)
2094 case WM_CTLCOLORCHANGE:
2095 {
2096 bProcessed = HandleCtlColor(&vRc.hBrush);
2097 }
2098 break;
2099 #endif
2100 //
2101 // Instead of CTLCOLOR messages PM sends QUERYWINDOWPARAMS to
2102 // things such as colors and fonts and such
2103 //
2104 case WM_QUERYWINDOWPARAMS:
2105 {
2106 PWNDPARAMS pWndParams = (PWNDPARAMS)wParam;
2107
2108 bProcessed = HandleWindowParams( pWndParams
2109 ,lParam
2110 );
2111 }
2112 break;
2113
2114 // the return value for this message is ignored
2115 case WM_SYSCOLORCHANGE:
2116 bProcessed = HandleSysColorChange();
2117 break;
2118
2119 case WM_REALIZEPALETTE:
2120 bProcessed = HandlePaletteChanged();
2121 break;
2122
2123 case WM_PRESPARAMCHANGED:
2124 bProcessed = HandlePresParamChanged(wParam);
2125 break;
2126
2127 // move this to wxFrame
2128 case WM_ERASEBACKGROUND:
2129 bProcessed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2130 if (bProcessed)
2131 {
2132 //
2133 // We processed the message, i.e. erased the background
2134 //
2135 vRc.mResult = (MRESULT)TRUE;
2136 }
2137 break;
2138
2139 // move all drag and drops to wxDrg
2140 case WM_ENDDRAG:
2141 bProcessed = HandleEndDrag(wParam);
2142 break;
2143
2144 case WM_INITDLG:
2145 bProcessed = HandleInitDialog((WXHWND)(HWND)wParam);
2146
2147 if ( bProcessed )
2148 {
2149 // we never set focus from here
2150 vRc.mResult = FALSE;
2151 }
2152 break;
2153
2154 // wxFrame specific message
2155 case WM_MINMAXFRAME:
2156 bProcessed = HandleGetMinMaxInfo((PSWP)wParam);
2157 break;
2158
2159 case WM_SYSVALUECHANGED:
2160 // TODO: do something
2161 vRc.mResult = (MRESULT)TRUE;
2162 break;
2163
2164 //
2165 // Comparable to WM_SETPOINTER for windows, only for just controls
2166 //
2167 case WM_CONTROLPOINTER:
2168 bProcessed = HandleSetCursor( SHORT1FROMMP(wParam) // Control ID
2169 ,(HWND)lParam // Cursor Handle
2170 );
2171 if (bProcessed )
2172 {
2173 //
2174 // Returning TRUE stops the DefWindowProc() from further
2175 // processing this message - exactly what we need because we've
2176 // just set the cursor.
2177 //
2178 vRc.mResult = (MRESULT)TRUE;
2179 }
2180 break;
2181 }
2182
2183 if (!bProcessed)
2184 {
2185 #ifdef __WXDEBUG__
2186 wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
2187 wxGetMessageName(uMsg));
2188 #endif // __WXDEBUG__
2189 vRc.mResult = OS2DefWindowProc(uMsg, wParam, lParam);
2190 }
2191 return vRc.mResult;
2192 } // end of wxWindow::OS2WindowProc
2193
2194 //
2195 // Dialog window proc
2196 //
2197 MRESULT wxDlgProc(
2198 HWND hWnd
2199 , UINT uMsg
2200 , MPARAM wParam
2201 , MPARAM lParam)
2202 {
2203 if (uMsg == WM_INITDLG)
2204 {
2205 //
2206 // For this message, returning TRUE tells system to set focus to the
2207 // first control in the dialog box
2208 //
2209 return (MRESULT)TRUE;
2210 }
2211 else
2212 {
2213 //
2214 // For all the other ones, FALSE means that we didn't process the
2215 // message
2216 //
2217 return (MRESULT)0;
2218 }
2219 } // end of wxDlgProc
2220
2221 wxWindow* wxFindWinFromHandle(
2222 WXHWND hWnd
2223 )
2224 {
2225 wxNode* pNode = wxWinHandleList->Find((long)hWnd);
2226
2227 if (!pNode)
2228 return NULL;
2229 return (wxWindow *)pNode->Data();
2230 } // end of wxFindWinFromHandle
2231
2232 void wxAssociateWinWithHandle(
2233 HWND hWnd
2234 , wxWindow* pWin
2235 )
2236 {
2237 //
2238 // Adding NULL hWnd is (first) surely a result of an error and
2239 // (secondly) breaks menu command processing
2240 //
2241 wxCHECK_RET( hWnd != (HWND)NULL,
2242 wxT("attempt to add a NULL hWnd to window list ignored") );
2243
2244
2245 wxWindow* pOldWin = wxFindWinFromHandle((WXHWND) hWnd);
2246
2247 if (pOldWin && (pOldWin != pWin))
2248 {
2249 wxString str(pWin->GetClassInfo()->GetClassName());
2250 wxLogError( "Bug! Found existing HWND %X for new window of class %s"
2251 ,(int)hWnd
2252 ,(const char*)str
2253 );
2254 }
2255 else if (!pOldWin)
2256 {
2257 wxWinHandleList->Append( (long)hWnd
2258 ,pWin
2259 );
2260 }
2261 } // end of wxAssociateWinWithHandle
2262
2263 void wxRemoveHandleAssociation(
2264 wxWindow* pWin
2265 )
2266 {
2267 wxWinHandleList->DeleteObject(pWin);
2268 } // end of wxRemoveHandleAssociation
2269
2270 //
2271 // Default destroyer - override if you destroy it in some other way
2272 // (e.g. with MDI child windows)
2273 //
2274 void wxWindow::OS2DestroyWindow()
2275 {
2276 }
2277
2278 void wxWindow::OS2DetachWindowMenu()
2279 {
2280 if (m_hMenu)
2281 {
2282 HMENU hMenu = (HMENU)m_hMenu;
2283
2284 int nN = (int)::WinSendMsg(hMenu, MM_QUERYITEMCOUNT, 0, 0);
2285 int i;
2286
2287 for (i = 0; i < nN; i++)
2288 {
2289 wxChar zBuf[100];
2290 int nChars = (int)::WinSendMsg( hMenu
2291 ,MM_QUERYITEMTEXT
2292 ,MPFROM2SHORT(i, nN)
2293 ,zBuf
2294 );
2295 if (!nChars)
2296 {
2297 wxLogLastError(wxT("GetMenuString"));
2298 continue;
2299 }
2300
2301 if (wxStrcmp(zBuf, wxT("&Window")) == 0)
2302 {
2303 ::WinSendMsg(hMenu, MM_DELETEITEM, MPFROM2SHORT(i, TRUE), 0);
2304 break;
2305 }
2306 }
2307 }
2308 } // end of wxWindow::OS2DetachWindowMenu
2309
2310 bool wxWindow::OS2Create(
2311 WXHWND hParent
2312 , PSZ zClass
2313 , const wxChar* zTitle
2314 , WXDWORD dwStyle
2315 , long lX
2316 , long lY
2317 , long lWidth
2318 , long lHeight
2319 , WXHWND hOwner
2320 , WXHWND hZOrder
2321 , unsigned long ulId
2322 , void* pCtlData
2323 , void* pPresParams
2324 )
2325 {
2326 ERRORID vError;
2327 wxString sError;
2328 long lX1 = (long)CW_USEDEFAULT;
2329 long lY1 = 0L;
2330 long lWidth1 = (long)CW_USEDEFAULT;
2331 long lHeight1 = 100L;
2332 int nControlId = 0;
2333
2334 //
2335 // Find parent's size, if it exists, to set up a possible default
2336 // panel size the size of the parent window
2337 //
2338 RECTL vParentRect;
2339 HWND hWndClient;
2340
2341 if (lX > -1L)
2342 lX1 = lX;
2343 if (lY > -1L)
2344 lY1 = lY;
2345 if (lWidth > -1L)
2346 lWidth1 = lWidth;
2347 if (lHeight > -1L)
2348 lHeight1 = lHeight;
2349
2350 wxWndHook = this;
2351
2352 //
2353 // check to see if the new window is a standard control
2354 //
2355 if ((ULONG)zClass == (ULONG)WC_BUTTON ||
2356 (ULONG)zClass == (ULONG)WC_COMBOBOX ||
2357 (ULONG)zClass == (ULONG)WC_CONTAINER ||
2358 (ULONG)zClass == (ULONG)WC_ENTRYFIELD ||
2359 (ULONG)zClass == (ULONG)WC_FRAME ||
2360 (ULONG)zClass == (ULONG)WC_LISTBOX ||
2361 (ULONG)zClass == (ULONG)WC_MENU ||
2362 (ULONG)zClass == (ULONG)WC_NOTEBOOK ||
2363 (ULONG)zClass == (ULONG)WC_SCROLLBAR ||
2364 (ULONG)zClass == (ULONG)WC_SPINBUTTON ||
2365 (ULONG)zClass == (ULONG)WC_STATIC ||
2366 (ULONG)zClass == (ULONG)WC_TITLEBAR ||
2367 (ULONG)zClass == (ULONG)WC_VALUESET
2368 )
2369 {
2370 nControlId = ulId;
2371 }
2372
2373 //
2374 // We will either have a registered class via string name or a standard PM Class via a long
2375 //
2376 m_hWnd = (WXHWND)::WinCreateWindow( (HWND)hParent
2377 ,zClass
2378 ,(PSZ)zTitle ? zTitle : wxT("")
2379 ,(ULONG)dwStyle
2380 ,(LONG)lX1
2381 ,(LONG)lY1
2382 ,(LONG)lWidth
2383 ,(LONG)lHeight
2384 ,NULLHANDLE
2385 ,HWND_TOP
2386 ,(ULONG)ulId
2387 ,pCtlData
2388 ,pPresParams
2389 );
2390 if (!m_hWnd)
2391 {
2392 vError = ::WinGetLastError(vHabmain);
2393 sError = wxPMErrorToStr(vError);
2394 wxLogError("Can't create window of class %s!. Error: %s\n", zClass, sError);
2395 return FALSE;
2396 }
2397 ::WinSetWindowULong(m_hWnd, QWL_USER, (ULONG) this);
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 wxPaintEvent vEvent;
2800 HPS hPS;
2801 RECTL vRect;
2802
2803 if (::WinQueryUpdateRegion(GetHwnd(), hRgn) == RGN_NULL)
2804 {
2805 wxLogLastError("CreateRectRgn");
2806 return FALSE;
2807 }
2808 m_updateRegion = wxRegion(hRgn);
2809
2810 hPS = WinBeginPaint(GetHwnd(), 0L, &vRect);
2811 WinFillRect(hPS, &vRect, SYSCLR_WINDOW);
2812 WinEndPaint(hPS);
2813
2814 vEvent.SetEventObject(this);
2815 return (GetEventHandler()->ProcessEvent(vEvent));
2816 } // end of wxWindow::HandlePaint
2817
2818 bool wxWindow::HandleEraseBkgnd(WXHDC hdc)
2819 {
2820 // TODO: will have to worry about this later as part of
2821 // the handling of changed presentation parameters
2822 /*
2823 if ( ::IsIconic(GetHwnd()) )
2824 return TRUE;
2825
2826 wxDC dc;
2827
2828 dc.SetHDC(hdc);
2829 dc.SetWindow(this);
2830 dc.BeginDrawing();
2831
2832 wxEraseEvent event(m_windowId, &dc);
2833 event.SetEventObject(this);
2834 bool rc = GetEventHandler()->ProcessEvent(event);
2835
2836 dc.EndDrawing();
2837 dc.SelectOldObjects(hdc);
2838 dc.SetHDC((WXHDC) NULL);
2839 */
2840 return TRUE;
2841 } // end of wxWindow::HandleEraseBkgnd
2842
2843 void wxWindow::OnEraseBackground(
2844 wxEraseEvent& rEvent
2845 )
2846 {
2847 // TODO:
2848 } // end of wxWindow::OnEraseBackground
2849
2850 // ---------------------------------------------------------------------------
2851 // moving and resizing
2852 // ---------------------------------------------------------------------------
2853
2854 bool wxWindow::HandleMinimize()
2855 {
2856 wxIconizeEvent vEvent(m_windowId);
2857
2858 vEvent.SetEventObject(this);
2859 return GetEventHandler()->ProcessEvent(vEvent);
2860 } // end of wxWindow::HandleMinimize
2861
2862 bool wxWindow::HandleMaximize()
2863 {
2864 wxMaximizeEvent vEvent(m_windowId);
2865
2866 vEvent.SetEventObject(this);
2867 return GetEventHandler()->ProcessEvent(vEvent);
2868 } // end of wxWindow::HandleMaximize
2869
2870 bool wxWindow::HandleMove(
2871 int nX
2872 , int nY
2873 )
2874 {
2875 wxMoveEvent vEvent( wxPoint( nX
2876 ,nY
2877 )
2878 ,m_windowId
2879 );
2880
2881 vEvent.SetEventObject(this);
2882 return GetEventHandler()->ProcessEvent(vEvent);
2883 } // end of wxWindow::HandleMove
2884
2885 bool wxWindow::HandleSize(
2886 int nWidth
2887 , int nHeight
2888 , WXUINT WXUNUSED(nFlag)
2889 )
2890 {
2891 wxSizeEvent vEvent( wxSize( nWidth
2892 ,nHeight
2893 )
2894 ,m_windowId
2895 );
2896
2897 vEvent.SetEventObject(this);
2898 return GetEventHandler()->ProcessEvent(vEvent);
2899 } // end of wxWindow::HandleSize
2900
2901 bool wxWindow::HandleGetMinMaxInfo(
2902 PSWP pSwp
2903 )
2904 {
2905 bool bRc = FALSE;
2906 POINTL vPoint;
2907
2908 switch(pSwp->fl)
2909 {
2910 case SWP_MAXIMIZE:
2911 ::WinGetMaxPosition(GetHwnd(), pSwp);
2912 m_maxWidth = pSwp->cx;
2913 m_maxHeight = pSwp->cy;
2914 break;
2915
2916 case SWP_MINIMIZE:
2917 ::WinGetMinPosition(GetHwnd(), pSwp, &vPoint);
2918 m_minWidth = pSwp->cx;
2919 m_minHeight = pSwp->cy;
2920 break;
2921
2922 default:
2923 return FALSE;
2924 }
2925 return TRUE;
2926 } // end of wxWindow::HandleGetMinMaxInfo
2927
2928 // ---------------------------------------------------------------------------
2929 // command messages
2930 // ---------------------------------------------------------------------------
2931 bool wxWindow::HandleCommand(
2932 WXWORD wId
2933 , WXWORD wCmd
2934 , WXHWND hControl
2935 )
2936 {
2937 if (wxCurrentPopupMenu)
2938 {
2939 wxMenu* pPopupMenu = wxCurrentPopupMenu;
2940
2941 wxCurrentPopupMenu = NULL;
2942 return pPopupMenu->OS2Command(wCmd, wId);
2943 }
2944
2945 wxWindow* pWin = FindItem(wId);
2946
2947 if (!pWin)
2948 {
2949 pWin = wxFindWinFromHandle(hControl);
2950 }
2951
2952 if (pWin)
2953 return pWin->OS2Command( wCmd
2954 ,wId
2955 );
2956 return FALSE;
2957 } // end of wxWindow::HandleCommand
2958
2959 bool wxWindow::HandleSysCommand(
2960 WXWPARAM wParam
2961 , WXLPARAM lParam
2962 )
2963 {
2964 //
2965 // 4 bits are reserved
2966 //
2967 switch (SHORT1FROMMP(wParam))
2968 {
2969 case SC_MAXIMIZE:
2970 return HandleMaximize();
2971
2972 case SC_MINIMIZE:
2973 return HandleMinimize();
2974 }
2975 return FALSE;
2976 } // end of wxWindow::HandleSysCommand
2977
2978 // ---------------------------------------------------------------------------
2979 // mouse events
2980 // ---------------------------------------------------------------------------
2981
2982 void wxWindow::InitMouseEvent(
2983 wxMouseEvent& rEvent
2984 , int nX
2985 , int nY
2986 , WXUINT uFlags
2987 )
2988 {
2989 rEvent.m_x = nX;
2990 rEvent.m_y = nY;
2991 rEvent.m_shiftDown = ((uFlags & VK_SHIFT) != 0);
2992 rEvent.m_controlDown = ((uFlags & VK_CTRL) != 0);
2993 rEvent.m_leftDown = ((uFlags & VK_BUTTON1) != 0);
2994 rEvent.m_middleDown = ((uFlags & VK_BUTTON3) != 0);
2995 rEvent.m_rightDown = ((uFlags & VK_BUTTON2) != 0);
2996 rEvent.SetTimestamp(s_currentMsg.time);
2997 rEvent.m_eventObject = this;
2998
2999 #if wxUSE_MOUSEEVENT_HACK
3000 m_lastMouseX = nX;
3001 m_lastMouseY = nY;
3002 m_lastMouseEvent = rEvent.GetEventType();
3003 #endif // wxUSE_MOUSEEVENT_HACK
3004 } // end of wxWindow::InitMouseEvent
3005
3006 bool wxWindow::HandleMouseEvent(
3007 WXUINT uMsg
3008 , int nX
3009 , int nY
3010 , WXUINT uFlags
3011 )
3012 {
3013 //
3014 // The mouse events take consecutive IDs from WM_MOUSEFIRST to
3015 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
3016 // from the message id and take the value in the table to get wxWin event
3017 // id
3018 //
3019 static const wxEventType eventsMouse[] =
3020 {
3021 wxEVT_MOTION,
3022 wxEVT_LEFT_DOWN,
3023 wxEVT_LEFT_UP,
3024 wxEVT_LEFT_DCLICK,
3025 wxEVT_RIGHT_DOWN,
3026 wxEVT_RIGHT_UP,
3027 wxEVT_RIGHT_DCLICK,
3028 wxEVT_MIDDLE_DOWN,
3029 wxEVT_MIDDLE_UP,
3030 wxEVT_MIDDLE_DCLICK
3031 };
3032
3033 wxMouseEvent vEvent(eventsMouse[uMsg - WM_MOUSEMOVE]);
3034
3035 InitMouseEvent( vEvent
3036 ,nX
3037 ,nY
3038 ,uFlags
3039 );
3040
3041 return GetEventHandler()->ProcessEvent(vEvent);
3042 } // end of wxWindow::HandleMouseEvent
3043
3044 bool wxWindow::HandleMouseMove(
3045 int nX
3046 , int nY
3047 , WXUINT uFlags
3048 )
3049 {
3050 if (!m_bMouseInWindow)
3051 {
3052 //
3053 // Generate an ENTER event
3054 //
3055 m_bMouseInWindow = TRUE;
3056
3057 wxMouseEvent vEvent(wxEVT_ENTER_WINDOW);
3058
3059 InitMouseEvent( vEvent
3060 ,nX
3061 ,nY
3062 ,uFlags
3063 );
3064
3065 (void)GetEventHandler()->ProcessEvent(vEvent);
3066 }
3067 return HandleMouseEvent( WM_MOUSEMOVE
3068 ,nX
3069 ,nY
3070 ,uFlags
3071 );
3072 } // end of wxWindow::HandleMouseMove
3073
3074 // ---------------------------------------------------------------------------
3075 // keyboard handling
3076 // ---------------------------------------------------------------------------
3077
3078 //
3079 // Create the key event of the given type for the given key - used by
3080 // HandleChar and HandleKeyDown/Up
3081 //
3082 wxKeyEvent wxWindow::CreateKeyEvent(
3083 wxEventType eType
3084 , int nId
3085 , WXLPARAM lParam
3086 ) const
3087 {
3088 wxKeyEvent vEvent(eType);
3089
3090 vEvent.SetId(GetId());
3091 vEvent.m_shiftDown = IsShiftDown();
3092 vEvent.m_controlDown = IsCtrlDown();
3093 vEvent.m_altDown = (HIWORD(lParam) & KC_ALT) == KC_ALT;
3094
3095 vEvent.m_eventObject = (wxWindow *)this; // const_cast
3096 vEvent.m_keyCode = nId;
3097 vEvent.SetTimestamp(s_currentMsg.time);
3098
3099 //
3100 // Translate the position to client coords
3101 //
3102 POINTL vPoint;
3103 RECTL vRect;
3104
3105 ::WinQueryPointerPos(HWND_DESKTOP, &vPoint);
3106 ::WinQueryWindowRect( GetHwnd()
3107 ,&vRect
3108 );
3109
3110 vPoint.x -= vRect.xLeft;
3111 vPoint.y -= vRect.yBottom;
3112
3113 vEvent.m_x = vPoint.x;
3114 vEvent.m_y = vPoint.y;
3115
3116 return vEvent;
3117 } // end of wxWindow::CreateKeyEvent
3118
3119 //
3120 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
3121 // WM_KEYDOWN one
3122 //
3123 bool wxWindow::HandleChar(
3124 WXWORD wParam
3125 , WXLPARAM lParam
3126 , bool isASCII
3127 )
3128 {
3129 bool bCtrlDown = FALSE;
3130 int vId;
3131
3132 if (isASCII)
3133 {
3134 //
3135 // If 1 -> 26, translate to CTRL plus a letter.
3136 //
3137 vId = wParam;
3138 if ((vId > 0) && (vId < 27))
3139 {
3140 switch (vId)
3141 {
3142 case 13:
3143 vId = WXK_RETURN;
3144 break;
3145
3146 case 8:
3147 vId = WXK_BACK;
3148 break;
3149
3150 case 9:
3151 vId = WXK_TAB;
3152 break;
3153
3154 default:
3155 bCtrlDown = TRUE;
3156 vId = vId + 96;
3157 }
3158 }
3159 }
3160 else if ( (vId = wxCharCodeOS2ToWX(wParam)) == 0)
3161 {
3162 //
3163 // It's ASCII and will be processed here only when called from
3164 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
3165 //
3166 vId = -1;
3167 }
3168
3169 if (vId != -1)
3170 {
3171 wxKeyEvent vEvent(CreateKeyEvent( wxEVT_CHAR
3172 ,vId
3173 ,lParam
3174 ));
3175
3176 if (bCtrlDown)
3177 {
3178 vEvent.m_controlDown = TRUE;
3179 }
3180
3181 if (GetEventHandler()->ProcessEvent(vEvent))
3182 return TRUE;
3183 }
3184 return FALSE;
3185 }
3186
3187 bool wxWindow::HandleKeyDown(
3188 WXWORD wParam
3189 , WXLPARAM lParam
3190 )
3191 {
3192 int nId = wxCharCodeOS2ToWX(wParam);
3193
3194 if (!nId)
3195 {
3196 //
3197 // Normal ASCII char
3198 //
3199 nId = wParam;
3200 }
3201
3202 if (nId != -1)
3203 {
3204 wxKeyEvent vEvent(CreateKeyEvent( wxEVT_KEY_DOWN
3205 ,nId
3206 ,lParam
3207 ));
3208
3209 if (GetEventHandler()->ProcessEvent(vEvent))
3210 {
3211 return TRUE;
3212 }
3213 }
3214 return FALSE;
3215 } // end of wxWindow::HandleKeyDown
3216
3217 bool wxWindow::HandleKeyUp(
3218 WXWORD wParam
3219 , WXLPARAM lParam
3220 )
3221 {
3222 int nId = wxCharCodeOS2ToWX(wParam);
3223
3224 if (!nId)
3225 {
3226 //
3227 // Normal ASCII char
3228 //
3229 nId = wParam;
3230 }
3231
3232 if (nId != -1)
3233 {
3234 wxKeyEvent vEvent(CreateKeyEvent( wxEVT_KEY_UP
3235 ,nId
3236 ,lParam
3237 ));
3238
3239 if (GetEventHandler()->ProcessEvent(vEvent))
3240 return TRUE;
3241 }
3242 return FALSE;
3243 } // end of wxWindow::HandleKeyUp
3244
3245 // ---------------------------------------------------------------------------
3246 // joystick
3247 // ---------------------------------------------------------------------------
3248
3249 // ---------------------------------------------------------------------------
3250 // scrolling
3251 // ---------------------------------------------------------------------------
3252
3253 bool wxWindow::OS2OnScroll(
3254 int nOrientation
3255 , WXWORD wParam
3256 , WXWORD wPos
3257 , WXHWND hControl
3258 )
3259 {
3260 if (hControl)
3261 {
3262 wxWindow* pChild = wxFindWinFromHandle(hControl);
3263
3264 if (pChild )
3265 return pChild->OS2OnScroll( nOrientation
3266 ,wParam
3267 ,wPos
3268 ,hControl
3269 );
3270 }
3271
3272 wxScrollWinEvent vEvent;
3273
3274 vEvent.SetPosition(wPos);
3275 vEvent.SetOrientation(nOrientation);
3276 vEvent.m_eventObject = this;
3277
3278 switch (wParam)
3279 {
3280 case SB_LINEUP:
3281 vEvent.m_eventType = wxEVT_SCROLLWIN_LINEUP;
3282 break;
3283
3284 case SB_LINEDOWN:
3285 vEvent.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
3286 break;
3287
3288 case SB_PAGEUP:
3289 vEvent.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
3290 break;
3291
3292 case SB_PAGEDOWN:
3293 vEvent.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
3294 break;
3295
3296 case SB_SLIDERPOSITION:
3297 vEvent.m_eventType = wxEVT_SCROLLWIN_THUMBRELEASE;
3298 break;
3299
3300 case SB_SLIDERTRACK:
3301 vEvent.m_eventType = wxEVT_SCROLLWIN_THUMBTRACK;
3302 break;
3303
3304 default:
3305 return FALSE;
3306 }
3307 return GetEventHandler()->ProcessEvent(vEvent);
3308 } // end of wxWindow::OS2OnScroll
3309
3310 // ===========================================================================
3311 // global functions
3312 // ===========================================================================
3313
3314 void wxGetCharSize(
3315 WXHWND hWnd
3316 , int* pX
3317 , int* pY
3318 ,wxFont* pTheFont
3319 )
3320 {
3321 // TODO: we'll do this later
3322 } // end of wxGetCharSize
3323
3324 //
3325 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
3326 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
3327 //
3328 int wxCharCodeOS2ToWX(
3329 int nKeySym
3330 )
3331 {
3332 int nId = 0;
3333
3334 switch (nKeySym)
3335 {
3336 case VK_BACKTAB: nId = WXK_BACK; break;
3337 case VK_TAB: nId = WXK_TAB; break;
3338 case VK_CLEAR: nId = WXK_CLEAR; break;
3339 case VK_ENTER: nId = WXK_RETURN; break;
3340 case VK_SHIFT: nId = WXK_SHIFT; break;
3341 case VK_CTRL: nId = WXK_CONTROL; break;
3342 case VK_PAUSE: nId = WXK_PAUSE; break;
3343 case VK_SPACE: nId = WXK_SPACE; break;
3344 case VK_ESC: nId = WXK_ESCAPE; break;
3345 case VK_END: nId = WXK_END; break;
3346 case VK_HOME : nId = WXK_HOME; break;
3347 case VK_LEFT : nId = WXK_LEFT; break;
3348 case VK_UP: nId = WXK_UP; break;
3349 case VK_RIGHT: nId = WXK_RIGHT; break;
3350 case VK_DOWN : nId = WXK_DOWN; break;
3351 case VK_PRINTSCRN: nId = WXK_PRINT; break;
3352 case VK_INSERT: nId = WXK_INSERT; break;
3353 case VK_DELETE: nId = WXK_DELETE; break;
3354 case VK_F1: nId = WXK_F1; break;
3355 case VK_F2: nId = WXK_F2; break;
3356 case VK_F3: nId = WXK_F3; break;
3357 case VK_F4: nId = WXK_F4; break;
3358 case VK_F5: nId = WXK_F5; break;
3359 case VK_F6: nId = WXK_F6; break;
3360 case VK_F7: nId = WXK_F7; break;
3361 case VK_F8: nId = WXK_F8; break;
3362 case VK_F9: nId = WXK_F9; break;
3363 case VK_F10: nId = WXK_F10; break;
3364 case VK_F11: nId = WXK_F11; break;
3365 case VK_F12: nId = WXK_F12; break;
3366 case VK_F13: nId = WXK_F13; break;
3367 case VK_F14: nId = WXK_F14; break;
3368 case VK_F15: nId = WXK_F15; break;
3369 case VK_F16: nId = WXK_F16; break;
3370 case VK_F17: nId = WXK_F17; break;
3371 case VK_F18: nId = WXK_F18; break;
3372 case VK_F19: nId = WXK_F19; break;
3373 case VK_F20: nId = WXK_F20; break;
3374 case VK_F21: nId = WXK_F21; break;
3375 case VK_F22: nId = WXK_F22; break;
3376 case VK_F23: nId = WXK_F23; break;
3377 case VK_F24: nId = WXK_F24; break;
3378 case VK_NUMLOCK: nId = WXK_NUMLOCK; break;
3379 case VK_SCRLLOCK: nId = WXK_SCROLL; break;
3380 default:
3381 {
3382 return 0;
3383 }
3384 }
3385 return nId;
3386 } // end of wxCharCodeOS2ToWX
3387
3388 int wxCharCodeWXToOS2(
3389 int nId
3390 , bool* bIsVirtual
3391 )
3392 {
3393 int nKeySym = 0;
3394
3395 *bIsVirtual = TRUE;
3396 switch (nId)
3397 {
3398 case WXK_CLEAR: nKeySym = VK_CLEAR; break;
3399 case WXK_SHIFT: nKeySym = VK_SHIFT; break;
3400 case WXK_CONTROL: nKeySym = VK_CTRL; break;
3401 case WXK_PAUSE: nKeySym = VK_PAUSE; break;
3402 case WXK_END: nKeySym = VK_END; break;
3403 case WXK_HOME : nKeySym = VK_HOME; break;
3404 case WXK_LEFT : nKeySym = VK_LEFT; break;
3405 case WXK_UP: nKeySym = VK_UP; break;
3406 case WXK_RIGHT: nKeySym = VK_RIGHT; break;
3407 case WXK_DOWN : nKeySym = VK_DOWN; break;
3408 case WXK_PRINT: nKeySym = VK_PRINTSCRN; break;
3409 case WXK_INSERT: nKeySym = VK_INSERT; break;
3410 case WXK_DELETE: nKeySym = VK_DELETE; break;
3411 case WXK_F1: nKeySym = VK_F1; break;
3412 case WXK_F2: nKeySym = VK_F2; break;
3413 case WXK_F3: nKeySym = VK_F3; break;
3414 case WXK_F4: nKeySym = VK_F4; break;
3415 case WXK_F5: nKeySym = VK_F5; break;
3416 case WXK_F6: nKeySym = VK_F6; break;
3417 case WXK_F7: nKeySym = VK_F7; break;
3418 case WXK_F8: nKeySym = VK_F8; break;
3419 case WXK_F9: nKeySym = VK_F9; break;
3420 case WXK_F10: nKeySym = VK_F10; break;
3421 case WXK_F11: nKeySym = VK_F11; break;
3422 case WXK_F12: nKeySym = VK_F12; break;
3423 case WXK_F13: nKeySym = VK_F13; break;
3424 case WXK_F14: nKeySym = VK_F14; break;
3425 case WXK_F15: nKeySym = VK_F15; break;
3426 case WXK_F16: nKeySym = VK_F16; break;
3427 case WXK_F17: nKeySym = VK_F17; break;
3428 case WXK_F18: nKeySym = VK_F18; break;
3429 case WXK_F19: nKeySym = VK_F19; break;
3430 case WXK_F20: nKeySym = VK_F20; break;
3431 case WXK_F21: nKeySym = VK_F21; break;
3432 case WXK_F22: nKeySym = VK_F22; break;
3433 case WXK_F23: nKeySym = VK_F23; break;
3434 case WXK_F24: nKeySym = VK_F24; break;
3435 case WXK_NUMLOCK: nKeySym = VK_NUMLOCK; break;
3436 case WXK_SCROLL: nKeySym = VK_SCRLLOCK; break;
3437 default:
3438 {
3439 *bIsVirtual = FALSE;
3440 nKeySym = nId;
3441 break;
3442 }
3443 }
3444 return nKeySym;
3445 } // end of wxCharCodeWXToOS2
3446
3447 wxWindow* wxGetActiveWindow()
3448 {
3449 HWND hWnd = ::WinQueryActiveWindow(HWND_DESKTOP);
3450
3451 if (hWnd != 0)
3452 {
3453 return wxFindWinFromHandle((WXHWND)hWnd);
3454 }
3455 return NULL;
3456 } // end of wxGetActiveWindow
3457
3458 #ifdef __WXDEBUG__
3459 const char* wxGetMessageName(
3460 int nMessage)
3461 {
3462 switch (nMessage)
3463 {
3464 case 0x0000: return "WM_NULL";
3465 case 0x0001: return "WM_CREATE";
3466 case 0x0002: return "WM_DESTROY";
3467 case 0x0004: return "WM_ENABLE";
3468 case 0x0005: return "WM_SHOW";
3469 case 0x0006: return "WM_MOVE";
3470 case 0x0007: return "WM_SIZE";
3471 case 0x0008: return "WM_ADJUSTWINDOWPOS";
3472 case 0x0009: return "WM_CALCVALIDRECTS";
3473 case 0x000A: return "WM_SETWINDOWPARAMS";
3474 case 0x000B: return "WM_QUERYWINDOWPARAMS";
3475 case 0x000C: return "WM_HITTEST";
3476 case 0x000D: return "WM_ACTIVATE";
3477 case 0x000F: return "WM_SETFOCUS";
3478 case 0x0010: return "WM_SETSELECTION";
3479 case 0x0011: return "WM_PPAINT";
3480 case 0x0012: return "WM_PSETFOCUS";
3481 case 0x0013: return "WM_PSYSCOLORCHANGE";
3482 case 0x0014: return "WM_PSIZE";
3483 case 0x0015: return "WM_PACTIVATE";
3484 case 0x0016: return "WM_PCONTROL";
3485 case 0x0020: return "WM_COMMAND";
3486 case 0x0021: return "WM_SYSCOMMAND";
3487 case 0x0022: return "WM_HELP";
3488 case 0x0023: return "WM_PAINT";
3489 case 0x0024: return "WM_TIMER";
3490 case 0x0025: return "WM_SEM1";
3491 case 0x0026: return "WM_SEM2";
3492 case 0x0027: return "WM_SEM3";
3493 case 0x0028: return "WM_SEM4";
3494 case 0x0029: return "WM_CLOSE";
3495 case 0x002A: return "WM_QUIT";
3496 case 0x002B: return "WM_SYSCOLORCHANGE";
3497 case 0x002D: return "WM_SYSVALUECHANGE";
3498 case 0x002E: return "WM_APPTERMINATENOTIFY";
3499 case 0x002F: return "WM_PRESPARAMCHANGED";
3500 // Control notification messages
3501 case 0x0030: return "WM_CONTROL";
3502 case 0x0031: return "WM_VSCROLL";
3503 case 0x0032: return "WM_HSCROLL";
3504 case 0x0033: return "WM_INITMENU";
3505 case 0x0034: return "WM_MENUSELECT";
3506 case 0x0035: return "WM_MENUSEND";
3507 case 0x0036: return "WM_DRAWITEM";
3508 case 0x0037: return "WM_MEASUREITEM";
3509 case 0x0038: return "WM_CONTROLPOINTER";
3510 case 0x003A: return "WM_QUERYDLGCODE";
3511 case 0x003B: return "WM_INITDLG";
3512 case 0x003C: return "WM_SUBSTITUTESTRING";
3513 case 0x003D: return "WM_MATCHMNEMONIC";
3514 case 0x003E: return "WM_SAVEAPPLICATION";
3515 case 0x0129: return "WM_CTLCOLORCHANGE";
3516 case 0x0130: return "WM_QUERYCTLTYPE";
3517 // Frame messages
3518 case 0x0040: return "WM_FLASHWINDOW";
3519 case 0x0041: return "WM_FORMATFRAME";
3520 case 0x0042: return "WM_UPDATEFRAME";
3521 case 0x0043: return "WM_FOCUSCHANGE";
3522 case 0x0044: return "WM_SETBORDERSIZE";
3523 case 0x0045: return "WM_TRACKFRAME";
3524 case 0x0046: return "WM_MINMAXFRAME";
3525 case 0x0047: return "WM_SETICON";
3526 case 0x0048: return "WM_QUERYICON";
3527 case 0x0049: return "WM_SETACCELTABLE";
3528 case 0x004A: return "WM_QUERYACCELTABLE";
3529 case 0x004B: return "WM_TRANSLATEACCEL";
3530 case 0x004C: return "WM_QUERYTRACKINFO";
3531 case 0x004D: return "WM_QUERYBORDERSIZE";
3532 case 0x004E: return "WM_NEXTMENU";
3533 case 0x004F: return "WM_ERASEBACKGROUND";
3534 case 0x0050: return "WM_QUERYFRAMEINFO";
3535 case 0x0051: return "WM_QUERYFOCUSCHAIN";
3536 case 0x0052: return "WM_OWNERPOSCHANGE";
3537 case 0x0053: return "WM_CACLFRAMERECT";
3538 case 0x0055: return "WM_WINDOWPOSCHANGED";
3539 case 0x0056: return "WM_ADJUSTFRAMEPOS";
3540 case 0x0059: return "WM_QUERYFRAMECTLCOUNT";
3541 case 0x005B: return "WM_QUERYHELPINFO";
3542 case 0x005C: return "WM_SETHELPINFO";
3543 case 0x005D: return "WM_ERROR";
3544 case 0x005E: return "WM_REALIZEPALETTE";
3545 // Clipboard messages
3546 case 0x0060: return "WM_RENDERFMT";
3547 case 0x0061: return "WM_RENDERALLFMTS";
3548 case 0x0062: return "WM_DESTROYCLIPBOARD";
3549 case 0x0063: return "WM_PAINTCLIPBOARD";
3550 case 0x0064: return "WM_SIZECLIPBOARD";
3551 case 0x0065: return "WM_HSCROLLCLIPBOARD";
3552 case 0x0066: return "WM_VSCROLLCLIPBOARD";
3553 case 0x0067: return "WM_DRAWCLIPBOARD";
3554 // mouse messages
3555 case 0x0070: return "WM_MOUSEMOVE";
3556 case 0x0071: return "WM_BUTTON1DOWN";
3557 case 0x0072: return "WM_BUTTON1UP";
3558 case 0x0073: return "WM_BUTTON1DBLCLK";
3559 case 0x0074: return "WM_BUTTON2DOWN";
3560 case 0x0075: return "WM_BUTTON2UP";
3561 case 0x0076: return "WM_BUTTON2DBLCLK";
3562 case 0x0077: return "WM_BUTTON3DOWN";
3563 case 0x0078: return "WM_BUTTON3UP";
3564 case 0x0079: return "WM_BUTTON3DBLCLK";
3565 case 0x007D: return "WM_MOUSEMAP";
3566 case 0x007E: return "WM_VRNDISABLED";
3567 case 0x007F: return "WM_VRNENABLED";
3568 case 0x0410: return "WM_CHORD";
3569 case 0x0411: return "WM_BUTTON1MOTIONSTART";
3570 case 0x0412: return "WM_BUTTON1MOTIONEND";
3571 case 0x0413: return "WM_BUTTON1CLICK";
3572 case 0x0414: return "WM_BUTTON2MOTIONSTART";
3573 case 0x0415: return "WM_BUTTON2MOTIONEND";
3574 case 0x0416: return "WM_BUTTON2CLICK";
3575 case 0x0417: return "WM_BUTTON3MOTIONSTART";
3576 case 0x0418: return "WM_BUTTON3MOTIONEND";
3577 case 0x0419: return "WM_BUTTON3CLICK";
3578 case 0x0420: return "WM_BEGINDRAG";
3579 case 0x0421: return "WM_ENDDRAG";
3580 case 0x0422: return "WM_SINGLESELECT";
3581 case 0x0423: return "WM_OPEN";
3582 case 0x0424: return "WM_CONTEXTMENU";
3583 case 0x0425: return "WM_CONTEXTHELP";
3584 case 0x0426: return "WM_TEXTEDIT";
3585 case 0x0427: return "WM_BEGINSELECT";
3586 case 0x0228: return "WM_ENDSELECT";
3587 case 0x0429: return "WM_PICKUP";
3588 case 0x04C0: return "WM_PENFIRST";
3589 case 0x04FF: return "WM_PENLAST";
3590 case 0x0500: return "WM_MMPMFIRST";
3591 case 0x05FF: return "WM_MMPMLAST";
3592 case 0x0600: return "WM_STDDLGFIRST";
3593 case 0x06FF: return "WM_STDDLGLAST";
3594 case 0x0BD0: return "WM_BIDI_FIRST";
3595 case 0x0BFF: return "WM_BIDI_LAST";
3596 // keyboard input
3597 case 0x007A: return "WM_CHAR";
3598 case 0x007B: return "WM_VIOCHAR";
3599 // DDE messages
3600 case 0x00A0: return "WM_DDE_INITIATE";
3601 case 0x00A1: return "WM_DDE_REQUEST";
3602 case 0x00A2: return "WM_DDE_ACK";
3603 case 0x00A3: return "WM_DDE_DATA";
3604 case 0x00A4: return "WM_DDE_ADVISE";
3605 case 0x00A5: return "WM_DDE_UNADVISE";
3606 case 0x00A6: return "WM_DDE_POKE";
3607 case 0x00A7: return "WM_DDE_EXECUTE";
3608 case 0x00A8: return "WM_DDE_TERMINATE";
3609 case 0x00A9: return "WM_DDE_INITIATEACK";
3610 case 0x00AF: return "WM_DDE_LAST";
3611 // Buttons
3612 case 0x0120: return "BM_CLICK";
3613 case 0x0121: return "BM_QUERYCHECKINDEX";
3614 case 0x0122: return "BM_QUERYHILITE";
3615 case 0x0123: return "BM_SETHILITE";
3616 case 0x0124: return "BM_QUERYCHECK";
3617 case 0x0125: return "BM_SETCHECK";
3618 case 0x0126: return "BM_SETDEFAULT";
3619 case 0x0128: return "BM_AUTOSIZE";
3620 // Combo boxes
3621 case 0x029A: return "CBID_LIST";
3622 case 0x029B: return "CBID_EDIT";
3623 case 0x0170: return "CBM_SHOWLIST";
3624 case 0x0171: return "CBM_HILITE";
3625 case 0x0172: return "CBM_ISLISTSHOWING";
3626 // Edit fields
3627 case 0x0140: return "EM_QUERYCHANGED";
3628 case 0x0141: return "EM_QUERYSEL";
3629 case 0x0142: return "EM_SETSEL";
3630 case 0x0143: return "EM_SETTEXTLIMIT";
3631 case 0x0144: return "EM_CUT";
3632 case 0x0145: return "EM_COPY";
3633 case 0x0146: return "EM_CLEAR";
3634 case 0x0147: return "EM_PASTE";
3635 case 0x0148: return "EM_QUERYFIRSTCHAR";
3636 case 0x0149: return "EM_SETFIRSTCHAR";
3637 case 0x014A: return "EM_QUERYREADONLY";
3638 case 0x014B: return "EM_SETREADONLY";
3639 case 0x014C: return "EM_SETINSERTMODE";
3640 // Listboxes
3641 case 0x0160: return "LM_QUERYITEMCOUNT";
3642 case 0x0161: return "LM_INSERTITEM";
3643 case 0x0162: return "LM_SETOPENINDEX";
3644 case 0x0163: return "LM_DELETEITEM";
3645 case 0x0164: return "LM_SELECTITEM";
3646 case 0x0165: return "LM_QUERYSELECTION";
3647 case 0x0166: return "LM_SETITEMTEXT";
3648 case 0x0167: return "LM_QUERYITEMTEXTLENGTH";
3649 case 0x0168: return "LM_QUERYITEMTEXT";
3650 case 0x0169: return "LM_SETITEMHANDLE";
3651 case 0x016A: return "LM_QUERYITEMHANDLE";
3652 case 0x016B: return "LM_SEARCHSTRING";
3653 case 0x016C: return "LM_SETITEMHEIGHT";
3654 case 0x016D: return "LM_QUERYTOPINDEX";
3655 case 0x016E: return "LM_DELETEALL";
3656 case 0x016F: return "LM_INSERTMULITEMS";
3657 case 0x0660: return "LM_SETITEMWIDTH";
3658 // Menus
3659 case 0x0180: return "MM_INSERTITEM";
3660 case 0x0181: return "MM_DELETEITEM";
3661 case 0x0182: return "MM_QUERYITEM";
3662 case 0x0183: return "MM_SETITEM";
3663 case 0x0184: return "MM_QUERYITEMCOUNT";
3664 case 0x0185: return "MM_STARTMENUMODE";
3665 case 0x0186: return "MM_ENDMENUMODE";
3666 case 0x0188: return "MM_REMOVEITEM";
3667 case 0x0189: return "MM_SELECTITEM";
3668 case 0x018A: return "MM_QUERYSELITEMID";
3669 case 0x018B: return "MM_QUERYITEMTEXT";
3670 case 0x018C: return "MM_QUERYITEMTEXTLENGTH";
3671 case 0x018D: return "MM_SETITEMHANDLE";
3672 case 0x018E: return "MM_SETITEMTEXT";
3673 case 0x018F: return "MM_ITEMPOSITIONFROMID";
3674 case 0x0190: return "MM_ITEMIDFROMPOSITION";
3675 case 0x0191: return "MM_QUERYITEMATTR";
3676 case 0x0192: return "MM_SETITEMATTR";
3677 case 0x0193: return "MM_ISITEMVALID";
3678 case 0x0194: return "MM_QUERYITEMRECT";
3679 case 0x0431: return "MM_QUERYDEFAULTITEMID";
3680 case 0x0432: return "MM_SETDEFAULTITEMID";
3681 // Scrollbars
3682 case 0x01A0: return "SBM_SETSCROLLBAR";
3683 case 0x01A1: return "SBM_SETPOS";
3684 case 0x01A2: return "SBM_QUERYPOS";
3685 case 0x01A3: return "SBM_QUERYRANGE";
3686 case 0x01A6: return "SBM_SETTHUMBSIZE";
3687
3688 // Help messages
3689 case 0x0F00: return "WM_HELPBASE";
3690 case 0x0FFF: return "WM_HELPTOP";
3691 // Beginning of user defined messages
3692 case 0x1000: return "WM_USER";
3693
3694 // wxWindows user defined types
3695
3696 // listview
3697 // case 0x1000 + 0: return "LVM_GETBKCOLOR";
3698 case 0x1000 + 1: return "LVM_SETBKCOLOR";
3699 case 0x1000 + 2: return "LVM_GETIMAGELIST";
3700 case 0x1000 + 3: return "LVM_SETIMAGELIST";
3701 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
3702 case 0x1000 + 5: return "LVM_GETITEMA";
3703 case 0x1000 + 75: return "LVM_GETITEMW";
3704 case 0x1000 + 6: return "LVM_SETITEMA";
3705 case 0x1000 + 76: return "LVM_SETITEMW";
3706 case 0x1000 + 7: return "LVM_INSERTITEMA";
3707 case 0x1000 + 77: return "LVM_INSERTITEMW";
3708 case 0x1000 + 8: return "LVM_DELETEITEM";
3709 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
3710 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
3711 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
3712 case 0x1000 + 12: return "LVM_GETNEXTITEM";
3713 case 0x1000 + 13: return "LVM_FINDITEMA";
3714 case 0x1000 + 83: return "LVM_FINDITEMW";
3715 case 0x1000 + 14: return "LVM_GETITEMRECT";
3716 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
3717 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
3718 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
3719 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
3720 case 0x1000 + 18: return "LVM_HITTEST";
3721 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
3722 case 0x1000 + 20: return "LVM_SCROLL";
3723 case 0x1000 + 21: return "LVM_REDRAWITEMS";
3724 case 0x1000 + 22: return "LVM_ARRANGE";
3725 case 0x1000 + 23: return "LVM_EDITLABELA";
3726 case 0x1000 + 118: return "LVM_EDITLABELW";
3727 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
3728 case 0x1000 + 25: return "LVM_GETCOLUMNA";
3729 case 0x1000 + 95: return "LVM_GETCOLUMNW";
3730 case 0x1000 + 26: return "LVM_SETCOLUMNA";
3731 case 0x1000 + 96: return "LVM_SETCOLUMNW";
3732 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
3733 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
3734 case 0x1000 + 28: return "LVM_DELETECOLUMN";
3735 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
3736 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
3737 case 0x1000 + 31: return "LVM_GETHEADER";
3738 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
3739 case 0x1000 + 34: return "LVM_GETVIEWRECT";
3740 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
3741 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
3742 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
3743 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
3744 case 0x1000 + 39: return "LVM_GETTOPINDEX";
3745 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
3746 case 0x1000 + 41: return "LVM_GETORIGIN";
3747 case 0x1000 + 42: return "LVM_UPDATE";
3748 case 0x1000 + 43: return "LVM_SETITEMSTATE";
3749 case 0x1000 + 44: return "LVM_GETITEMSTATE";
3750 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
3751 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
3752 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
3753 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
3754 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
3755 case 0x1000 + 48: return "LVM_SORTITEMS";
3756 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
3757 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
3758 case 0x1000 + 51: return "LVM_GETITEMSPACING";
3759 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
3760 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
3761 case 0x1000 + 53: return "LVM_SETICONSPACING";
3762 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
3763 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
3764 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
3765 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
3766 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
3767 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
3768 case 0x1000 + 60: return "LVM_SETHOTITEM";
3769 case 0x1000 + 61: return "LVM_GETHOTITEM";
3770 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
3771 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
3772 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
3773 case 0x1000 + 65: return "LVM_SETWORKAREA";
3774
3775 // tree view
3776 case 0x1100 + 0: return "TVM_INSERTITEMA";
3777 case 0x1100 + 50: return "TVM_INSERTITEMW";
3778 case 0x1100 + 1: return "TVM_DELETEITEM";
3779 case 0x1100 + 2: return "TVM_EXPAND";
3780 case 0x1100 + 4: return "TVM_GETITEMRECT";
3781 case 0x1100 + 5: return "TVM_GETCOUNT";
3782 case 0x1100 + 6: return "TVM_GETINDENT";
3783 case 0x1100 + 7: return "TVM_SETINDENT";
3784 case 0x1100 + 8: return "TVM_GETIMAGELIST";
3785 case 0x1100 + 9: return "TVM_SETIMAGELIST";
3786 case 0x1100 + 10: return "TVM_GETNEXTITEM";
3787 case 0x1100 + 11: return "TVM_SELECTITEM";
3788 case 0x1100 + 12: return "TVM_GETITEMA";
3789 case 0x1100 + 62: return "TVM_GETITEMW";
3790 case 0x1100 + 13: return "TVM_SETITEMA";
3791 case 0x1100 + 63: return "TVM_SETITEMW";
3792 case 0x1100 + 14: return "TVM_EDITLABELA";
3793 case 0x1100 + 65: return "TVM_EDITLABELW";
3794 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
3795 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
3796 case 0x1100 + 17: return "TVM_HITTEST";
3797 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
3798 case 0x1100 + 19: return "TVM_SORTCHILDREN";
3799 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
3800 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
3801 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
3802 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
3803 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
3804 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
3805 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
3806
3807 // header
3808 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
3809 case 0x1200 + 1: return "HDM_INSERTITEMA";
3810 case 0x1200 + 10: return "HDM_INSERTITEMW";
3811 case 0x1200 + 2: return "HDM_DELETEITEM";
3812 case 0x1200 + 3: return "HDM_GETITEMA";
3813 case 0x1200 + 11: return "HDM_GETITEMW";
3814 case 0x1200 + 4: return "HDM_SETITEMA";
3815 case 0x1200 + 12: return "HDM_SETITEMW";
3816 case 0x1200 + 5: return "HDM_LAYOUT";
3817 case 0x1200 + 6: return "HDM_HITTEST";
3818 case 0x1200 + 7: return "HDM_GETITEMRECT";
3819 case 0x1200 + 8: return "HDM_SETIMAGELIST";
3820 case 0x1200 + 9: return "HDM_GETIMAGELIST";
3821 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
3822 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
3823 case 0x1200 + 17: return "HDM_GETORDERARRAY";
3824 case 0x1200 + 18: return "HDM_SETORDERARRAY";
3825 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
3826
3827 // tab control
3828 case 0x1300 + 2: return "TCM_GETIMAGELIST";
3829 case 0x1300 + 3: return "TCM_SETIMAGELIST";
3830 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
3831 case 0x1300 + 5: return "TCM_GETITEMA";
3832 case 0x1300 + 60: return "TCM_GETITEMW";
3833 case 0x1300 + 6: return "TCM_SETITEMA";
3834 case 0x1300 + 61: return "TCM_SETITEMW";
3835 case 0x1300 + 7: return "TCM_INSERTITEMA";
3836 case 0x1300 + 62: return "TCM_INSERTITEMW";
3837 case 0x1300 + 8: return "TCM_DELETEITEM";
3838 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
3839 case 0x1300 + 10: return "TCM_GETITEMRECT";
3840 case 0x1300 + 11: return "TCM_GETCURSEL";
3841 case 0x1300 + 12: return "TCM_SETCURSEL";
3842 case 0x1300 + 13: return "TCM_HITTEST";
3843 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
3844 case 0x1300 + 40: return "TCM_ADJUSTRECT";
3845 case 0x1300 + 41: return "TCM_SETITEMSIZE";
3846 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
3847 case 0x1300 + 43: return "TCM_SETPADDING";
3848 case 0x1300 + 44: return "TCM_GETROWCOUNT";
3849 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
3850 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
3851 case 0x1300 + 47: return "TCM_GETCURFOCUS";
3852 case 0x1300 + 48: return "TCM_SETCURFOCUS";
3853 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
3854 case 0x1300 + 50: return "TCM_DESELECTALL";
3855
3856 // toolbar
3857 case WM_USER+1000+1: return "TB_ENABLEBUTTON";
3858 case WM_USER+1000+2: return "TB_CHECKBUTTON";
3859 case WM_USER+1000+3: return "TB_PRESSBUTTON";
3860 case WM_USER+1000+4: return "TB_HIDEBUTTON";
3861 case WM_USER+1000+5: return "TB_INDETERMINATE";
3862 case WM_USER+1000+9: return "TB_ISBUTTONENABLED";
3863 case WM_USER+1000+10: return "TB_ISBUTTONCHECKED";
3864 case WM_USER+1000+11: return "TB_ISBUTTONPRESSED";
3865 case WM_USER+1000+12: return "TB_ISBUTTONHIDDEN";
3866 case WM_USER+1000+13: return "TB_ISBUTTONINDETERMINATE";
3867 case WM_USER+1000+17: return "TB_SETSTATE";
3868 case WM_USER+1000+18: return "TB_GETSTATE";
3869 case WM_USER+1000+19: return "TB_ADDBITMAP";
3870 case WM_USER+1000+20: return "TB_ADDBUTTONS";
3871 case WM_USER+1000+21: return "TB_INSERTBUTTON";
3872 case WM_USER+1000+22: return "TB_DELETEBUTTON";
3873 case WM_USER+1000+23: return "TB_GETBUTTON";
3874 case WM_USER+1000+24: return "TB_BUTTONCOUNT";
3875 case WM_USER+1000+25: return "TB_COMMANDTOINDEX";
3876 case WM_USER+1000+26: return "TB_SAVERESTOREA";
3877 case WM_USER+1000+76: return "TB_SAVERESTOREW";
3878 case WM_USER+1000+27: return "TB_CUSTOMIZE";
3879 case WM_USER+1000+28: return "TB_ADDSTRINGA";
3880 case WM_USER+1000+77: return "TB_ADDSTRINGW";
3881 case WM_USER+1000+29: return "TB_GETITEMRECT";
3882 case WM_USER+1000+30: return "TB_BUTTONSTRUCTSIZE";
3883 case WM_USER+1000+31: return "TB_SETBUTTONSIZE";
3884 case WM_USER+1000+32: return "TB_SETBITMAPSIZE";
3885 case WM_USER+1000+33: return "TB_AUTOSIZE";
3886 case WM_USER+1000+35: return "TB_GETTOOLTIPS";
3887 case WM_USER+1000+36: return "TB_SETTOOLTIPS";
3888 case WM_USER+1000+37: return "TB_SETPARENT";
3889 case WM_USER+1000+39: return "TB_SETROWS";
3890 case WM_USER+1000+40: return "TB_GETROWS";
3891 case WM_USER+1000+42: return "TB_SETCMDID";
3892 case WM_USER+1000+43: return "TB_CHANGEBITMAP";
3893 case WM_USER+1000+44: return "TB_GETBITMAP";
3894 case WM_USER+1000+45: return "TB_GETBUTTONTEXTA";
3895 case WM_USER+1000+75: return "TB_GETBUTTONTEXTW";
3896 case WM_USER+1000+46: return "TB_REPLACEBITMAP";
3897 case WM_USER+1000+47: return "TB_SETINDENT";
3898 case WM_USER+1000+48: return "TB_SETIMAGELIST";
3899 case WM_USER+1000+49: return "TB_GETIMAGELIST";
3900 case WM_USER+1000+50: return "TB_LOADIMAGES";
3901 case WM_USER+1000+51: return "TB_GETRECT";
3902 case WM_USER+1000+52: return "TB_SETHOTIMAGELIST";
3903 case WM_USER+1000+53: return "TB_GETHOTIMAGELIST";
3904 case WM_USER+1000+54: return "TB_SETDISABLEDIMAGELIST";
3905 case WM_USER+1000+55: return "TB_GETDISABLEDIMAGELIST";
3906 case WM_USER+1000+56: return "TB_SETSTYLE";
3907 case WM_USER+1000+57: return "TB_GETSTYLE";
3908 case WM_USER+1000+58: return "TB_GETBUTTONSIZE";
3909 case WM_USER+1000+59: return "TB_SETBUTTONWIDTH";
3910 case WM_USER+1000+60: return "TB_SETMAXTEXTROWS";
3911 case WM_USER+1000+61: return "TB_GETTEXTROWS";
3912 case WM_USER+1000+41: return "TB_GETBITMAPFLAGS";
3913
3914 default:
3915 static char s_szBuf[128];
3916 sprintf(s_szBuf, "<unknown message = %d>", nMessage);
3917 return s_szBuf;
3918 }
3919 return NULL;
3920 } // end of wxGetMessageName
3921
3922 #endif // __WXDEBUG__
3923
3924 static void TranslateKbdEventToMouse(
3925 wxWindow* pWin
3926 , int* pX
3927 , int* pY
3928 , ULONG* pFlags
3929 )
3930 {
3931 //
3932 // Construct the key mask
3933 ULONG& fwKeys = *pFlags;
3934
3935 fwKeys = VK_BUTTON2;
3936 if ((::WinGetKeyState(HWND_DESKTOP, VK_CTRL) & 0x100) != 0)
3937 fwKeys |= VK_CTRL;
3938 if ((::WinGetKeyState(HWND_DESKTOP, VK_SHIFT) & 0x100) != 0)
3939 fwKeys |= VK_SHIFT;
3940
3941 //
3942 // Simulate right mouse button click
3943 //
3944 POINTL vPoint;
3945
3946 ::WinQueryMsgPos(vHabmain, &vPoint);
3947 *pX = vPoint.x;
3948 *pY = vPoint.y;
3949
3950 pWin->ScreenToClient(pX, pY);
3951 } // end of TranslateKbdEventToMouse
3952