]> git.saurik.com Git - wxWidgets.git/blob - src/os2/control.cpp
Rotated text patch from Hans-Joachim Baader (with some corrections)
[wxWidgets.git] / src / os2 / control.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: control.cpp
3 // Purpose: wxControl class
4 // Author: David Webster
5 // Modified by:
6 // Created: 09/17/99
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "control.h"
14 #endif
15
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
18
19 #ifndef WX_PRECOMP
20 #include "wx/event.h"
21 #include "wx/app.h"
22 #include "wx/dcclient.h"
23 #endif
24 #include "wx/os2/private.h"
25 #include "wx/control.h"
26
27 #if !USE_SHARED_LIBRARY
28 IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
29
30 BEGIN_EVENT_TABLE(wxControl, wxWindow)
31 EVT_ERASE_BACKGROUND(wxControl::OnEraseBackground)
32 END_EVENT_TABLE()
33 #endif
34
35 // Item members
36 wxControl::wxControl()
37 {
38 m_backgroundColour = *wxWHITE;
39 m_foregroundColour = *wxBLACK;
40
41 #if WXWIN_COMPATIBILITY
42 m_callback = 0;
43 #endif // WXWIN_COMPATIBILITY
44 }
45
46 wxControl::~wxControl()
47 {
48 m_isBeingDeleted = TRUE;
49 }
50
51 bool wxControl::OS2CreateControl(const wxChar *classname, WXDWORD style)
52 {
53 m_hWnd = (WXHWND)::WinCreateWindow( GetHwndOf(GetParent())
54 ,classname
55 ,NULL
56 ,style
57 ,0,0,0,0
58 ,NULLHANDLE
59 ,HWND_TOP
60 ,(HMENU)GetId()
61 ,NULL
62 ,NULL
63 );
64
65
66 if ( !m_hWnd )
67 {
68 #ifdef __WXDEBUG__
69 wxLogError(wxT("Failed to create a control of class '%s'"), classname);
70 #endif // DEBUG
71
72 return FALSE;
73 }
74
75 // subclass again for purposes of dialog editing mode
76 SubclassWin(m_hWnd);
77
78 // controls use the same font and colours as their parent dialog by default
79 InheritAttributes();
80
81 return TRUE;
82 }
83
84 wxSize wxControl::DoGetBestSize() const
85 {
86 return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT);
87 }
88
89 bool wxControl::ProcessCommand(wxCommandEvent& event)
90 {
91 #if WXWIN_COMPATIBILITY
92 if ( m_callback )
93 {
94 (void)(*m_callback)(this, event);
95
96 return TRUE;
97 }
98 else
99 #endif // WXWIN_COMPATIBILITY
100
101 return GetEventHandler()->ProcessEvent(event);
102 }
103
104 bool wxControl::OS2OnNotify(int idCtrl,
105 WXLPARAM lParam,
106 WXLPARAM* result)
107 {
108 wxCommandEvent event(wxEVT_NULL, m_windowId);
109 wxEventType eventType = wxEVT_NULL;
110 /* TODO:
111 NMHDR *hdr1 = (NMHDR*) lParam;
112 switch ( hdr1->code )
113 {
114 case NM_CLICK:
115 eventType = wxEVT_COMMAND_LEFT_CLICK;
116 break;
117
118 case NM_DBLCLK:
119 eventType = wxEVT_COMMAND_LEFT_DCLICK;
120 break;
121
122 case NM_RCLICK:
123 eventType = wxEVT_COMMAND_RIGHT_CLICK;
124 break;
125
126 case NM_RDBLCLK:
127 eventType = wxEVT_COMMAND_RIGHT_DCLICK;
128 break;
129
130 case NM_SETFOCUS:
131 eventType = wxEVT_COMMAND_SET_FOCUS;
132 break;
133
134 case NM_KILLFOCUS:
135 eventType = wxEVT_COMMAND_KILL_FOCUS;
136 break;
137
138 case NM_RETURN:
139 eventType = wxEVT_COMMAND_ENTER;
140 break;
141
142 default:
143 return wxWindow::OS2OnNotify(idCtrl, lParam, result);
144 }
145 */
146 event.SetEventType(eventType);
147 event.SetEventObject(this);
148
149 return GetEventHandler()->ProcessEvent(event);
150 }
151
152 void wxControl::OnEraseBackground(wxEraseEvent& event)
153 {
154 // In general, you don't want to erase the background of a control,
155 // or you'll get a flicker.
156 // TODO: move this 'null' function into each control that
157 // might flicker.
158
159 RECT rect;
160 /*
161 * below is msw code.
162 * TODO: convert to PM Code
163 * ::GetClientRect((HWND) GetHWND(), &rect);
164 *
165 * HBRUSH hBrush = ::CreateSolidBrush(PALETTERGB(GetBackgroundColour().Red(),
166 * GetBackgroundColour().Green(),
167 * GetBackgroundColour().Blue()));
168 * int mode = ::SetMapMode((HDC) event.GetDC()->GetHDC(), MM_TEXT);
169 *
170 * ::FillRect ((HDC) event.GetDC()->GetHDC(), &rect, hBrush);
171 * ::DeleteObject(hBrush);
172 * ::SetMapMode((HDC) event.GetDC()->GetHDC(), mode);
173 */
174 }
175
176 WXDWORD wxControl::GetExStyle(WXDWORD& style) const
177 {
178 bool want3D;
179 WXDWORD exStyle = Determine3DEffects(WS_EX_CLIENTEDGE, &want3D) ;
180
181 // Even with extended styles, need to combine with FS_BORDER
182 // for them to look right. Check it out later, base window style does
183 // not designate BORDERS. Down in Frame and And controls.
184
185 if ( want3D || wxStyleHasBorder(m_windowStyle) )
186 style |= FS_BORDER;
187
188 return exStyle;
189 }
190
191 // ---------------------------------------------------------------------------
192 // global functions
193 // ---------------------------------------------------------------------------
194
195 // Call this repeatedly for several wnds to find the overall size
196 // of the widget.
197 // Call it initially with -1 for all values in rect.
198 // Keep calling for other widgets, and rect will be modified
199 // to calculate largest bounding rectangle.
200 void wxFindMaxSize(WXHWND wnd, RECT *rect)
201 {
202 int left = rect->xLeft;
203 int right = rect->xRight;
204 int top = rect->yTop;
205 int bottom = rect->yBottom;
206
207 ::WinQueryWindowRect((HWND) wnd, rect);
208
209 if (left < 0)
210 return;
211
212 if (left < rect->xLeft)
213 rect->xLeft = left;
214
215 if (right > rect->xRight)
216 rect->xRight = right;
217
218 if (top < rect->yTop)
219 rect->yTop = top;
220
221 if (bottom > rect->yBottom)
222 rect->yBottom = bottom;
223 }
224