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