1 /////////////////////////////////////////////////////////////////////////////
4 // Author: David Webster
8 // Copyright: (c) David Webster
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
13 // For compilers that support precompilation, includes "wx.h".
15 #include "wx/wxprec.h"
21 #include "wx/window.h"
26 #include "wx/dcclient.h"
30 #include "wx/layout.h"
31 #include "wx/dialog.h"
33 #include "wx/listbox.h"
34 #include "wx/button.h"
35 #include "wx/msgdlg.h"
41 #include "wx/ownerdrw.h"
44 #if wxUSE_DRAG_AND_DROP
48 #include "wx/menuitem.h"
51 #include "wx/os2/private.h"
54 #include "wx/tooltip.h"
65 #include "wx/textctrl.h"
70 // Place compiler, OS specific includes here
74 // Standard macros -- these are for OS/2 PM, but most GUI's have something similar
78 // SHORT1FROMMP -- LOWORD
80 #define GET_X_LPARAM(mp) ((unsigned short)(unsigned long)(mp))
82 // SHORT2FROMMP -- HIWORD
84 #define GET_Y_LPARAM(mp) ((unsigned short)(unsigned long)(mp >> 16))
85 #endif // GET_X_LPARAM
88 # define CW_USEDEFAULT ((int)0x80000000)
91 // ---------------------------------------------------------------------------
93 // ---------------------------------------------------------------------------
96 // The last Windows message we got (MT-UNSAFE)
100 wxMenu
* wxCurrentPopupMenu
= NULL
;
101 extern wxList WXDLLEXPORT wxPendingDelete
;
102 #if !defined(__VISAGECPP__) || (__IBMCPP__ < 400)
103 extern wxChar wxCanvasClassName
[];
105 wxList
* wxWinHandleList
= NULL
;
107 // ---------------------------------------------------------------------------
109 // ---------------------------------------------------------------------------
112 // the window proc for all our windows; most gui's have something similar
114 MRESULT EXPENTRY
wxWndProc( HWND hWnd
121 const char *wxGetMessageName(int message
);
124 void wxRemoveHandleAssociation(wxWindow
* pWin
);
125 void wxAssociateWinWithHandle( HWND hWnd
128 wxWindow
* wxFindWinFromHandle(WXHWND hWnd
);
131 // This magical function is used to translate VK_APPS key presses to right
134 static void TranslateKbdEventToMouse( wxWindow
* pWin
141 // get the current state of SHIFT/CTRL keys
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 // ---------------------------------------------------------------------------
147 // ---------------------------------------------------------------------------
149 IMPLEMENT_DYNAMIC_CLASS(wxWindow
, wxWindowBase
)
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
)
159 // ===========================================================================
161 // ===========================================================================
164 // Find an item given the PM Window id
166 wxWindow
* wxWindow::FindItem(
170 wxControl
* pItem
= wxDynamicCast( this
177 // I it we or one of our "internal" children?
179 if (pItem
->GetId() == lId
||
180 (pItem
->GetSubcontrols().Index(lId
) != wxNOT_FOUND
))
186 wxWindowList::Node
* pCurrent
= GetChildren().GetFirst();
190 wxWindow
* pChildWin
= pCurrent
->GetData();
191 wxWindow
* pWnd
= pChildWin
->FindItem(lId
);
196 pCurrent
= pCurrent
->GetNext();
199 } // end of wxWindow::FindItem
202 // Find an item given the PM Window handle
204 wxWindow
* wxWindow::FindItemByHWND(
209 wxWindowList::Node
* pCurrent
= GetChildren().GetFirst();
213 wxWindow
* pParent
= pCurrent
->GetData();
216 // Do a recursive search.
218 wxWindow
* pWnd
= pParent
->FindItemByHWND(hWnd
);
223 if (!bControlOnly
|| pParent
->IsKindOf(CLASSINFO(wxControl
)))
225 wxWindow
* pItem
= pCurrent
->GetData();
227 if (pItem
->GetHWND() == hWnd
)
231 if (pItem
->ContainsHWND(hWnd
))
235 pCurrent
= pCurrent
->GetNext();
238 } // end of wxWindow::FindItemByHWND
241 // Default command handler
243 bool wxWindow::OS2Command(
244 WXUINT
WXUNUSED(uParam
)
245 , WXWORD
WXUNUSED(uId
)
251 // ----------------------------------------------------------------------------
252 // constructors and such
253 // ----------------------------------------------------------------------------
255 void wxWindow::Init()
265 m_bDoubleClickAllowed
= 0;
266 m_bWinCaptured
= FALSE
;
268 m_isBeingDeleted
= FALSE
;
271 m_bMouseInWindow
= FALSE
;
278 m_hWndScrollBarHorz
= 0L;
279 m_hWndScrollBarVert
= 0L;
282 // Pass WM_GETDLGCODE to DefWindowProc()
287 m_bBackgroundTransparent
= FALSE
;
290 // As all windows are created with WS_VISIBLE style...
294 #if wxUSE_MOUSEEVENT_HACK
297 m_nLastMouseEvent
= -1;
298 #endif // wxUSE_MOUSEEVENT_HACK
304 wxWindow::~wxWindow()
306 m_isBeingDeleted
= TRUE
;
308 OS2DetachWindowMenu();
310 m_parent
->RemoveChild(this);
315 if(!::WinDestroyWindow(GetHWND()))
316 wxLogLastError(wxT("DestroyWindow"));
318 // remove hWnd <-> wxWindow association
320 wxRemoveHandleAssociation(this);
322 } // end of wxWindow::~wxWindow
324 bool wxWindow::Create(
327 , const wxPoint
& rPos
328 , const wxSize
& rSize
330 , const wxString
& rName
333 HWND hParent
= NULLHANDLE
;
334 wxPoint vPos
= rPos
; // The OS/2 position
336 wxCHECK_MSG(pParent
, FALSE
, wxT("can't create wxWindow without parent"));
338 if ( !CreateBase( pParent
352 pParent
->AddChild(this);
353 hParent
= GetWinHwnd(pParent
);
355 // OS2 uses normal coordinates, no bassackwards Windows ones
357 nTempy
= pParent
->GetSize().y
- (vPos
.y
+ rSize
.y
);
361 nTempy
= pParent
->GetSize().y
+ (vPos
.y
+ rSize
.y
);
362 pParent
->SetSize(0, 0, pParent
->GetSize().x
, nTempy
);
363 nTempy
= pParent
->GetSize().y
- (vPos
.y
+ rSize
.y
);
372 ::WinQueryWindowRect(HWND_DESKTOP
, &vRect
);
373 hParent
= HWND_DESKTOP
;
374 vPos
.y
= vRect
.yTop
- (vPos
.y
+ rSize
.y
);
377 ULONG ulCreateFlags
= 0L;
381 // Most wxSTYLES are really PM Class specific styles and will be
382 // set in those class create procs. PM's basic windows styles are
385 ulCreateFlags
|= WS_VISIBLE
;
388 if ( lStyle
& wxCLIP_SIBLINGS
)
389 ulCreateFlags
|= WS_CLIPSIBLINGS
;
391 if (lStyle
& wxCLIP_CHILDREN
)
392 ulCreateFlags
|= WS_CLIPCHILDREN
;
395 // Empty stuff for now since PM has no custome 3D effects
396 // Doesn't mean someone cannot make some up though
399 WXDWORD dwExStyle
= Determine3DEffects(WS_EX_CLIENTEDGE
, &bWant3D
);
402 // Generic OS/2 Windows are created with no owner, no Z Order, no Control data,
403 // and no presentation parameters
406 ,(PSZ
)wxCanvasClassName
411 ,WidthDefault(rSize
.x
)
412 ,HeightDefault(rSize
.y
)
419 } // end of wxWindow::Create
421 // ---------------------------------------------------------------------------
423 // ---------------------------------------------------------------------------
425 void wxWindow::SetFocus()
427 HWND hWnd
= GetHwnd();
430 ::WinSetFocus(HWND_DESKTOP
, hWnd
);
431 } // end of wxWindow::SetFocus
433 wxWindow
* wxWindowBase::FindFocus()
435 HWND hWnd
= ::WinQueryFocus(HWND_DESKTOP
);
439 return wxFindWinFromHandle((WXHWND
)hWnd
);
442 } // wxWindowBase::FindFocus
444 bool wxWindow::Enable(
448 if (!wxWindowBase::Enable(bEnable
))
451 HWND hWnd
= GetHwnd();
454 ::WinEnableWindow(hWnd
, (BOOL
)bEnable
);
456 wxWindowList::Node
* pNode
= GetChildren().GetFirst();
460 wxWindow
* pChild
= pNode
->GetData();
462 pChild
->Enable(bEnable
);
463 pNode
= pNode
->GetNext();
466 } // end of wxWindow::Enable
472 if (!wxWindowBase::Show(bShow
))
475 HWND hWnd
= GetHwnd();
477 ::WinShowWindow(hWnd
, bShow
);
481 ::WinSetWindowPos(hWnd
, HWND_TOP
, 0, 0, 0, 0, SWP_ACTIVATE
| SWP_ZORDER
);
484 } // end of wxWindow::Show
486 void wxWindow::Raise()
488 ::WinSetWindowPos(GetHwnd(), HWND_TOP
, 0, 0, 0, 0, SWP_ZORDER
| SWP_ACTIVATE
);
489 } // end of wxWindow::Raise
491 void wxWindow::Lower()
493 ::WinSetWindowPos(GetHwnd(), HWND_BOTTOM
, 0, 0, 0, 0, SWP_ZORDER
| SWP_DEACTIVATE
);
494 } // end of wxWindow::Lower
496 void wxWindow::SetTitle(
497 const wxString
& rTitle
500 ::WinSetWindowText(GetHwnd(), rTitle
.c_str());
501 } // end of wxWindow::SetTitle
503 wxString
wxWindow::GetTitle() const
505 return wxGetWindowText(GetHWND());
506 } // end of wxWindow::GetTitle
508 void wxWindow::CaptureMouse()
510 HWND hWnd
= GetHwnd();
512 if (hWnd
&& !m_bWinCaptured
)
514 ::WinSetCapture(HWND_DESKTOP
, hWnd
);
515 m_bWinCaptured
= TRUE
;
517 } // end of wxWindow::GetTitle
519 void wxWindow::ReleaseMouse()
523 ::WinSetCapture(HWND_DESKTOP
, NULLHANDLE
);
524 m_bWinCaptured
= FALSE
;
526 } // end of wxWindow::ReleaseMouse
528 bool wxWindow::SetFont(
532 if (!wxWindowBase::SetFont(rFont
))
538 HWND hWnd
= GetHwnd();
544 sprintf(zFont
, "%d.%s", rFont
.GetPointSize(), rFont
.GetFaceName().c_str());
545 return(::WinSetPresParam(hWnd
, PP_FONTNAMESIZE
, strlen(zFont
), (PVOID
)zFont
));
550 bool wxWindow::SetCursor(
551 const wxCursor
& rCursor
552 ) // check if base implementation is OK
554 if ( !wxWindowBase::SetCursor(rCursor
))
560 wxASSERT_MSG( m_cursor
.Ok(),
561 wxT("cursor must be valid after call to the base version"));
563 HWND hWnd
= GetHwnd();
569 hPS
= ::WinGetPS(hWnd
);
571 ::WinQueryPointerPos(HWND_DESKTOP
, &vPoint
);
572 ::WinQueryWindowRect(hWnd
, &vRect
);
574 hRGN
= ::GpiCreateRegion(hPS
, 1L, &vRect
);
576 if ((::GpiPtInRegion(hPS
, hRGN
, &vPoint
) == PRGN_INSIDE
) && !wxIsBusy())
578 ::WinSetPointer(HWND_DESKTOP
, (HPOINTER
)m_cursor
.GetHCURSOR());
581 } // end of wxWindow::SetCursor
583 void wxWindow::WarpPointer(
592 ::WinQueryWindowRect(GetHwnd(), &vRect
);
596 ::WinSetPointerPos(HWND_DESKTOP
, (LONG
)nX
, (LONG
)(nY
));
597 } // end of wxWindow::WarpPointer
599 #if WXWIN_COMPATIBILITY
600 void wxWindow::OS2DeviceToLogical (float *x
, float *y
) const
603 #endif // WXWIN_COMPATIBILITY
605 // ---------------------------------------------------------------------------
607 // ---------------------------------------------------------------------------
609 #if WXWIN_COMPATIBILITY
610 void wxWindow::SetScrollRange(
616 int nRange1
= nRange
;
617 int nPageSize
= GetScrollPage(nOrient
);
619 if (nPpageSize
> 1 && nRange
> 0)
621 nRange1
+= (nPageSize
- 1);
624 if (nOrient
== wxHORIZONTAL
)
626 ::WinSendMsg(m_hWndScrollBarHorz
, SBM_SETSCROLLBAR
, (MPARAM
)0, MPFROM2SHORT(0, (SHORT
)nRange1
));
627 ::WinSendMsg(m_hWndScrollBarHorz
, SBM_SETTHUMBSIZE
, MPFROM2SHORT((SHORT
)nThumbVisible
, (SHORT
)nRange1
), (MPARAM
)0);
631 ::WinSendMsg(m_hWndScrollBarVert
, SBM_SETSCROLLBAR
, (MPARAM
)0, MPFROM2SHORT(0, (SHORT
)nRange1
));
632 ::WinSendMsg(m_hWndScrollBarVert
, SBM_SETTHUMBSIZE
, MPFROM2SHORT((SHORT
)nThumbVisible
, (SHORT
)nRange1
), (MPARAM
)0);
634 } // end of wxWindow::SetScrollRange
636 void wxWindow::SetScrollPage(
642 if (nOrient
== wxHORIZONTAL
)
643 m_nXThumbSize
= nPage
;
645 m_nYThumbSize
= nPage
;
646 } // end of wxWindow::SetScrollPage
648 int wxWindow::OldGetScrollRange(
653 HWND hWnd
= GetHwnd();
657 mRc
= WinSendMsg(hWnd
, SBM_QUERYRANGE
, (MPARAM
)0L, (MPARAM
)0L);
658 return(SHORT2FROMMR(mRc
));
661 } // end of wxWindow::OldGetScrollRange
663 int wxWindow::GetScrollPage(
667 if (nOrient
== wxHORIZONTAL
)
668 return m_nXThumbSize
;
670 return m_nYThumbSize
;
671 } // end of wxWindow::GetScrollPage
672 #endif // WXWIN_COMPATIBILITY
674 int wxWindow::GetScrollPos(
678 if (nOrient
== wxHORIZONTAL
)
679 return((int)::WinSendMsg(m_hWndScrollBarHorz
, SBM_QUERYPOS
, (MPARAM
)NULL
, (MPARAM
)NULL
));
681 return((int)::WinSendMsg(m_hWndScrollBarVert
, SBM_QUERYPOS
, (MPARAM
)NULL
, (MPARAM
)NULL
));
682 } // end of wxWindow::GetScrollPos
684 int wxWindow::GetScrollRange(
690 if (nOrient
== wxHORIZONTAL
)
691 mr
= ::WinSendMsg(m_hWndScrollBarHorz
, SBM_QUERYRANGE
, (MPARAM
)NULL
, (MPARAM
)NULL
);
693 mr
= ::WinSendMsg(m_hWndScrollBarVert
, SBM_QUERYRANGE
, (MPARAM
)NULL
, (MPARAM
)NULL
);
694 return((int)SHORT2FROMMR(mr
));
695 } // end of wxWindow::GetScrollRange
697 int wxWindow::GetScrollThumb(
701 if (nOrient
== wxHORIZONTAL
)
702 return m_nXThumbSize
;
704 return m_nYThumbSize
;
705 } // end of wxWindow::GetScrollThumb
707 void wxWindow::SetScrollPos(
713 if (nOrient
== wxHORIZONTAL
)
714 ::WinSendMsg(m_hWndScrollBarHorz
, SBM_SETPOS
, (MPARAM
)nPos
, (MPARAM
)NULL
);
716 ::WinSendMsg(m_hWndScrollBarVert
, SBM_SETPOS
, (MPARAM
)nPos
, (MPARAM
)NULL
);
717 } // end of wxWindow::SetScrollPos(
719 void wxWindow::SetScrollbar(
727 int nOldRange
= nRange
- nThumbVisible
;
728 int nRange1
= nOldRange
;
729 int nPageSize
= nThumbVisible
;
731 HWND hWnd
= GetHwnd();
732 ULONG ulStyle
= WS_VISIBLE
| WS_SYNCPAINT
;
735 ::WinQueryWindowRect(hWnd
, &vRect
);
736 if (nPageSize
> 1 && nRange
> 0)
738 nRange1
+= (nPageSize
- 1);
741 vInfo
.cb
= sizeof(SBCDATA
);
743 vInfo
.posLast
= (SHORT
)nRange1
;
744 vInfo
.posThumb
= nPos
;
746 if (nOrient
== wxHORIZONTAL
)
749 if (m_hWndScrollBarHorz
== 0L)
752 // We create the scrollbars with the desktop so that they are not
753 // registered as child windows of the window in order that child
754 // windows may be scrolled without scrolling the scrollbars themselves!
756 m_hWndScrollBarHorz
= ::WinCreateWindow( hWnd
762 ,vRect
.xRight
- vRect
.xLeft
776 // Only want to resize the scrollbar if it changes, otherwise
777 // we'd probably end up in a recursive loop until we crash the call stack
778 // because this method is called in a ScrolledWindow OnSize event and SWP_MOVE | SWP_SIZE
779 // generates those events.
781 ::WinQueryWindowRect(m_hWndScrollBarHorz
, &vRect2
);
782 if (!(vRect2
.xLeft
== vRect
.xLeft
&&
783 vRect2
.xRight
== vRect
.xRight
&&
784 vRect2
.yBottom
== vRect
.yBottom
&&
785 vRect2
.yTop
== vRect
.yTop
788 ::WinSetWindowPos( m_hWndScrollBarHorz
792 ,vRect
.xRight
- vRect
.xLeft
794 ,SWP_ACTIVATE
| SWP_MOVE
| SWP_SIZE
| SWP_SHOW
797 ::WinSendMsg(m_hWndScrollBarHorz
, SBM_SETSCROLLBAR
, (MPARAM
)nPos
, MPFROM2SHORT(0, (SHORT
)nRange1
));
798 ::WinSendMsg(m_hWndScrollBarHorz
, SBM_SETTHUMBSIZE
, MPFROM2SHORT((SHORT
)nThumbVisible
, (SHORT
)nRange1
), (MPARAM
)0);
804 if (m_hWndScrollBarVert
== 0L)
806 m_hWndScrollBarVert
= ::WinCreateWindow( hWnd
813 ,vRect
.yTop
- (vRect
.yBottom
+ 20)
826 // Only want to resize the scrollbar if it changes, otherwise
827 // we'd probably end up in a recursive loop until we crash the call stack
828 // because this method is called in a ScrolledWindow OnSize event and SWP_MOVE | SWP_SIZE
829 // generates those events.
831 ::WinQueryWindowRect(m_hWndScrollBarVert
, &vRect2
);
832 if (!(vRect2
.xLeft
== vRect
.xLeft
&&
833 vRect2
.xRight
== vRect
.xRight
&&
834 vRect2
.yBottom
== vRect
.yBottom
&&
835 vRect2
.yTop
== vRect
.yTop
838 ::WinSetWindowPos( m_hWndScrollBarVert
843 ,vRect
.yTop
- (vRect
.yBottom
+ 20)
844 ,SWP_ACTIVATE
| SWP_MOVE
| SWP_SIZE
| SWP_SHOW
847 ::WinSendMsg(m_hWndScrollBarVert
, SBM_SETSCROLLBAR
, (MPARAM
)nPos
, MPFROM2SHORT(0, (SHORT
)nRange1
));
848 ::WinSendMsg(m_hWndScrollBarVert
, SBM_SETTHUMBSIZE
, MPFROM2SHORT((SHORT
)nThumbVisible
, (SHORT
)nRange1
), (MPARAM
)0);
850 m_nYThumbSize
= nThumbVisible
;
852 } // end of wxWindow::SetScrollbar
854 void wxWindow::ScrollWindow(
857 , const wxRect
* pRect
863 nDy
*= -1; // flip the sign of Dy as OS/2 is opposite wxWin.
866 vRect2
.xLeft
= pRect
->x
;
867 vRect2
.yTop
= pRect
->y
+ pRect
->height
;
868 vRect2
.xRight
= pRect
->x
+ pRect
->width
;
869 vRect2
.yBottom
= pRect
->y
;
873 ::WinQueryWindowRect(GetHwnd(), &vRect2
);
874 ::WinQueryWindowRect(m_hWndScrollBarHorz
, &vRect
);
875 vRect2
.yBottom
+= vRect
.yTop
- vRect
.yBottom
;
876 ::WinQueryWindowRect(m_hWndScrollBarVert
, &vRect
);
877 vRect2
.xRight
-= vRect
.xRight
- vRect
.xLeft
;
881 ::WinScrollWindow( GetHwnd()
891 ::WinScrollWindow( GetHwnd()
903 wxWindowList::Node
* pCurrent
= GetChildren().GetFirst();
908 wxWindow
* pChildWin
= pCurrent
->GetData();
910 ::WinQueryWindowPos(pChildWin
->GetHWND(), &vSwp
);
911 ::WinSetWindowPos( pChildWin
->GetHWND()
917 , SWP_MOVE
| SWP_SHOW
919 pCurrent
= pCurrent
->GetNext();
921 } // end of wxWindow::ScrollWindow
923 // ---------------------------------------------------------------------------
925 // ---------------------------------------------------------------------------
927 void wxWindow::SubclassWin(
931 HWND hwnd
= (HWND
)hWnd
;
933 wxASSERT_MSG( !m_fnOldWndProc
, wxT("subclassing window twice?") );
934 wxCHECK_RET(::WinIsWindow(vHabmain
, hwnd
), wxT("invalid HWND in SubclassWin") );
935 m_fnOldWndProc
= (WXFARPROC
) ::WinSubclassWindow(hwnd
, (PFNWP
)wxWndProc
);
936 } // end of wxWindow::SubclassWin
938 void wxWindow::UnsubclassWin()
941 // Restore old Window proc
943 HWND hwnd
= GetHWND();
947 wxCHECK_RET( ::WinIsWindow(vHabmain
, hwnd
), wxT("invalid HWND in UnsubclassWin") );
949 PFNWP fnProc
= (PFNWP
)::WinQueryWindowPtr(hwnd
, QWP_PFNWP
);
951 if ( (m_fnOldWndProc
!= 0) && (fnProc
!= (PFNWP
) m_fnOldWndProc
))
953 WinSubclassWindow(hwnd
, (PFNWP
)m_fnOldWndProc
);
957 } // end of wxWindow::UnsubclassWin
960 // Make a Windows extended style from the given wxWindows window style
962 WXDWORD
wxWindow::MakeExtendedStyle(
964 , bool bEliminateBorders
968 // PM does not support extended style
972 } // end of wxWindow::MakeExtendedStyle
975 // Determines whether native 3D effects or CTL3D should be used,
976 // applying a default border style if required, and returning an extended
977 // style to pass to CreateWindowEx.
979 WXDWORD
wxWindow::Determine3DEffects(
980 WXDWORD dwDefaultBorderStyle
984 WXDWORD dwStyle
= 0L;
987 // Native PM does not have any specialize 3D effects like WIN32 does
991 } // end of wxWindow::Determine3DEffects
993 #if WXWIN_COMPATIBILITY
994 void wxWindow::OnCommand(
996 , wxCommandEvent
& rEvent
999 if (GetEventHandler()->ProcessEvent(rEvent
))
1002 m_parent
->GetEventHandler()->OnCommand( rWin
1005 } // end of wxWindow::OnCommand
1007 wxObject
* wxWindow::GetChild(
1012 // Return a pointer to the Nth object in the Panel
1014 wxNode
* pNode
= GetChildren().First();
1017 while (pNode
&& n
--)
1018 pNode
= pNode
->Next();
1021 wxObject
* pObj
= (wxObject
*)pNode
->Data();
1026 } // end of wxWindow::GetChild
1028 #endif // WXWIN_COMPATIBILITY
1031 // Setup background and foreground colours correctly
1033 void wxWindow::SetupColours()
1036 SetBackgroundColour(GetParent()->GetBackgroundColour());
1037 } // end of wxWindow::SetupColours
1039 void wxWindow::OnIdle(
1044 // Check if we need to send a LEAVE event
1046 if (m_bMouseInWindow
)
1050 ::WinQueryPointerPos(HWND_DESKTOP
, &vPoint
);
1051 if (::WinWindowFromPoint(HWND_DESKTOP
, &vPoint
, FALSE
) != (HWND
)GetHwnd())
1054 // Generate a LEAVE event
1056 m_bMouseInWindow
= FALSE
;
1059 // Unfortunately the mouse button and keyboard state may have changed
1060 // by the time the OnIdle function is called, so 'state' may be
1065 if (::WinGetKeyState(HWND_DESKTOP
, VK_SHIFT
) != 0)
1067 if (::WinGetKeyState(HWND_DESKTOP
, VK_CTRL
) != 0);
1070 wxMouseEvent
rEvent(wxEVT_LEAVE_WINDOW
);
1072 InitMouseEvent( rEvent
1077 (void)GetEventHandler()->ProcessEvent(rEvent
);
1081 } // end of wxWindow::OnIdle
1084 // Set this window to be the child of 'parent'.
1086 bool wxWindow::Reparent(
1090 if (!wxWindowBase::Reparent(pParent
))
1093 HWND hWndChild
= GetHwnd();
1094 HWND hWndParent
= GetParent() ? GetWinHwnd(GetParent()) : (HWND
)0;
1096 ::WinSetParent(hWndChild
, hWndParent
, TRUE
);
1098 } // end of wxWindow::Reparent
1100 void wxWindow::Clear()
1102 wxClientDC
vDc(this);
1103 wxBrush
vBrush( GetBackgroundColour()
1107 vDc
.SetBackground(vBrush
);
1109 } // end of wxWindow::Clear
1111 void wxWindow::Refresh(
1113 , const wxRect
* pRect
1116 HWND hWnd
= GetHwnd();
1124 vOs2Rect
.xLeft
= pRect
->x
;
1125 vOs2Rect
.yTop
= pRect
->y
;
1126 vOs2Rect
.xRight
= pRect
->x
+ pRect
->width
;
1127 vOs2Rect
.yBottom
= pRect
->y
+ pRect
->height
;
1129 ::WinInvalidateRect(hWnd
, &vOs2Rect
, bEraseBack
);
1132 ::WinInvalidateRect(hWnd
, NULL
, bEraseBack
);
1134 } // end of wxWindow::Refresh
1136 // ---------------------------------------------------------------------------
1138 // ---------------------------------------------------------------------------
1140 #if wxUSE_DRAG_AND_DROP
1141 void wxWindow::SetDropTarget(
1142 wxDropTarget
* pDropTarget
1145 if (m_dropTarget
!= 0)
1147 m_dropTarget
->Revoke(m_hWnd
);
1148 delete m_dropTarget
;
1150 m_dropTarget
= pDropTarget
;
1151 if (m_dropTarget
!= 0)
1152 m_dropTarget
->Register(m_hWnd
);
1153 } // end of wxWindow::SetDropTarget
1157 // old style file-manager drag&drop support: we retain the old-style
1158 // DragAcceptFiles in parallel with SetDropTarget.
1160 void wxWindow::DragAcceptFiles(
1164 HWND hWnd
= GetHwnd();
1166 if (hWnd
&& bAccept
)
1167 ::DrgAcceptDroppedFiles(hWnd
, NULL
, NULL
, DO_COPY
, 0L);
1168 } // end of wxWindow::DragAcceptFiles
1170 // ----------------------------------------------------------------------------
1172 // ----------------------------------------------------------------------------
1176 void wxWindow::DoSetToolTip(
1180 wxWindowBase::DoSetToolTip(pTooltip
);
1183 m_tooltip
->SetWindow(this);
1184 } // end of wxWindow::DoSetToolTip
1186 #endif // wxUSE_TOOLTIPS
1188 // ---------------------------------------------------------------------------
1189 // moving and resizing
1190 // ---------------------------------------------------------------------------
1193 void wxWindow::DoGetSize(
1198 HWND hWnd
= GetHwnd();
1201 ::WinQueryWindowRect(hWnd
, &vRect
);
1204 *pWidth
= vRect
.xRight
- vRect
.xLeft
;
1206 // OS/2 PM is backwards from windows
1207 *pHeight
= vRect
.yTop
- vRect
.yBottom
;
1208 } // end of wxWindow::DoGetSize
1210 void wxWindow::DoGetPosition(
1215 HWND hWnd
= GetHwnd();
1219 ::WinQueryWindowRect(hWnd
, &vRect
);
1221 vPoint
.x
= vRect
.xLeft
;
1222 vPoint
.y
= vRect
.yBottom
;
1225 // We do the adjustments with respect to the parent only for the "real"
1226 // children, not for the dialogs/frames
1230 HWND hParentWnd
= 0;
1231 wxWindow
* pParent
= GetParent();
1234 hParentWnd
= GetWinHwnd(pParent
);
1237 // Since we now have the absolute screen coords, if there's a parent we
1238 // must subtract its bottom left corner
1244 ::WinQueryWindowRect(hParentWnd
, &vRect2
);
1245 vPoint
.x
-= vRect
.xLeft
;
1246 vPoint
.y
-= vRect
.yBottom
;
1250 // We may be faking the client origin. So a window that's really at (0,
1251 // 30) may appear (to wxWin apps) to be at (0, 0).
1253 wxPoint
vPt(pParent
->GetClientAreaOrigin());
1263 } // end of wxWindow::DoGetPosition
1265 void wxWindow::DoScreenToClient(
1270 HWND hWnd
= GetHwnd();
1273 ::WinQueryWindowPos(hWnd
, &vSwp
);
1279 } // end of wxWindow::DoScreenToClient
1281 void wxWindow::DoClientToScreen(
1286 HWND hWnd
= GetHwnd();
1289 ::WinQueryWindowPos(hWnd
, &vSwp
);
1295 } // end of wxWindow::DoClientToScreen
1298 // Get size *available for subwindows* i.e. excluding menu bar etc.
1299 // Must be a frame type window
1301 void wxWindow::DoGetClientSize(
1306 HWND hWnd
= GetHwnd();
1310 if (IsKindOf(CLASSINFO(wxFrame
)))
1311 hWndClient
= ::WinWindowFromID(GetHwnd(), FID_CLIENT
);
1313 hWndClient
= NULLHANDLE
;
1314 if( hWndClient
== NULLHANDLE
)
1315 ::WinQueryWindowRect(GetHwnd(), &vRect
);
1317 ::WinQueryWindowRect(hWndClient
, &vRect
);
1320 *pWidth
= vRect
.xRight
;
1322 *pHeight
= vRect
.yTop
;
1323 } // end of wxWindow::DoGetClientSize
1325 void wxWindow::DoMoveWindow(
1332 if ( !::WinSetWindowPos( GetHwnd()
1338 ,SWP_SIZE
| SWP_MOVE
1341 wxLogLastError("MoveWindow");
1343 } // end of wxWindow::DoMoveWindow
1346 // Set the size of the window: if the dimensions are positive, just use them,
1347 // but if any of them is equal to -1, it means that we must find the value for
1348 // it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1349 // which case -1 is a valid value for x and y)
1351 // If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1352 // the width/height to best suit our contents, otherwise we reuse the current
1355 void wxWindow::DoSetSize(
1364 // Get the current size and position...
1370 wxSize
vSize(-1, -1);
1372 GetPosition( &nCurrentX
1375 GetSize( &nCurrentWidth
1380 // ... and don't do anything (avoiding flicker) if it's already ok
1382 if ( nX
== nCurrentX
&&
1384 nWidth
== nCurrentWidth
&&
1385 nHeight
== nCurrentHeight
1391 if (nX
== -1 && !(nSizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
1393 if (nY
== -1 && !(nSizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
1396 AdjustForParentClientOrigin( nX
1403 if (nSizeFlags
& wxSIZE_AUTO_WIDTH
)
1405 vSize
= DoGetBestSize();
1411 // Just take the current one
1413 nWidth
= nCurrentWidth
;
1419 if (nSizeFlags
& wxSIZE_AUTO_HEIGHT
)
1423 vSize
= DoGetBestSize();
1429 // just take the current one
1430 nHeight
= nCurrentHeight
;
1439 } // end of wxWindow::DoSetSize
1441 void wxWindow::DoSetClientSize(
1446 wxWindow
* pParent
= GetParent();
1447 HWND hWnd
= GetHwnd();
1448 HWND hParentWnd
= (HWND
)0;
1449 HWND hClientWnd
= (HWND
)0;
1454 hClientWnd
= ::WinWindowFromID(GetHwnd(), FID_CLIENT
);
1455 ::WinQueryWindowRect(hClientWnd
, &vRect2
);
1458 hParentWnd
= (HWND
) pParent
->GetHWND();
1460 ::WinQueryWindowRect(hWnd
, &vRect
);
1461 ::WinQueryWindowRect(hParentWnd
, &vRect3
);
1463 // Find the difference between the entire window (title bar and all)
1464 // and the client area; add this to the new client size to move the
1465 // window. OS/2 is backward from windows on height
1467 int nActualWidth
= vRect2
.xRight
- vRect2
.xLeft
- vRect
.xRight
+ nWidth
;
1468 int nActualHeight
= vRect2
.yTop
- vRect2
.yBottom
- vRect
.yTop
+ nHeight
;
1471 // If there's a parent, must subtract the parent's bottom left corner
1472 // since MoveWindow moves relative to the parent
1476 vPoint
.x
= vRect2
.xLeft
;
1477 vPoint
.y
= vRect2
.yBottom
;
1480 vPoint
.x
-= vRect3
.xLeft
;
1481 vPoint
.y
-= vRect3
.yBottom
;
1484 DoMoveWindow( vPoint
.x
1490 wxSizeEvent
vEvent( wxSize( nWidth
1496 vEvent
.SetEventObject(this);
1497 GetEventHandler()->ProcessEvent(vEvent
);
1498 } // end of wxWindow::DoSetClientSize
1500 wxPoint
wxWindow::GetClientAreaOrigin() const
1502 return wxPoint(0, 0);
1503 } // end of wxWindow::GetClientAreaOrigin
1505 void wxWindow::AdjustForParentClientOrigin(
1512 // Don't do it for the dialogs/frames - they float independently of their
1517 wxWindow
* pParent
= GetParent();
1519 if (!(nSizeFlags
& wxSIZE_NO_ADJUSTMENTS
) && pParent
)
1521 wxPoint
vPoint(pParent
->GetClientAreaOrigin());
1526 } // end of wxWindow::AdjustForParentClientOrigin
1528 // ---------------------------------------------------------------------------
1530 // ---------------------------------------------------------------------------
1532 int wxWindow::GetCharHeight() const
1535 FONTMETRICS vFontMetrics
;
1538 hPs
= ::WinGetPS(GetHwnd());
1540 if(!GpiQueryFontMetrics(hPs
, sizeof(FONTMETRICS
), &vFontMetrics
))
1542 ::WinReleasePS(hPs
);
1545 ::WinReleasePS(hPs
);
1546 return(vFontMetrics
.lMaxAscender
+ vFontMetrics
.lMaxDescender
);
1547 } // end of wxWindow::GetCharHeight
1549 int wxWindow::GetCharWidth() const
1552 FONTMETRICS vFontMetrics
;
1554 hPs
= ::WinGetPS(GetHwnd());
1556 if(!GpiQueryFontMetrics(hPs
, sizeof(FONTMETRICS
), &vFontMetrics
))
1558 ::WinReleasePS(hPs
);
1561 ::WinReleasePS(hPs
);
1562 return(vFontMetrics
.lAveCharWidth
);
1563 } // end of wxWindow::GetCharWidth
1565 void wxWindow::GetTextExtent(
1566 const wxString
& rString
1570 , int* pExternalLeading
1571 , const wxFont
* pTheFont
1574 const wxFont
* pFontToUse
= pTheFont
;
1577 hPs
= ::WinGetPS(GetHwnd());
1579 // TODO: Will have to play with fonts later
1582 pFontToUse = &m_font;
1585 HFONT hFfontOld = 0;
1587 if (pFontToUse && pFontToUse->Ok())
1590 hFnt = (HFONT)((wxFont *)pFontToUse)->GetResourceHandle(); // const_cast
1592 hFontOld = (HFONT)SelectObject(dc,fnt);
1597 GetTextExtentPoint(dc, string, (int)string.Length(), &sizeRect);
1598 GetTextMetrics(dc, &tm);
1600 if ( fontToUse && fnt && hfontOld )
1601 SelectObject(dc, hfontOld);
1603 ReleaseDC(hWnd, dc);
1610 *descent = tm.tmDescent;
1611 if ( externalLeading )
1612 *externalLeading = tm.tmExternalLeading;
1614 ::WinReleasePS(hPs
);
1617 #if wxUSE_CARET && WXWIN_COMPATIBILITY
1618 // ---------------------------------------------------------------------------
1619 // Caret manipulation
1620 // ---------------------------------------------------------------------------
1622 void wxWindow::CreateCaret(
1627 SetCaret(new wxCaret( this
1631 } // end of wxWindow::CreateCaret
1633 void wxWindow::CreateCaret(
1634 const wxBitmap
* pBitmap
1637 wxFAIL_MSG("not implemented");
1638 } // end of wxWindow::CreateCaret
1640 void wxWindow::ShowCaret(
1644 wxCHECK_RET( m_caret
, "no caret to show" );
1646 m_caret
->Show(bShow
);
1647 } // end of wxWindow::ShowCaret
1649 void wxWindow::DestroyCaret()
1652 } // end of wxWindow::DestroyCaret
1654 void wxWindow::SetCaretPos(
1658 wxCHECK_RET( m_caret
, "no caret to move" );
1663 } // end of wxWindow::SetCaretPos
1665 void wxWindow::GetCaretPos(
1670 wxCHECK_RET( m_caret
, "no caret to get position of" );
1672 m_caret
->GetPosition( pX
1675 } // end of wxWindow::GetCaretPos
1677 #endif //wxUSE_CARET
1679 // ---------------------------------------------------------------------------
1681 // ---------------------------------------------------------------------------
1683 bool wxWindow::DoPopupMenu(
1689 HWND hWnd
= GetHwnd();
1690 HWND hWndParent
= GetParent() ? GetWinHwnd(GetParent()) : (HWND
)0;
1691 HWND hMenu
= GetHmenuOf(pMenu
);
1693 pMenu
->SetInvokingWindow(this);
1696 DoClientToScreen( &nX
1699 wxCurrentPopupMenu
= pMenu
;
1701 ::WinPopupMenu( hWndParent
1707 ,PU_MOUSEBUTTON2DOWN
| PU_MOUSEBUTTON2
| PU_KEYBOARD
1710 wxCurrentPopupMenu
= NULL
;
1712 pMenu
->SetInvokingWindow(NULL
);
1714 } // end of wxWindow::DoPopupMenu
1716 // ===========================================================================
1717 // pre/post message processing
1718 // ===========================================================================
1720 MRESULT
wxWindow::OS2DefWindowProc(
1727 return (MRESULT
)m_fnOldWndProc(GetHWND(), (ULONG
)uMsg
, (MPARAM
)wParam
, (MPARAM
)lParam
);
1729 return ::WinDefWindowProc(GetHWND(), (ULONG
)uMsg
, (MPARAM
)wParam
, (MPARAM
)lParam
);
1730 } // end of wxWindow::OS2DefWindowProc
1732 bool wxWindow::OS2ProcessMessage(
1736 QMSG
* pQMsg
= (QMSG
*)pMsg
;
1738 if (m_hWnd
!= 0 && (GetWindowStyleFlag() & wxTAB_TRAVERSAL
))
1741 // Intercept dialog navigation keys
1743 bool bProcess
= TRUE
;
1744 USHORT uKeyFlags
= SHORT1FROMMP(pQMsg
->mp1
);
1746 if (uKeyFlags
& KC_KEYUP
)
1749 if (uKeyFlags
& KC_ALT
)
1752 if (!(uKeyFlags
& KC_VIRTUALKEY
))
1757 bool bCtrlDown
= IsCtrlDown();
1758 bool bShiftDown
= IsShiftDown();
1761 // WM_QUERYDLGCODE: ask the control if it wants the key for itself,
1762 // don't process it if it's the case (except for Ctrl-Tab/Enter
1763 // combinations which are always processed)
1765 ULONG ulDlgCode
= 0;
1769 ulDlgCode
= (ULONG
)::WinSendMsg(pQMsg
->hwnd
, WM_QUERYDLGCODE
, pQMsg
, 0);
1772 bool bForward
= TRUE
;
1773 bool bWindowChange
= FALSE
;
1775 switch (SHORT2FROMMP(pQMsg
->mp2
))
1778 // Going to make certain assumptions about specific types of controls
1779 // here, so we may have to alter some things later if they prove invalid
1783 // Shift tabl will always be a nav-key but tabs may be wanted
1792 // Entry Fields want tabs for themselve usually
1796 case DLGC_ENTRYFIELD
:
1806 // Ctrl-Tab cycles thru notebook pages
1808 bWindowChange
= bCtrlDown
;
1809 bForward
= !bShiftDown
;
1832 // ctrl-enter is not processed
1836 else if (ulDlgCode
& DLGC_BUTTON
)
1839 // buttons want process Enter themselevs
1845 wxPanel
* pPanel
= wxDynamicCast(this, wxPanel
);
1846 wxButton
* pBtn
= NULL
;
1851 // Panel may have a default button which should
1852 // be activated by Enter
1854 pBtn
= pPanel
->GetDefaultItem();
1857 if (pBtn
&& pBtn
->IsEnabled())
1860 // If we do have a default button, do press it
1862 pBtn
->OS2Command(BN_CLICKED
, 0 /* unused */);
1865 // else: but if it does not it makes sense to make
1866 // it work like a TAB - and that's what we do.
1867 // Note that Ctrl-Enter always works this way.
1878 wxNavigationKeyEvent vEvent
;
1880 vEvent
.SetDirection(bForward
);
1881 vEvent
.SetWindowChange(bWindowChange
);
1882 vEvent
.SetEventObject(this);
1884 if (GetEventHandler()->ProcessEvent(vEvent
))
1886 wxButton
* pBtn
= wxDynamicCast(FindFocus(), wxButton
);
1891 // The button which has focus should be default
1900 // Let Dialogs process
1902 if (::WinSendMsg(pQMsg
->hwnd
, WM_QUERYDLGCODE
, pQMsg
, 0));
1909 // relay mouse move events to the tooltip control
1910 QMSG
* pQMsg
= (QMSG
*)pMsg
;
1912 if (pQMsg
->msg
== WM_MOUSEMOVE
)
1913 m_tooltip
->RelayEvent(pMsg
);
1915 #endif // wxUSE_TOOLTIPS
1918 } // end of wxWindow::OS2ProcessMessage
1920 bool wxWindow::OS2TranslateMessage(
1925 return m_acceleratorTable
.Translate(m_hWnd
, pMsg
);
1928 #endif //wxUSE_ACCEL
1929 } // end of wxWindow::OS2TranslateMessage
1931 // ---------------------------------------------------------------------------
1932 // message params unpackers
1933 // ---------------------------------------------------------------------------
1935 void wxWindow::UnpackCommand(
1943 *pId
= LOWORD(wParam
);
1944 *phWnd
= NULL
; // or may be GetHWND() ?
1945 *pCmd
= LOWORD(lParam
);
1946 } // end of wxWindow::UnpackCommand
1948 void wxWindow::UnpackActivate(
1955 *pState
= LOWORD(wParam
);
1956 *phWnd
= (WXHWND
)lParam
;
1957 } // end of wxWindow::UnpackActivate
1959 void wxWindow::UnpackScroll(
1970 ulId
= (ULONG
)LONGFROMMP(wParam
);
1971 hWnd
= ::WinWindowFromID(GetHwnd(), ulId
);
1972 if (hWnd
== m_hWndScrollBarHorz
|| hWnd
== m_hWndScrollBarVert
)
1973 *phWnd
= NULLHANDLE
;
1977 *pPos
= SHORT1FROMMP(lParam
);
1978 *pCode
= SHORT2FROMMP(lParam
);
1979 } // end of wxWindow::UnpackScroll
1981 void wxWindow::UnpackMenuSelect(
1989 *pItem
= (WXWORD
)LOWORD(wParam
);
1990 *pFlags
= HIWORD(wParam
);
1991 *phMenu
= (WXHMENU
)lParam
;
1992 } // end of wxWindow::UnpackMenuSelect
1994 // ---------------------------------------------------------------------------
1995 // Main wxWindows window proc and the window proc for wxWindow
1996 // ---------------------------------------------------------------------------
1999 // Hook for new window just as it's being created, when the window isn't yet
2000 // associated with the handle
2002 wxWindow
* wxWndHook
= NULL
;
2007 MRESULT EXPENTRY
wxWndProc(
2015 // Trace all ulMsgs - useful for the debugging
2018 wxLogTrace(wxTraceMessages
, wxT("Processing %s(wParam=%8lx, lParam=%8lx)"),
2019 wxGetMessageName(ulMsg
), wParam
, lParam
);
2020 #endif // __WXDEBUG__
2022 wxWindow
* pWnd
= wxFindWinFromHandle((WXHWND
)hWnd
);
2025 // When we get the first message for the HWND we just created, we associate
2026 // it with wxWindow stored in wxWndHook
2028 if (!pWnd
&& wxWndHook
)
2030 wxAssociateWinWithHandle(hWnd
, wxWndHook
);
2033 pWnd
->SetHWND((WXHWND
)hWnd
);
2036 MRESULT rc
= (MRESULT
)0;
2040 // Stop right here if we don't have a valid handle in our wxWindow object.
2042 if (pWnd
&& !pWnd
->GetHWND())
2044 pWnd
->SetHWND((WXHWND
) hWnd
);
2045 rc
= pWnd
->OS2DefWindowProc(ulMsg
, wParam
, lParam
);
2051 rc
= pWnd
->OS2WindowProc(ulMsg
, wParam
, lParam
);
2053 rc
= ::WinDefWindowProc(hWnd
, ulMsg
, wParam
, lParam
);
2057 } // end of wxWndProc
2060 // We will add (or delete) messages we need to handle at this default
2063 MRESULT
wxWindow::OS2WindowProc(
2070 // Did we process the uMsg?
2072 bool bProcessed
= FALSE
;
2079 // For most messages we should return 0 when we do process the message
2081 mResult
= (MRESULT
)0;
2089 bProcessed
= HandleCreate( (WXLPCREATESTRUCT
)lParam
2095 // Return 0 to bAllow window creation
2097 mResult
= (MRESULT
)(bMayCreate
? 0 : -1);
2108 bProcessed
= HandleMove( LOWORD(lParam
)
2114 bProcessed
= HandleSize( LOWORD(lParam
)
2125 UnpackActivate( wParam
2131 bProcessed
= HandleActivate( wState
2139 if (SHORT1FROMMP((MPARAM
)lParam
) == TRUE
)
2140 bProcessed
= HandleSetFocus((WXHWND
)(HWND
)wParam
);
2142 bProcessed
= HandleKillFocus((WXHWND
)(HWND
)wParam
);
2146 bProcessed
= HandlePaint();
2151 // Don't let the DefWindowProc() destroy our window - we'll do it
2152 // ourselves in ~wxWindow
2155 mResult
= (MRESULT
)TRUE
;
2159 bProcessed
= HandleShow(wParam
!= 0, (int)lParam
);
2163 // Under OS2 PM Joysticks are treated just like mouse events
2164 // The "Motion" events will be prevelent in joysticks
2167 case WM_BUTTON1DOWN
:
2169 case WM_BUTTON1DBLCLK
:
2170 case WM_BUTTON1MOTIONEND
:
2171 case WM_BUTTON1MOTIONSTART
:
2172 case WM_BUTTON2DOWN
:
2174 case WM_BUTTON2DBLCLK
:
2175 case WM_BUTTON2MOTIONEND
:
2176 case WM_BUTTON2MOTIONSTART
:
2177 case WM_BUTTON3DOWN
:
2179 case WM_BUTTON3DBLCLK
:
2180 case WM_BUTTON3MOTIONEND
:
2181 case WM_BUTTON3MOTIONSTART
:
2183 short x
= LOWORD(lParam
);
2184 short y
= HIWORD(lParam
);
2186 bProcessed
= HandleMouseEvent(uMsg
, x
, y
, (WXUINT
)wParam
);
2190 bProcessed
= HandleSysCommand(wParam
, lParam
);
2197 UnpackCommand(wParam
, lParam
, &id
, &hwnd
, &cmd
);
2199 bProcessed
= HandleCommand(id
, cmd
, hwnd
);
2204 // For these messages we must return TRUE if process the message
2207 case WM_MEASUREITEM
:
2209 int nIdCtrl
= (UINT
)wParam
;
2211 if ( uMsg
== WM_DRAWITEM
)
2213 bProcessed
= OS2OnDrawItem(nIdCtrl
,
2214 (WXDRAWITEMSTRUCT
*)lParam
);
2218 bProcessed
= OS2OnMeasureItem(nIdCtrl
,
2219 (WXMEASUREITEMSTRUCT
*)lParam
);
2223 mResult
= (MRESULT
)TRUE
;
2227 case WM_QUERYDLGCODE
:
2230 mResult
= (MRESULT
)m_lDlgCode
;
2234 //else: get the dlg code from the DefWindowProc()
2239 // In OS/2 PM all keyboard events are of the WM_CHAR type. Virtual key and key-up
2240 // and key-down events are obtained from the WM_CHAR params.
2244 USHORT uKeyFlags
= SHORT1FROMMP((MPARAM
)wParam
);
2246 if (uKeyFlags
& KC_KEYUP
)
2248 bProcessed
= HandleKeyUp((WXDWORD
)wParam
, lParam
);
2251 else // keydown event
2254 // If this has been processed by an event handler,
2255 // return 0 now (we've handled it). DON't RETURN
2256 // we still need to process further
2258 HandleKeyDown((WXDWORD
)wParam
, lParam
);
2259 if (uKeyFlags
& KC_VIRTUALKEY
)
2261 USHORT uVk
= SHORT2FROMMP((MPARAM
)lParam
);
2264 // We consider these message "not interesting" to OnChar
2266 if (uVk
== VK_SHIFT
|| uVk
== VK_CTRL
)
2274 // Avoid duplicate messages to OnChar for these ASCII keys: they
2275 // will be translated by TranslateMessage() and received in WM_CHAR
2281 // But set processed to FALSE, not TRUE to still pass them to
2282 // the control's default window proc - otherwise built-in
2283 // keyboard handling won't work
2292 bProcessed
= HandleChar((WXDWORD
)wParam
, lParam
);
2296 else // WM_CHAR -- Always an ASCII character
2298 bProcessed
= HandleChar((WXDWORD
)wParam
, lParam
, TRUE
);
2310 UnpackScroll( wParam
2317 bProcessed
= OS2OnScroll( uMsg
== WM_HSCROLL
? wxHORIZONTAL
2326 #if defined(__VISAGECPP__) && (__IBMCPP__ >= 400)
2327 case WM_CTLCOLORCHANGE
:
2329 bProcessed
= HandleCtlColor(&hBrush
);
2333 case WM_ERASEBACKGROUND
:
2335 // Returning TRUE to requestw PM to paint the window background
2336 // in SYSCLR_WINDOW. We don't really want that
2338 bProcessed
= HandleEraseBkgnd((WXHDC
)(HPS
)wParam
);
2339 mResult
= (MRESULT
)(FALSE
);
2343 // Instead of CTLCOLOR messages PM sends QUERYWINDOWPARAMS to
2344 // things such as colors and fonts and such
2346 case WM_QUERYWINDOWPARAMS
:
2348 PWNDPARAMS pWndParams
= (PWNDPARAMS
)wParam
;
2350 bProcessed
= HandleWindowParams( pWndParams
2356 // the return value for this message is ignored
2357 case WM_SYSCOLORCHANGE
:
2358 bProcessed
= HandleSysColorChange();
2361 case WM_REALIZEPALETTE
:
2362 bProcessed
= HandlePaletteChanged();
2365 case WM_PRESPARAMCHANGED
:
2366 bProcessed
= HandlePresParamChanged(wParam
);
2370 // move all drag and drops to wxDrg
2372 bProcessed
= HandleEndDrag(wParam
);
2376 bProcessed
= HandleInitDialog((WXHWND
)(HWND
)wParam
);
2380 // we never set focus from here
2385 // wxFrame specific message
2386 case WM_MINMAXFRAME
:
2387 bProcessed
= HandleGetMinMaxInfo((PSWP
)wParam
);
2390 case WM_SYSVALUECHANGED
:
2391 // TODO: do something
2392 mResult
= (MRESULT
)TRUE
;
2396 // Comparable to WM_SETPOINTER for windows, only for just controls
2398 case WM_CONTROLPOINTER
:
2399 bProcessed
= HandleSetCursor( SHORT1FROMMP(wParam
) // Control ID
2400 ,(HWND
)lParam
// Cursor Handle
2405 // Returning TRUE stops the DefWindowProc() from further
2406 // processing this message - exactly what we need because we've
2407 // just set the cursor.
2409 mResult
= (MRESULT
)TRUE
;
2416 wxLogTrace(wxTraceMessages
, wxT("Forwarding %s to DefWindowProc."),
2417 wxGetMessageName(uMsg
));
2418 #endif // __WXDEBUG__
2419 if (IsKindOf(CLASSINFO(wxFrame
)))
2420 mResult
= ::WinDefWindowProc(m_hWnd
, uMsg
, wParam
, lParam
);
2422 mResult
= OS2DefWindowProc(uMsg
, wParam
, lParam
);
2425 } // end of wxWindow::OS2WindowProc
2428 // Dialog window proc
2436 if (uMsg
== WM_INITDLG
)
2439 // For this message, returning TRUE tells system to set focus to the
2440 // first control in the dialog box
2442 return (MRESULT
)TRUE
;
2447 // For all the other ones, FALSE means that we didn't process the
2452 } // end of wxDlgProc
2454 wxWindow
* wxFindWinFromHandle(
2458 wxNode
* pNode
= wxWinHandleList
->Find((long)hWnd
);
2462 return (wxWindow
*)pNode
->Data();
2463 } // end of wxFindWinFromHandle
2465 void wxAssociateWinWithHandle(
2471 // Adding NULL hWnd is (first) surely a result of an error and
2472 // (secondly) breaks menu command processing
2474 wxCHECK_RET( hWnd
!= (HWND
)NULL
,
2475 wxT("attempt to add a NULL hWnd to window list ignored") );
2478 wxWindow
* pOldWin
= wxFindWinFromHandle((WXHWND
) hWnd
);
2480 if (pOldWin
&& (pOldWin
!= pWin
))
2482 wxString
str(pWin
->GetClassInfo()->GetClassName());
2483 wxLogError( "Bug! Found existing HWND %X for new window of class %s"
2490 wxWinHandleList
->Append( (long)hWnd
2494 } // end of wxAssociateWinWithHandle
2496 void wxRemoveHandleAssociation(
2500 wxWinHandleList
->DeleteObject(pWin
);
2501 } // end of wxRemoveHandleAssociation
2504 // Default destroyer - override if you destroy it in some other way
2505 // (e.g. with MDI child windows)
2507 void wxWindow::OS2DestroyWindow()
2511 void wxWindow::OS2DetachWindowMenu()
2515 HMENU hMenu
= (HMENU
)m_hMenu
;
2517 int nN
= (int)::WinSendMsg(hMenu
, MM_QUERYITEMCOUNT
, 0, 0);
2520 for (i
= 0; i
< nN
; i
++)
2523 int nChars
= (int)::WinSendMsg( hMenu
2525 ,MPFROM2SHORT(i
, nN
)
2530 wxLogLastError(wxT("GetMenuString"));
2534 if (wxStrcmp(zBuf
, wxT("&Window")) == 0)
2536 ::WinSendMsg(hMenu
, MM_DELETEITEM
, MPFROM2SHORT(i
, TRUE
), 0);
2541 } // end of wxWindow::OS2DetachWindowMenu
2543 bool wxWindow::OS2Create(
2546 , const wxChar
* zTitle
2554 , unsigned long ulId
2564 long lHeight1
= 20L;
2566 int nNeedsubclass
= 0;
2567 PCSZ pszClass
= zClass
;
2570 // Find parent's size, if it exists, to set up a possible default
2571 // panel size the size of the parent window
2588 // check to see if the new window is a standard control
2590 if ((ULONG
)zClass
== (ULONG
)WC_BUTTON
||
2591 (ULONG
)zClass
== (ULONG
)WC_COMBOBOX
||
2592 (ULONG
)zClass
== (ULONG
)WC_CONTAINER
||
2593 (ULONG
)zClass
== (ULONG
)WC_ENTRYFIELD
||
2594 (ULONG
)zClass
== (ULONG
)WC_FRAME
||
2595 (ULONG
)zClass
== (ULONG
)WC_LISTBOX
||
2596 (ULONG
)zClass
== (ULONG
)WC_MENU
||
2597 (ULONG
)zClass
== (ULONG
)WC_NOTEBOOK
||
2598 (ULONG
)zClass
== (ULONG
)WC_SCROLLBAR
||
2599 (ULONG
)zClass
== (ULONG
)WC_SPINBUTTON
||
2600 (ULONG
)zClass
== (ULONG
)WC_STATIC
||
2601 (ULONG
)zClass
== (ULONG
)WC_TITLEBAR
||
2602 (ULONG
)zClass
== (ULONG
)WC_VALUESET
2609 // no standard controls
2610 if(wxString (wxT("wxFrameClass")) == wxString(zClass
) )
2612 pszClass
= WC_FRAME
;
2619 nControlId
= FID_CLIENT
;
2624 // We will either have a registered class via string name or a standard PM Class via a long
2626 m_hWnd
= (WXHWND
)::WinCreateWindow( (HWND
)hParent
2628 ,(PSZ
)zTitle
? zTitle
: wxT("")
2642 vError
= ::WinGetLastError(vHabmain
);
2643 sError
= wxPMErrorToStr(vError
);
2644 wxLogError("Can't create window of class %s!. Error: %s\n", zClass
, sError
);
2647 ::WinSetWindowULong(m_hWnd
, QWL_USER
, (ULONG
) this);
2651 wxNode
* pNode
= wxWinHandleList
->Member(this);
2655 HWND hWnd
= (HWND
)pNode
->GetKeyInteger();
2657 if (hWnd
!= (HWND
)m_hWnd
)
2660 wxLogError("A second HWND association is being added for the same window!");
2664 wxAssociateWinWithHandle((HWND
)m_hWnd
2668 // Now need to subclass window.
2672 wxAssociateWinWithHandle((HWND
)m_hWnd
,this);
2676 SubclassWin(GetHWND());
2679 } // end of wxWindow::OS2Create
2681 // ===========================================================================
2682 // OS2 PM message handlers
2683 // ===========================================================================
2685 // ---------------------------------------------------------------------------
2686 // window creation/destruction
2687 // ---------------------------------------------------------------------------
2689 bool wxWindow::HandleCreate(
2690 WXLPCREATESTRUCT vCs
2694 wxWindowCreateEvent
vEvent(this);
2696 (void)GetEventHandler()->ProcessEvent(vEvent
);
2697 *pbMayCreate
= TRUE
;
2699 } // end of wxWindow::HandleCreate
2701 bool wxWindow::HandleDestroy()
2703 wxWindowDestroyEvent
vEvent(this);
2705 (void)GetEventHandler()->ProcessEvent(vEvent
);
2708 // Delete our drop target if we've got one
2710 #if wxUSE_DRAG_AND_DROP
2711 if (m_dropTarget
!= NULL
)
2713 m_dropTarget
->Revoke(m_hWnd
);
2714 delete m_dropTarget
;
2715 m_dropTarget
= NULL
;
2717 #endif // wxUSE_DRAG_AND_DROP
2720 // WM_DESTROY handled
2723 } // end of wxWindow::HandleDestroy
2725 // ---------------------------------------------------------------------------
2727 // ---------------------------------------------------------------------------
2728 void wxWindow::OnSetFocus(
2729 wxFocusEvent
& rEvent
2733 // Panel wants to track the window which was the last to have focus in it,
2734 // so we want to set ourselves as the window which last had focus
2736 // Notice that it's also important to do it upwards the tree becaus
2737 // otherwise when the top level panel gets focus, it won't set it back to
2738 // us, but to some other sibling
2740 wxWindow
* pWin
= this;
2744 wxWindow
* pParent
= pWin
->GetParent();
2745 wxPanel
* pPanel
= wxDynamicCast( pParent
2750 pPanel
->SetLastFocus(pWin
);
2755 wxLogTrace(_T("focus"), _T("%s (0x%08x) gets focus"),
2756 GetClassInfo()->GetClassName(), GetHandle());
2759 } // end of wxWindow::OnSetFocus
2761 bool wxWindow::HandleActivate(
2763 , WXHWND
WXUNUSED(hActivate
)
2766 wxActivateEvent
vEvent( wxEVT_ACTIVATE
2770 vEvent
.SetEventObject(this);
2771 return GetEventHandler()->ProcessEvent(vEvent
);
2772 } // end of wxWindow::HandleActivate
2774 bool wxWindow::HandleSetFocus(
2775 WXHWND
WXUNUSED(hWnd
)
2784 m_caret
->OnSetFocus();
2786 #endif // wxUSE_CARET
2789 // Panel wants to track the window which was the last to have focus in it
2791 wxPanel
* pPanel
= wxDynamicCast( GetParent()
2796 pPanel
->SetLastFocus(this);
2799 wxFocusEvent
vEvent(wxEVT_SET_FOCUS
, m_windowId
);
2801 vEvent
.SetEventObject(this);
2802 return GetEventHandler()->ProcessEvent(vEvent
);
2803 } // end of wxWindow::HandleSetFocus
2805 bool wxWindow::HandleKillFocus(
2806 WXHWND
WXUNUSED(hWnd
)
2815 m_caret
->OnKillFocus();
2817 #endif // wxUSE_CARET
2819 wxFocusEvent
vEvent( wxEVT_KILL_FOCUS
2823 vEvent
.SetEventObject(this);
2824 return GetEventHandler()->ProcessEvent(vEvent
);
2825 } // end of wxWindow::HandleKillFocus
2827 // ---------------------------------------------------------------------------
2829 // ---------------------------------------------------------------------------
2831 bool wxWindow::HandleShow(
2836 wxShowEvent
vEvent( GetId()
2840 vEvent
.m_eventObject
= this;
2841 return GetEventHandler()->ProcessEvent(vEvent
);
2842 } // end of wxWindow::HandleShow
2844 bool wxWindow::HandleInitDialog(
2845 WXHWND
WXUNUSED(hWndFocus
)
2848 wxInitDialogEvent
vEvent(GetId());
2850 vEvent
.m_eventObject
= this;
2851 return GetEventHandler()->ProcessEvent(vEvent
);
2852 } // end of wxWindow::HandleInitDialog
2854 bool wxWindow::HandleEndDrag(WXWPARAM wParam
)
2856 // TODO: We'll handle drag and drop later
2860 bool wxWindow::HandleSetCursor(
2866 // Under OS/2 PM this allows the pointer to be changed
2867 // as it passes over a control
2869 ::WinSetPointer(HWND_DESKTOP
, (HPOINTER
)hPointer
);
2871 } // end of wxWindow::HandleSetCursor
2873 // ---------------------------------------------------------------------------
2874 // owner drawn stuff
2875 // ---------------------------------------------------------------------------
2876 bool wxWindow::OS2OnDrawItem(
2878 , WXDRAWITEMSTRUCT
* pItemStruct
2883 #if wxUSE_OWNER_DRAWN
2885 // Is it a menu item?
2891 POWNERITEM pMeasureStruct
= (POWNERITEM
)pItemStruct
;
2892 wxFrame
* pFrame
= (wxFrame
*)this;
2893 wxMenuItem
* pMenuItem
= pFrame
->GetMenuBar()->FindItem(pMeasureStruct
->idItem
, pMeasureStruct
->hItem
);
2894 HDC hDC
= ::GpiQueryDevice(pMeasureStruct
->hps
);
2895 wxRect
vRect( pMeasureStruct
->rclItem
.xLeft
2896 ,pMeasureStruct
->rclItem
.yBottom
2897 ,pMeasureStruct
->rclItem
.xRight
- pMeasureStruct
->rclItem
.xLeft
2898 ,pMeasureStruct
->rclItem
.yTop
- pMeasureStruct
->rclItem
.yBottom
2903 vDc
.SetHPS(pMeasureStruct
->hps
);
2905 // Load the wxWindows Pallete and set to RGB mode
2907 if (!::GpiCreateLogColorTable( pMeasureStruct
->hps
2911 ,(LONG
)wxTheColourDatabase
->m_nSize
2912 ,(PLONG
)wxTheColourDatabase
->m_palTable
2915 vError
= ::WinGetLastError(vHabmain
);
2916 sError
= wxPMErrorToStr(vError
);
2917 wxLogError("Unable to set current color table. Error: %s\n", sError
);
2920 // Set the color table to RGB mode
2922 if (!::GpiCreateLogColorTable( pMeasureStruct
->hps
2930 vError
= ::WinGetLastError(vHabmain
);
2931 sError
= wxPMErrorToStr(vError
);
2932 wxLogError("Unable to set current color table. Error: %s\n", sError
);
2935 wxCHECK( pMenuItem
->IsKindOf(CLASSINFO(wxMenuItem
)), FALSE
);
2941 if (pMeasureStruct
->fsAttribute
== pMeasureStruct
->fsAttributeOld
)
2944 // Entire Item needs to be redrawn (either it has reappeared from
2945 // behind another window or is being displayed for the first time
2947 eAction
= wxOwnerDrawn::wxODDrawAll
;
2949 if (pMeasureStruct
->fsAttribute
& MIA_HILITED
)
2952 // If it is currently selected we let the system handle it
2954 eStatus
|= wxOwnerDrawn::wxODSelected
;
2956 if (pMeasureStruct
->fsAttribute
& MIA_CHECKED
)
2959 // If it is currently checked we draw our own
2961 eStatus
|= wxOwnerDrawn::wxODChecked
;
2962 pMeasureStruct
->fsAttributeOld
= pMeasureStruct
->fsAttribute
&= ~MIA_CHECKED
;
2964 if (pMeasureStruct
->fsAttribute
& MIA_DISABLED
)
2967 // If it is currently disabled we let the system handle it
2969 eStatus
|= wxOwnerDrawn::wxODDisabled
;
2972 // Don't really care about framed (indicationg focus) or NoDismiss
2977 if (pMeasureStruct
->fsAttribute
& MIA_HILITED
)
2979 eAction
= wxOwnerDrawn::wxODDrawAll
;
2980 eStatus
|= wxOwnerDrawn::wxODSelected
;
2982 // Keep the system from trying to highlight with its bogus colors
2984 pMeasureStruct
->fsAttributeOld
= pMeasureStruct
->fsAttribute
&= ~MIA_HILITED
;
2986 else if (!(pMeasureStruct
->fsAttribute
& MIA_HILITED
))
2988 eAction
= wxOwnerDrawn::wxODDrawAll
;
2991 // Keep the system from trying to highlight with its bogus colors
2993 pMeasureStruct
->fsAttribute
= pMeasureStruct
->fsAttributeOld
&= ~MIA_HILITED
;
2998 // For now we don't care about anything else
2999 // just ignore the entire message!
3005 // Now redraw the item
3007 return(pMenuItem
->OnDrawItem( vDc
3009 ,(wxOwnerDrawn::wxODAction
)eAction
3010 ,(wxOwnerDrawn::wxODStatus
)eStatus
3013 // leave the fsAttribute and fsOldAttribute unchanged. If different,
3014 // the system will do the highlight or fraeming or disabling for us,
3015 // otherwise, we'd have to do it ourselves.
3019 wxWindow
* pItem
= FindItem(vId
);
3021 if (pItem
&& pItem
->IsKindOf(CLASSINFO(wxControl
)))
3023 return ((wxControl
*)pItem
)->OS2OnDraw(pItemStruct
);
3027 } // end of wxWindow::OS2OnDrawItem
3029 bool wxWindow::OS2OnMeasureItem(
3031 , WXMEASUREITEMSTRUCT
* pItemStruct
3035 // Is it a menu item?
3037 if (lId
== 65536) // I really don't like this...has to be a better indicator
3039 if (IsKindOf(CLASSINFO(wxFrame
))) // we'll assume if Frame then a menu
3043 POWNERITEM pMeasureStruct
= (POWNERITEM
)pItemStruct
;
3044 wxFrame
* pFrame
= (wxFrame
*)this;
3045 wxMenuItem
* pMenuItem
= pFrame
->GetMenuBar()->FindItem(pMeasureStruct
->idItem
, pMeasureStruct
->hItem
);
3047 wxCHECK( pMenuItem
->IsKindOf(CLASSINFO(wxMenuItem
)), FALSE
);
3050 if (pMenuItem
->OnMeasureItem( &nWidth
3054 pMeasureStruct
->rclItem
.xRight
= nWidth
;
3055 pMeasureStruct
->rclItem
.xLeft
= 0L;
3056 pMeasureStruct
->rclItem
.yTop
= nHeight
;
3057 pMeasureStruct
->rclItem
.yBottom
= 0L;
3063 wxWindow
* pItem
= FindItem(lId
);
3065 if (pItem
&& pItem
->IsKindOf(CLASSINFO(wxControl
)))
3067 return ((wxControl
*)pItem
)->OS2OnMeasure(pItemStruct
);
3072 // ---------------------------------------------------------------------------
3073 // colours and palettes
3074 // ---------------------------------------------------------------------------
3076 bool wxWindow::HandleSysColorChange()
3078 wxSysColourChangedEvent vEvent
;
3080 vEvent
.SetEventObject(this);
3081 return GetEventHandler()->ProcessEvent(vEvent
);
3082 } // end of wxWindow::HandleSysColorChange
3084 bool wxWindow::HandleCtlColor(
3089 // Not much provided with message. So not sure I can do anything with it
3092 } // end of wxWindow::HandleCtlColor
3094 bool wxWindow::HandleWindowParams(
3095 PWNDPARAMS pWndParams
3099 // TODO: I'll do something here, just not sure what yet
3103 // Define for each class of dialog and control
3104 WXHBRUSH
wxWindow::OnCtlColor(WXHDC hDC
,
3114 bool wxWindow::HandlePaletteChanged()
3116 // need to set this to something first
3117 WXHWND hWndPalChange
= NULLHANDLE
;
3119 wxPaletteChangedEvent
vEvent(GetId());
3121 vEvent
.SetEventObject(this);
3122 vEvent
.SetChangedWindow(wxFindWinFromHandle(hWndPalChange
));
3124 return GetEventHandler()->ProcessEvent(vEvent
);
3125 } // end of wxWindow::HandlePaletteChanged
3127 bool wxWindow::HandlePresParamChanged(
3132 // TODO: Once again I'll do something here when I need it
3134 //wxQueryNewPaletteEvent event(GetId());
3135 //event.SetEventObject(this);
3136 // if the background is erased
3137 // bProcessed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
3139 return FALSE
; //GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3143 // Responds to colour changes: passes event on to children.
3145 void wxWindow::OnSysColourChanged(
3146 wxSysColourChangedEvent
& rEvent
3149 wxNode
* pNode
= GetChildren().First();
3154 // Only propagate to non-top-level windows
3156 wxWindow
* pWin
= (wxWindow
*)pNode
->Data();
3158 if (pWin
->GetParent())
3160 wxSysColourChangedEvent vEvent
;
3162 rEvent
.m_eventObject
= pWin
;
3163 pWin
->GetEventHandler()->ProcessEvent(vEvent
);
3165 pNode
= pNode
->Next();
3167 } // end of wxWindow::OnSysColourChanged
3169 // ---------------------------------------------------------------------------
3171 // ---------------------------------------------------------------------------
3173 bool wxWindow::HandlePaint()
3175 HRGN hRgn
= NULLHANDLE
;
3176 wxPaintEvent vEvent
;
3180 if (::WinQueryUpdateRegion(GetHwnd(), hRgn
) == RGN_NULL
)
3182 wxLogLastError("CreateRectRgn");
3186 m_updateRegion
= wxRegion(hRgn
);
3187 vEvent
.SetEventObject(this);
3188 if (!GetEventHandler()->ProcessEvent(vEvent
))
3192 hPS
= ::WinBeginPaint( GetHwnd()
3198 ::GpiCreateLogColorTable( hPS
3202 ,(LONG
)wxTheColourDatabase
->m_nSize
3203 ,(PLONG
)wxTheColourDatabase
->m_palTable
3205 ::GpiCreateLogColorTable( hPS
3213 ::WinFillRect(hPS
, &vRect
, GetBackgroundColour().GetPixel());
3217 return (GetEventHandler()->ProcessEvent(vEvent
));
3218 } // end of wxWindow::HandlePaint
3220 bool wxWindow::HandleEraseBkgnd(
3226 ::WinQueryWindowPos(GetHwnd(), &vSwp
);
3227 if (vSwp
.fl
& SWP_MINIMIZE
)
3232 vDC
.m_hPS
= (HPS
)hDC
; // this is really a PS
3233 vDC
.SetWindow(this);
3236 wxEraseEvent
vEvent(m_windowId
, &vDC
);
3238 vEvent
.SetEventObject(this);
3240 bool rc
= GetEventHandler()->ProcessEvent(vEvent
);
3243 vDC
.m_hPS
= NULLHANDLE
;
3245 } // end of wxWindow::HandleEraseBkgnd
3247 void wxWindow::OnEraseBackground(
3248 wxEraseEvent
& rEvent
3252 HPS hPS
= rEvent
.m_dc
->m_hPS
;
3254 ::WinQueryWindowRect(GetHwnd(), &vRect
);
3255 ::WinFillRect(hPS
, &vRect
, m_backgroundColour
.GetPixel());
3256 } // end of wxWindow::OnEraseBackground
3258 // ---------------------------------------------------------------------------
3259 // moving and resizing
3260 // ---------------------------------------------------------------------------
3262 bool wxWindow::HandleMinimize()
3264 wxIconizeEvent
vEvent(m_windowId
);
3266 vEvent
.SetEventObject(this);
3267 return GetEventHandler()->ProcessEvent(vEvent
);
3268 } // end of wxWindow::HandleMinimize
3270 bool wxWindow::HandleMaximize()
3272 wxMaximizeEvent
vEvent(m_windowId
);
3274 vEvent
.SetEventObject(this);
3275 return GetEventHandler()->ProcessEvent(vEvent
);
3276 } // end of wxWindow::HandleMaximize
3278 bool wxWindow::HandleMove(
3283 wxMoveEvent
vEvent( wxPoint( nX
3289 vEvent
.SetEventObject(this);
3290 return GetEventHandler()->ProcessEvent(vEvent
);
3291 } // end of wxWindow::HandleMove
3293 bool wxWindow::HandleSize(
3296 , WXUINT
WXUNUSED(nFlag
)
3299 wxSizeEvent
vEvent( wxSize( nWidth
3305 vEvent
.SetEventObject(this);
3306 return GetEventHandler()->ProcessEvent(vEvent
);
3307 } // end of wxWindow::HandleSize
3309 bool wxWindow::HandleGetMinMaxInfo(
3319 ::WinGetMaxPosition(GetHwnd(), pSwp
);
3320 m_maxWidth
= pSwp
->cx
;
3321 m_maxHeight
= pSwp
->cy
;
3325 ::WinGetMinPosition(GetHwnd(), pSwp
, &vPoint
);
3326 m_minWidth
= pSwp
->cx
;
3327 m_minHeight
= pSwp
->cy
;
3334 } // end of wxWindow::HandleGetMinMaxInfo
3336 // ---------------------------------------------------------------------------
3338 // ---------------------------------------------------------------------------
3339 bool wxWindow::HandleCommand(
3345 if (wxCurrentPopupMenu
)
3347 wxMenu
* pPopupMenu
= wxCurrentPopupMenu
;
3349 wxCurrentPopupMenu
= NULL
;
3350 return pPopupMenu
->OS2Command(wCmd
, wId
);
3353 wxWindow
* pWin
= FindItem(wId
);
3357 pWin
= wxFindWinFromHandle(hControl
);
3361 return pWin
->OS2Command( wCmd
3365 } // end of wxWindow::HandleCommand
3367 bool wxWindow::HandleSysCommand(
3373 // 4 bits are reserved
3375 switch (SHORT1FROMMP(wParam
))
3378 return HandleMaximize();
3381 return HandleMinimize();
3384 } // end of wxWindow::HandleSysCommand
3386 // ---------------------------------------------------------------------------
3388 // ---------------------------------------------------------------------------
3390 void wxWindow::InitMouseEvent(
3391 wxMouseEvent
& rEvent
3399 rEvent
.m_shiftDown
= ((uFlags
& VK_SHIFT
) != 0);
3400 rEvent
.m_controlDown
= ((uFlags
& VK_CTRL
) != 0);
3401 rEvent
.m_leftDown
= ((uFlags
& VK_BUTTON1
) != 0);
3402 rEvent
.m_middleDown
= ((uFlags
& VK_BUTTON3
) != 0);
3403 rEvent
.m_rightDown
= ((uFlags
& VK_BUTTON2
) != 0);
3404 rEvent
.SetTimestamp(s_currentMsg
.time
);
3405 rEvent
.m_eventObject
= this;
3407 #if wxUSE_MOUSEEVENT_HACK
3410 m_lastMouseEvent
= rEvent
.GetEventType();
3411 #endif // wxUSE_MOUSEEVENT_HACK
3412 } // end of wxWindow::InitMouseEvent
3414 bool wxWindow::HandleMouseEvent(
3422 // The mouse events take consecutive IDs from WM_MOUSEFIRST to
3423 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
3424 // from the message id and take the value in the table to get wxWin event
3427 static const wxEventType eventsMouse
[] =
3441 wxMouseEvent
vEvent(eventsMouse
[uMsg
- WM_MOUSEMOVE
]);
3443 InitMouseEvent( vEvent
3449 return GetEventHandler()->ProcessEvent(vEvent
);
3450 } // end of wxWindow::HandleMouseEvent
3452 bool wxWindow::HandleMouseMove(
3458 if (!m_bMouseInWindow
)
3461 // Generate an ENTER event
3463 m_bMouseInWindow
= TRUE
;
3465 wxMouseEvent
vEvent(wxEVT_ENTER_WINDOW
);
3467 InitMouseEvent( vEvent
3473 (void)GetEventHandler()->ProcessEvent(vEvent
);
3475 return HandleMouseEvent( WM_MOUSEMOVE
3480 } // end of wxWindow::HandleMouseMove
3482 // ---------------------------------------------------------------------------
3483 // keyboard handling
3484 // ---------------------------------------------------------------------------
3487 // Create the key event of the given type for the given key - used by
3488 // HandleChar and HandleKeyDown/Up
3490 wxKeyEvent
wxWindow::CreateKeyEvent(
3496 wxKeyEvent
vEvent(eType
);
3498 vEvent
.SetId(GetId());
3499 vEvent
.m_shiftDown
= IsShiftDown();
3500 vEvent
.m_controlDown
= IsCtrlDown();
3501 vEvent
.m_altDown
= (HIWORD(lParam
) & KC_ALT
) == KC_ALT
;
3503 vEvent
.m_eventObject
= (wxWindow
*)this; // const_cast
3504 vEvent
.m_keyCode
= nId
;
3505 vEvent
.SetTimestamp(s_currentMsg
.time
);
3508 // Translate the position to client coords
3513 ::WinQueryPointerPos(HWND_DESKTOP
, &vPoint
);
3514 ::WinQueryWindowRect( GetHwnd()
3518 vPoint
.x
-= vRect
.xLeft
;
3519 vPoint
.y
-= vRect
.yBottom
;
3521 vEvent
.m_x
= vPoint
.x
;
3522 vEvent
.m_y
= vPoint
.y
;
3525 } // end of wxWindow::CreateKeyEvent
3528 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
3531 bool wxWindow::HandleChar(
3537 bool bCtrlDown
= FALSE
;
3543 // If 1 -> 26, translate to CTRL plus a letter.
3546 if ((vId
> 0) && (vId
< 27))
3568 else if ( (vId
= wxCharCodeOS2ToWX(wParam
)) == 0)
3571 // It's ASCII and will be processed here only when called from
3572 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
3579 wxKeyEvent
vEvent(CreateKeyEvent( wxEVT_CHAR
3586 vEvent
.m_controlDown
= TRUE
;
3589 if (GetEventHandler()->ProcessEvent(vEvent
))
3595 bool wxWindow::HandleKeyDown(
3600 int nId
= wxCharCodeOS2ToWX(wParam
);
3605 // Normal ASCII char
3612 wxKeyEvent
vEvent(CreateKeyEvent( wxEVT_KEY_DOWN
3617 if (GetEventHandler()->ProcessEvent(vEvent
))
3623 } // end of wxWindow::HandleKeyDown
3625 bool wxWindow::HandleKeyUp(
3630 int nId
= wxCharCodeOS2ToWX(wParam
);
3635 // Normal ASCII char
3642 wxKeyEvent
vEvent(CreateKeyEvent( wxEVT_KEY_UP
3647 if (GetEventHandler()->ProcessEvent(vEvent
))
3651 } // end of wxWindow::HandleKeyUp
3653 // ---------------------------------------------------------------------------
3655 // ---------------------------------------------------------------------------
3657 // ---------------------------------------------------------------------------
3659 // ---------------------------------------------------------------------------
3661 bool wxWindow::OS2OnScroll(
3670 wxWindow
* pChild
= wxFindWinFromHandle(hControl
);
3673 return pChild
->OS2OnScroll( nOrientation
3680 wxScrollWinEvent vEvent
;
3682 vEvent
.SetPosition(wPos
);
3683 vEvent
.SetOrientation(nOrientation
);
3684 vEvent
.m_eventObject
= this;
3689 vEvent
.m_eventType
= wxEVT_SCROLLWIN_LINEUP
;
3693 vEvent
.m_eventType
= wxEVT_SCROLLWIN_LINEDOWN
;
3697 vEvent
.m_eventType
= wxEVT_SCROLLWIN_PAGEUP
;
3701 vEvent
.m_eventType
= wxEVT_SCROLLWIN_PAGEDOWN
;
3704 case SB_SLIDERPOSITION
:
3705 vEvent
.m_eventType
= wxEVT_SCROLLWIN_THUMBRELEASE
;
3708 case SB_SLIDERTRACK
:
3709 vEvent
.m_eventType
= wxEVT_SCROLLWIN_THUMBTRACK
;
3715 return GetEventHandler()->ProcessEvent(vEvent
);
3716 } // end of wxWindow::OS2OnScroll
3718 // ===========================================================================
3720 // ===========================================================================
3729 // TODO: we'll do this later
3730 } // end of wxGetCharSize
3733 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
3734 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
3736 int wxCharCodeOS2ToWX(
3744 case VK_BACKTAB
: nId
= WXK_BACK
; break;
3745 case VK_TAB
: nId
= WXK_TAB
; break;
3746 case VK_CLEAR
: nId
= WXK_CLEAR
; break;
3747 case VK_ENTER
: nId
= WXK_RETURN
; break;
3748 case VK_SHIFT
: nId
= WXK_SHIFT
; break;
3749 case VK_CTRL
: nId
= WXK_CONTROL
; break;
3750 case VK_PAUSE
: nId
= WXK_PAUSE
; break;
3751 case VK_SPACE
: nId
= WXK_SPACE
; break;
3752 case VK_ESC
: nId
= WXK_ESCAPE
; break;
3753 case VK_END
: nId
= WXK_END
; break;
3754 case VK_HOME
: nId
= WXK_HOME
; break;
3755 case VK_LEFT
: nId
= WXK_LEFT
; break;
3756 case VK_UP
: nId
= WXK_UP
; break;
3757 case VK_RIGHT
: nId
= WXK_RIGHT
; break;
3758 case VK_DOWN
: nId
= WXK_DOWN
; break;
3759 case VK_PRINTSCRN
: nId
= WXK_PRINT
; break;
3760 case VK_INSERT
: nId
= WXK_INSERT
; break;
3761 case VK_DELETE
: nId
= WXK_DELETE
; break;
3762 case VK_F1
: nId
= WXK_F1
; break;
3763 case VK_F2
: nId
= WXK_F2
; break;
3764 case VK_F3
: nId
= WXK_F3
; break;
3765 case VK_F4
: nId
= WXK_F4
; break;
3766 case VK_F5
: nId
= WXK_F5
; break;
3767 case VK_F6
: nId
= WXK_F6
; break;
3768 case VK_F7
: nId
= WXK_F7
; break;
3769 case VK_F8
: nId
= WXK_F8
; break;
3770 case VK_F9
: nId
= WXK_F9
; break;
3771 case VK_F10
: nId
= WXK_F10
; break;
3772 case VK_F11
: nId
= WXK_F11
; break;
3773 case VK_F12
: nId
= WXK_F12
; break;
3774 case VK_F13
: nId
= WXK_F13
; break;
3775 case VK_F14
: nId
= WXK_F14
; break;
3776 case VK_F15
: nId
= WXK_F15
; break;
3777 case VK_F16
: nId
= WXK_F16
; break;
3778 case VK_F17
: nId
= WXK_F17
; break;
3779 case VK_F18
: nId
= WXK_F18
; break;
3780 case VK_F19
: nId
= WXK_F19
; break;
3781 case VK_F20
: nId
= WXK_F20
; break;
3782 case VK_F21
: nId
= WXK_F21
; break;
3783 case VK_F22
: nId
= WXK_F22
; break;
3784 case VK_F23
: nId
= WXK_F23
; break;
3785 case VK_F24
: nId
= WXK_F24
; break;
3786 case VK_NUMLOCK
: nId
= WXK_NUMLOCK
; break;
3787 case VK_SCRLLOCK
: nId
= WXK_SCROLL
; break;
3794 } // end of wxCharCodeOS2ToWX
3796 int wxCharCodeWXToOS2(
3806 case WXK_CLEAR
: nKeySym
= VK_CLEAR
; break;
3807 case WXK_SHIFT
: nKeySym
= VK_SHIFT
; break;
3808 case WXK_CONTROL
: nKeySym
= VK_CTRL
; break;
3809 case WXK_PAUSE
: nKeySym
= VK_PAUSE
; break;
3810 case WXK_END
: nKeySym
= VK_END
; break;
3811 case WXK_HOME
: nKeySym
= VK_HOME
; break;
3812 case WXK_LEFT
: nKeySym
= VK_LEFT
; break;
3813 case WXK_UP
: nKeySym
= VK_UP
; break;
3814 case WXK_RIGHT
: nKeySym
= VK_RIGHT
; break;
3815 case WXK_DOWN
: nKeySym
= VK_DOWN
; break;
3816 case WXK_PRINT
: nKeySym
= VK_PRINTSCRN
; break;
3817 case WXK_INSERT
: nKeySym
= VK_INSERT
; break;
3818 case WXK_DELETE
: nKeySym
= VK_DELETE
; break;
3819 case WXK_F1
: nKeySym
= VK_F1
; break;
3820 case WXK_F2
: nKeySym
= VK_F2
; break;
3821 case WXK_F3
: nKeySym
= VK_F3
; break;
3822 case WXK_F4
: nKeySym
= VK_F4
; break;
3823 case WXK_F5
: nKeySym
= VK_F5
; break;
3824 case WXK_F6
: nKeySym
= VK_F6
; break;
3825 case WXK_F7
: nKeySym
= VK_F7
; break;
3826 case WXK_F8
: nKeySym
= VK_F8
; break;
3827 case WXK_F9
: nKeySym
= VK_F9
; break;
3828 case WXK_F10
: nKeySym
= VK_F10
; break;
3829 case WXK_F11
: nKeySym
= VK_F11
; break;
3830 case WXK_F12
: nKeySym
= VK_F12
; break;
3831 case WXK_F13
: nKeySym
= VK_F13
; break;
3832 case WXK_F14
: nKeySym
= VK_F14
; break;
3833 case WXK_F15
: nKeySym
= VK_F15
; break;
3834 case WXK_F16
: nKeySym
= VK_F16
; break;
3835 case WXK_F17
: nKeySym
= VK_F17
; break;
3836 case WXK_F18
: nKeySym
= VK_F18
; break;
3837 case WXK_F19
: nKeySym
= VK_F19
; break;
3838 case WXK_F20
: nKeySym
= VK_F20
; break;
3839 case WXK_F21
: nKeySym
= VK_F21
; break;
3840 case WXK_F22
: nKeySym
= VK_F22
; break;
3841 case WXK_F23
: nKeySym
= VK_F23
; break;
3842 case WXK_F24
: nKeySym
= VK_F24
; break;
3843 case WXK_NUMLOCK
: nKeySym
= VK_NUMLOCK
; break;
3844 case WXK_SCROLL
: nKeySym
= VK_SCRLLOCK
; break;
3847 *bIsVirtual
= FALSE
;
3853 } // end of wxCharCodeWXToOS2
3855 wxWindow
* wxGetActiveWindow()
3857 HWND hWnd
= ::WinQueryActiveWindow(HWND_DESKTOP
);
3861 return wxFindWinFromHandle((WXHWND
)hWnd
);
3864 } // end of wxGetActiveWindow
3867 const char* wxGetMessageName(
3872 case 0x0000: return "WM_NULL";
3873 case 0x0001: return "WM_CREATE";
3874 case 0x0002: return "WM_DESTROY";
3875 case 0x0004: return "WM_ENABLE";
3876 case 0x0005: return "WM_SHOW";
3877 case 0x0006: return "WM_MOVE";
3878 case 0x0007: return "WM_SIZE";
3879 case 0x0008: return "WM_ADJUSTWINDOWPOS";
3880 case 0x0009: return "WM_CALCVALIDRECTS";
3881 case 0x000A: return "WM_SETWINDOWPARAMS";
3882 case 0x000B: return "WM_QUERYWINDOWPARAMS";
3883 case 0x000C: return "WM_HITTEST";
3884 case 0x000D: return "WM_ACTIVATE";
3885 case 0x000F: return "WM_SETFOCUS";
3886 case 0x0010: return "WM_SETSELECTION";
3887 case 0x0011: return "WM_PPAINT";
3888 case 0x0012: return "WM_PSETFOCUS";
3889 case 0x0013: return "WM_PSYSCOLORCHANGE";
3890 case 0x0014: return "WM_PSIZE";
3891 case 0x0015: return "WM_PACTIVATE";
3892 case 0x0016: return "WM_PCONTROL";
3893 case 0x0020: return "WM_COMMAND";
3894 case 0x0021: return "WM_SYSCOMMAND";
3895 case 0x0022: return "WM_HELP";
3896 case 0x0023: return "WM_PAINT";
3897 case 0x0024: return "WM_TIMER";
3898 case 0x0025: return "WM_SEM1";
3899 case 0x0026: return "WM_SEM2";
3900 case 0x0027: return "WM_SEM3";
3901 case 0x0028: return "WM_SEM4";
3902 case 0x0029: return "WM_CLOSE";
3903 case 0x002A: return "WM_QUIT";
3904 case 0x002B: return "WM_SYSCOLORCHANGE";
3905 case 0x002D: return "WM_SYSVALUECHANGE";
3906 case 0x002E: return "WM_APPTERMINATENOTIFY";
3907 case 0x002F: return "WM_PRESPARAMCHANGED";
3908 // Control notification messages
3909 case 0x0030: return "WM_CONTROL";
3910 case 0x0031: return "WM_VSCROLL";
3911 case 0x0032: return "WM_HSCROLL";
3912 case 0x0033: return "WM_INITMENU";
3913 case 0x0034: return "WM_MENUSELECT";
3914 case 0x0035: return "WM_MENUSEND";
3915 case 0x0036: return "WM_DRAWITEM";
3916 case 0x0037: return "WM_MEASUREITEM";
3917 case 0x0038: return "WM_CONTROLPOINTER";
3918 case 0x003A: return "WM_QUERYDLGCODE";
3919 case 0x003B: return "WM_INITDLG";
3920 case 0x003C: return "WM_SUBSTITUTESTRING";
3921 case 0x003D: return "WM_MATCHMNEMONIC";
3922 case 0x003E: return "WM_SAVEAPPLICATION";
3923 case 0x0129: return "WM_CTLCOLORCHANGE";
3924 case 0x0130: return "WM_QUERYCTLTYPE";
3926 case 0x0040: return "WM_FLASHWINDOW";
3927 case 0x0041: return "WM_FORMATFRAME";
3928 case 0x0042: return "WM_UPDATEFRAME";
3929 case 0x0043: return "WM_FOCUSCHANGE";
3930 case 0x0044: return "WM_SETBORDERSIZE";
3931 case 0x0045: return "WM_TRACKFRAME";
3932 case 0x0046: return "WM_MINMAXFRAME";
3933 case 0x0047: return "WM_SETICON";
3934 case 0x0048: return "WM_QUERYICON";
3935 case 0x0049: return "WM_SETACCELTABLE";
3936 case 0x004A: return "WM_QUERYACCELTABLE";
3937 case 0x004B: return "WM_TRANSLATEACCEL";
3938 case 0x004C: return "WM_QUERYTRACKINFO";
3939 case 0x004D: return "WM_QUERYBORDERSIZE";
3940 case 0x004E: return "WM_NEXTMENU";
3941 case 0x004F: return "WM_ERASEBACKGROUND";
3942 case 0x0050: return "WM_QUERYFRAMEINFO";
3943 case 0x0051: return "WM_QUERYFOCUSCHAIN";
3944 case 0x0052: return "WM_OWNERPOSCHANGE";
3945 case 0x0053: return "WM_CACLFRAMERECT";
3946 case 0x0055: return "WM_WINDOWPOSCHANGED";
3947 case 0x0056: return "WM_ADJUSTFRAMEPOS";
3948 case 0x0059: return "WM_QUERYFRAMECTLCOUNT";
3949 case 0x005B: return "WM_QUERYHELPINFO";
3950 case 0x005C: return "WM_SETHELPINFO";
3951 case 0x005D: return "WM_ERROR";
3952 case 0x005E: return "WM_REALIZEPALETTE";
3953 // Clipboard messages
3954 case 0x0060: return "WM_RENDERFMT";
3955 case 0x0061: return "WM_RENDERALLFMTS";
3956 case 0x0062: return "WM_DESTROYCLIPBOARD";
3957 case 0x0063: return "WM_PAINTCLIPBOARD";
3958 case 0x0064: return "WM_SIZECLIPBOARD";
3959 case 0x0065: return "WM_HSCROLLCLIPBOARD";
3960 case 0x0066: return "WM_VSCROLLCLIPBOARD";
3961 case 0x0067: return "WM_DRAWCLIPBOARD";
3963 case 0x0070: return "WM_MOUSEMOVE";
3964 case 0x0071: return "WM_BUTTON1DOWN";
3965 case 0x0072: return "WM_BUTTON1UP";
3966 case 0x0073: return "WM_BUTTON1DBLCLK";
3967 case 0x0074: return "WM_BUTTON2DOWN";
3968 case 0x0075: return "WM_BUTTON2UP";
3969 case 0x0076: return "WM_BUTTON2DBLCLK";
3970 case 0x0077: return "WM_BUTTON3DOWN";
3971 case 0x0078: return "WM_BUTTON3UP";
3972 case 0x0079: return "WM_BUTTON3DBLCLK";
3973 case 0x007D: return "WM_MOUSEMAP";
3974 case 0x007E: return "WM_VRNDISABLED";
3975 case 0x007F: return "WM_VRNENABLED";
3976 case 0x0410: return "WM_CHORD";
3977 case 0x0411: return "WM_BUTTON1MOTIONSTART";
3978 case 0x0412: return "WM_BUTTON1MOTIONEND";
3979 case 0x0413: return "WM_BUTTON1CLICK";
3980 case 0x0414: return "WM_BUTTON2MOTIONSTART";
3981 case 0x0415: return "WM_BUTTON2MOTIONEND";
3982 case 0x0416: return "WM_BUTTON2CLICK";
3983 case 0x0417: return "WM_BUTTON3MOTIONSTART";
3984 case 0x0418: return "WM_BUTTON3MOTIONEND";
3985 case 0x0419: return "WM_BUTTON3CLICK";
3986 case 0x0420: return "WM_BEGINDRAG";
3987 case 0x0421: return "WM_ENDDRAG";
3988 case 0x0422: return "WM_SINGLESELECT";
3989 case 0x0423: return "WM_OPEN";
3990 case 0x0424: return "WM_CONTEXTMENU";
3991 case 0x0425: return "WM_CONTEXTHELP";
3992 case 0x0426: return "WM_TEXTEDIT";
3993 case 0x0427: return "WM_BEGINSELECT";
3994 case 0x0228: return "WM_ENDSELECT";
3995 case 0x0429: return "WM_PICKUP";
3996 case 0x04C0: return "WM_PENFIRST";
3997 case 0x04FF: return "WM_PENLAST";
3998 case 0x0500: return "WM_MMPMFIRST";
3999 case 0x05FF: return "WM_MMPMLAST";
4000 case 0x0600: return "WM_STDDLGFIRST";
4001 case 0x06FF: return "WM_STDDLGLAST";
4002 case 0x0BD0: return "WM_BIDI_FIRST";
4003 case 0x0BFF: return "WM_BIDI_LAST";
4005 case 0x007A: return "WM_CHAR";
4006 case 0x007B: return "WM_VIOCHAR";
4008 case 0x00A0: return "WM_DDE_INITIATE";
4009 case 0x00A1: return "WM_DDE_REQUEST";
4010 case 0x00A2: return "WM_DDE_ACK";
4011 case 0x00A3: return "WM_DDE_DATA";
4012 case 0x00A4: return "WM_DDE_ADVISE";
4013 case 0x00A5: return "WM_DDE_UNADVISE";
4014 case 0x00A6: return "WM_DDE_POKE";
4015 case 0x00A7: return "WM_DDE_EXECUTE";
4016 case 0x00A8: return "WM_DDE_TERMINATE";
4017 case 0x00A9: return "WM_DDE_INITIATEACK";
4018 case 0x00AF: return "WM_DDE_LAST";
4020 case 0x0120: return "BM_CLICK";
4021 case 0x0121: return "BM_QUERYCHECKINDEX";
4022 case 0x0122: return "BM_QUERYHILITE";
4023 case 0x0123: return "BM_SETHILITE";
4024 case 0x0124: return "BM_QUERYCHECK";
4025 case 0x0125: return "BM_SETCHECK";
4026 case 0x0126: return "BM_SETDEFAULT";
4027 case 0x0128: return "BM_AUTOSIZE";
4029 case 0x029A: return "CBID_LIST";
4030 case 0x029B: return "CBID_EDIT";
4031 case 0x0170: return "CBM_SHOWLIST";
4032 case 0x0171: return "CBM_HILITE";
4033 case 0x0172: return "CBM_ISLISTSHOWING";
4035 case 0x0140: return "EM_QUERYCHANGED";
4036 case 0x0141: return "EM_QUERYSEL";
4037 case 0x0142: return "EM_SETSEL";
4038 case 0x0143: return "EM_SETTEXTLIMIT";
4039 case 0x0144: return "EM_CUT";
4040 case 0x0145: return "EM_COPY";
4041 case 0x0146: return "EM_CLEAR";
4042 case 0x0147: return "EM_PASTE";
4043 case 0x0148: return "EM_QUERYFIRSTCHAR";
4044 case 0x0149: return "EM_SETFIRSTCHAR";
4045 case 0x014A: return "EM_QUERYREADONLY";
4046 case 0x014B: return "EM_SETREADONLY";
4047 case 0x014C: return "EM_SETINSERTMODE";
4049 case 0x0160: return "LM_QUERYITEMCOUNT";
4050 case 0x0161: return "LM_INSERTITEM";
4051 case 0x0162: return "LM_SETOPENINDEX";
4052 case 0x0163: return "LM_DELETEITEM";
4053 case 0x0164: return "LM_SELECTITEM";
4054 case 0x0165: return "LM_QUERYSELECTION";
4055 case 0x0166: return "LM_SETITEMTEXT";
4056 case 0x0167: return "LM_QUERYITEMTEXTLENGTH";
4057 case 0x0168: return "LM_QUERYITEMTEXT";
4058 case 0x0169: return "LM_SETITEMHANDLE";
4059 case 0x016A: return "LM_QUERYITEMHANDLE";
4060 case 0x016B: return "LM_SEARCHSTRING";
4061 case 0x016C: return "LM_SETITEMHEIGHT";
4062 case 0x016D: return "LM_QUERYTOPINDEX";
4063 case 0x016E: return "LM_DELETEALL";
4064 case 0x016F: return "LM_INSERTMULITEMS";
4065 case 0x0660: return "LM_SETITEMWIDTH";
4067 case 0x0180: return "MM_INSERTITEM";
4068 case 0x0181: return "MM_DELETEITEM";
4069 case 0x0182: return "MM_QUERYITEM";
4070 case 0x0183: return "MM_SETITEM";
4071 case 0x0184: return "MM_QUERYITEMCOUNT";
4072 case 0x0185: return "MM_STARTMENUMODE";
4073 case 0x0186: return "MM_ENDMENUMODE";
4074 case 0x0188: return "MM_REMOVEITEM";
4075 case 0x0189: return "MM_SELECTITEM";
4076 case 0x018A: return "MM_QUERYSELITEMID";
4077 case 0x018B: return "MM_QUERYITEMTEXT";
4078 case 0x018C: return "MM_QUERYITEMTEXTLENGTH";
4079 case 0x018D: return "MM_SETITEMHANDLE";
4080 case 0x018E: return "MM_SETITEMTEXT";
4081 case 0x018F: return "MM_ITEMPOSITIONFROMID";
4082 case 0x0190: return "MM_ITEMIDFROMPOSITION";
4083 case 0x0191: return "MM_QUERYITEMATTR";
4084 case 0x0192: return "MM_SETITEMATTR";
4085 case 0x0193: return "MM_ISITEMVALID";
4086 case 0x0194: return "MM_QUERYITEMRECT";
4087 case 0x0431: return "MM_QUERYDEFAULTITEMID";
4088 case 0x0432: return "MM_SETDEFAULTITEMID";
4090 case 0x01A0: return "SBM_SETSCROLLBAR";
4091 case 0x01A1: return "SBM_SETPOS";
4092 case 0x01A2: return "SBM_QUERYPOS";
4093 case 0x01A3: return "SBM_QUERYRANGE";
4094 case 0x01A6: return "SBM_SETTHUMBSIZE";
4097 case 0x0F00: return "WM_HELPBASE";
4098 case 0x0FFF: return "WM_HELPTOP";
4099 // Beginning of user defined messages
4100 case 0x1000: return "WM_USER";
4102 // wxWindows user defined types
4105 // case 0x1000 + 0: return "LVM_GETBKCOLOR";
4106 case 0x1000 + 1: return "LVM_SETBKCOLOR";
4107 case 0x1000 + 2: return "LVM_GETIMAGELIST";
4108 case 0x1000 + 3: return "LVM_SETIMAGELIST";
4109 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
4110 case 0x1000 + 5: return "LVM_GETITEMA";
4111 case 0x1000 + 75: return "LVM_GETITEMW";
4112 case 0x1000 + 6: return "LVM_SETITEMA";
4113 case 0x1000 + 76: return "LVM_SETITEMW";
4114 case 0x1000 + 7: return "LVM_INSERTITEMA";
4115 case 0x1000 + 77: return "LVM_INSERTITEMW";
4116 case 0x1000 + 8: return "LVM_DELETEITEM";
4117 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
4118 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
4119 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
4120 case 0x1000 + 12: return "LVM_GETNEXTITEM";
4121 case 0x1000 + 13: return "LVM_FINDITEMA";
4122 case 0x1000 + 83: return "LVM_FINDITEMW";
4123 case 0x1000 + 14: return "LVM_GETITEMRECT";
4124 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
4125 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
4126 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
4127 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
4128 case 0x1000 + 18: return "LVM_HITTEST";
4129 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
4130 case 0x1000 + 20: return "LVM_SCROLL";
4131 case 0x1000 + 21: return "LVM_REDRAWITEMS";
4132 case 0x1000 + 22: return "LVM_ARRANGE";
4133 case 0x1000 + 23: return "LVM_EDITLABELA";
4134 case 0x1000 + 118: return "LVM_EDITLABELW";
4135 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
4136 case 0x1000 + 25: return "LVM_GETCOLUMNA";
4137 case 0x1000 + 95: return "LVM_GETCOLUMNW";
4138 case 0x1000 + 26: return "LVM_SETCOLUMNA";
4139 case 0x1000 + 96: return "LVM_SETCOLUMNW";
4140 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
4141 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
4142 case 0x1000 + 28: return "LVM_DELETECOLUMN";
4143 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
4144 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
4145 case 0x1000 + 31: return "LVM_GETHEADER";
4146 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
4147 case 0x1000 + 34: return "LVM_GETVIEWRECT";
4148 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
4149 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
4150 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
4151 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
4152 case 0x1000 + 39: return "LVM_GETTOPINDEX";
4153 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
4154 case 0x1000 + 41: return "LVM_GETORIGIN";
4155 case 0x1000 + 42: return "LVM_UPDATE";
4156 case 0x1000 + 43: return "LVM_SETITEMSTATE";
4157 case 0x1000 + 44: return "LVM_GETITEMSTATE";
4158 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
4159 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
4160 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
4161 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
4162 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
4163 case 0x1000 + 48: return "LVM_SORTITEMS";
4164 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
4165 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
4166 case 0x1000 + 51: return "LVM_GETITEMSPACING";
4167 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
4168 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
4169 case 0x1000 + 53: return "LVM_SETICONSPACING";
4170 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
4171 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
4172 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
4173 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
4174 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
4175 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
4176 case 0x1000 + 60: return "LVM_SETHOTITEM";
4177 case 0x1000 + 61: return "LVM_GETHOTITEM";
4178 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
4179 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
4180 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
4181 case 0x1000 + 65: return "LVM_SETWORKAREA";
4184 case 0x1100 + 0: return "TVM_INSERTITEMA";
4185 case 0x1100 + 50: return "TVM_INSERTITEMW";
4186 case 0x1100 + 1: return "TVM_DELETEITEM";
4187 case 0x1100 + 2: return "TVM_EXPAND";
4188 case 0x1100 + 4: return "TVM_GETITEMRECT";
4189 case 0x1100 + 5: return "TVM_GETCOUNT";
4190 case 0x1100 + 6: return "TVM_GETINDENT";
4191 case 0x1100 + 7: return "TVM_SETINDENT";
4192 case 0x1100 + 8: return "TVM_GETIMAGELIST";
4193 case 0x1100 + 9: return "TVM_SETIMAGELIST";
4194 case 0x1100 + 10: return "TVM_GETNEXTITEM";
4195 case 0x1100 + 11: return "TVM_SELECTITEM";
4196 case 0x1100 + 12: return "TVM_GETITEMA";
4197 case 0x1100 + 62: return "TVM_GETITEMW";
4198 case 0x1100 + 13: return "TVM_SETITEMA";
4199 case 0x1100 + 63: return "TVM_SETITEMW";
4200 case 0x1100 + 14: return "TVM_EDITLABELA";
4201 case 0x1100 + 65: return "TVM_EDITLABELW";
4202 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
4203 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
4204 case 0x1100 + 17: return "TVM_HITTEST";
4205 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
4206 case 0x1100 + 19: return "TVM_SORTCHILDREN";
4207 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
4208 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
4209 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
4210 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
4211 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
4212 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
4213 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
4216 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
4217 case 0x1200 + 1: return "HDM_INSERTITEMA";
4218 case 0x1200 + 10: return "HDM_INSERTITEMW";
4219 case 0x1200 + 2: return "HDM_DELETEITEM";
4220 case 0x1200 + 3: return "HDM_GETITEMA";
4221 case 0x1200 + 11: return "HDM_GETITEMW";
4222 case 0x1200 + 4: return "HDM_SETITEMA";
4223 case 0x1200 + 12: return "HDM_SETITEMW";
4224 case 0x1200 + 5: return "HDM_LAYOUT";
4225 case 0x1200 + 6: return "HDM_HITTEST";
4226 case 0x1200 + 7: return "HDM_GETITEMRECT";
4227 case 0x1200 + 8: return "HDM_SETIMAGELIST";
4228 case 0x1200 + 9: return "HDM_GETIMAGELIST";
4229 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
4230 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
4231 case 0x1200 + 17: return "HDM_GETORDERARRAY";
4232 case 0x1200 + 18: return "HDM_SETORDERARRAY";
4233 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
4236 case 0x1300 + 2: return "TCM_GETIMAGELIST";
4237 case 0x1300 + 3: return "TCM_SETIMAGELIST";
4238 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
4239 case 0x1300 + 5: return "TCM_GETITEMA";
4240 case 0x1300 + 60: return "TCM_GETITEMW";
4241 case 0x1300 + 6: return "TCM_SETITEMA";
4242 case 0x1300 + 61: return "TCM_SETITEMW";
4243 case 0x1300 + 7: return "TCM_INSERTITEMA";
4244 case 0x1300 + 62: return "TCM_INSERTITEMW";
4245 case 0x1300 + 8: return "TCM_DELETEITEM";
4246 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
4247 case 0x1300 + 10: return "TCM_GETITEMRECT";
4248 case 0x1300 + 11: return "TCM_GETCURSEL";
4249 case 0x1300 + 12: return "TCM_SETCURSEL";
4250 case 0x1300 + 13: return "TCM_HITTEST";
4251 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
4252 case 0x1300 + 40: return "TCM_ADJUSTRECT";
4253 case 0x1300 + 41: return "TCM_SETITEMSIZE";
4254 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
4255 case 0x1300 + 43: return "TCM_SETPADDING";
4256 case 0x1300 + 44: return "TCM_GETROWCOUNT";
4257 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
4258 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
4259 case 0x1300 + 47: return "TCM_GETCURFOCUS";
4260 case 0x1300 + 48: return "TCM_SETCURFOCUS";
4261 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
4262 case 0x1300 + 50: return "TCM_DESELECTALL";
4265 case WM_USER
+1000+1: return "TB_ENABLEBUTTON";
4266 case WM_USER
+1000+2: return "TB_CHECKBUTTON";
4267 case WM_USER
+1000+3: return "TB_PRESSBUTTON";
4268 case WM_USER
+1000+4: return "TB_HIDEBUTTON";
4269 case WM_USER
+1000+5: return "TB_INDETERMINATE";
4270 case WM_USER
+1000+9: return "TB_ISBUTTONENABLED";
4271 case WM_USER
+1000+10: return "TB_ISBUTTONCHECKED";
4272 case WM_USER
+1000+11: return "TB_ISBUTTONPRESSED";
4273 case WM_USER
+1000+12: return "TB_ISBUTTONHIDDEN";
4274 case WM_USER
+1000+13: return "TB_ISBUTTONINDETERMINATE";
4275 case WM_USER
+1000+17: return "TB_SETSTATE";
4276 case WM_USER
+1000+18: return "TB_GETSTATE";
4277 case WM_USER
+1000+19: return "TB_ADDBITMAP";
4278 case WM_USER
+1000+20: return "TB_ADDBUTTONS";
4279 case WM_USER
+1000+21: return "TB_INSERTBUTTON";
4280 case WM_USER
+1000+22: return "TB_DELETEBUTTON";
4281 case WM_USER
+1000+23: return "TB_GETBUTTON";
4282 case WM_USER
+1000+24: return "TB_BUTTONCOUNT";
4283 case WM_USER
+1000+25: return "TB_COMMANDTOINDEX";
4284 case WM_USER
+1000+26: return "TB_SAVERESTOREA";
4285 case WM_USER
+1000+76: return "TB_SAVERESTOREW";
4286 case WM_USER
+1000+27: return "TB_CUSTOMIZE";
4287 case WM_USER
+1000+28: return "TB_ADDSTRINGA";
4288 case WM_USER
+1000+77: return "TB_ADDSTRINGW";
4289 case WM_USER
+1000+29: return "TB_GETITEMRECT";
4290 case WM_USER
+1000+30: return "TB_BUTTONSTRUCTSIZE";
4291 case WM_USER
+1000+31: return "TB_SETBUTTONSIZE";
4292 case WM_USER
+1000+32: return "TB_SETBITMAPSIZE";
4293 case WM_USER
+1000+33: return "TB_AUTOSIZE";
4294 case WM_USER
+1000+35: return "TB_GETTOOLTIPS";
4295 case WM_USER
+1000+36: return "TB_SETTOOLTIPS";
4296 case WM_USER
+1000+37: return "TB_SETPARENT";
4297 case WM_USER
+1000+39: return "TB_SETROWS";
4298 case WM_USER
+1000+40: return "TB_GETROWS";
4299 case WM_USER
+1000+42: return "TB_SETCMDID";
4300 case WM_USER
+1000+43: return "TB_CHANGEBITMAP";
4301 case WM_USER
+1000+44: return "TB_GETBITMAP";
4302 case WM_USER
+1000+45: return "TB_GETBUTTONTEXTA";
4303 case WM_USER
+1000+75: return "TB_GETBUTTONTEXTW";
4304 case WM_USER
+1000+46: return "TB_REPLACEBITMAP";
4305 case WM_USER
+1000+47: return "TB_SETINDENT";
4306 case WM_USER
+1000+48: return "TB_SETIMAGELIST";
4307 case WM_USER
+1000+49: return "TB_GETIMAGELIST";
4308 case WM_USER
+1000+50: return "TB_LOADIMAGES";
4309 case WM_USER
+1000+51: return "TB_GETRECT";
4310 case WM_USER
+1000+52: return "TB_SETHOTIMAGELIST";
4311 case WM_USER
+1000+53: return "TB_GETHOTIMAGELIST";
4312 case WM_USER
+1000+54: return "TB_SETDISABLEDIMAGELIST";
4313 case WM_USER
+1000+55: return "TB_GETDISABLEDIMAGELIST";
4314 case WM_USER
+1000+56: return "TB_SETSTYLE";
4315 case WM_USER
+1000+57: return "TB_GETSTYLE";
4316 case WM_USER
+1000+58: return "TB_GETBUTTONSIZE";
4317 case WM_USER
+1000+59: return "TB_SETBUTTONWIDTH";
4318 case WM_USER
+1000+60: return "TB_SETMAXTEXTROWS";
4319 case WM_USER
+1000+61: return "TB_GETTEXTROWS";
4320 case WM_USER
+1000+41: return "TB_GETBITMAPFLAGS";
4323 static char s_szBuf
[128];
4324 sprintf(s_szBuf
, "<unknown message = %d>", nMessage
);
4328 } // end of wxGetMessageName
4330 #endif // __WXDEBUG__
4332 static void TranslateKbdEventToMouse(
4340 // Construct the key mask
4341 ULONG
& fwKeys
= *pFlags
;
4343 fwKeys
= VK_BUTTON2
;
4344 if ((::WinGetKeyState(HWND_DESKTOP
, VK_CTRL
) & 0x100) != 0)
4346 if ((::WinGetKeyState(HWND_DESKTOP
, VK_SHIFT
) & 0x100) != 0)
4350 // Simulate right mouse button click
4354 ::WinQueryMsgPos(vHabmain
, &vPoint
);
4358 pWin
->ScreenToClient(pX
, pY
);
4359 } // end of TranslateKbdEventToMouse
4361 // Find the wxWindow at the current mouse position, returning the mouse
4363 wxWindow
* wxFindWindowAtPointer(
4367 return wxFindWindowAtPoint(wxGetMousePosition());
4370 wxWindow
* wxFindWindowAtPoint(
4379 HWND hWndHit
= ::WinWindowFromPoint(HWND_DESKTOP
, &vPt2
, FALSE
);
4380 wxWindow
* pWin
= wxFindWinFromHandle((WXHWND
)hWndHit
) ;
4381 HWND hWnd
= hWndHit
;
4384 // Try to find a window with a wxWindow associated with it
4386 while (!pWin
&& (hWnd
!= 0))
4388 hWnd
= ::WinQueryWindow(hWnd
, QW_PARENT
);
4389 pWin
= wxFindWinFromHandle((WXHWND
)hWnd
) ;
4394 // Get the current mouse position.
4395 wxPoint
wxGetMousePosition()
4399 ::WinQueryPointerPos(HWND_DESKTOP
, &vPt
);
4400 return wxPoint(vPt
.x
, vPt
.y
);