]> git.saurik.com Git - wxWidgets.git/blame - src/palmos/toplevel.cpp
Commented out call that breaks metal style setting before Create
[wxWidgets.git] / src / palmos / toplevel.cpp
CommitLineData
ffecfa5a 1///////////////////////////////////////////////////////////////////////////////
e9c52a40 2// Name: src/palmos/toplevel.cpp
ffecfa5a 3// Purpose: implements wxTopLevelWindow for Palm OS
e9c52a40
WS
4// Author: William Osborne - minimal working wxPalmOS port
5// Modified by: Wlodzimierz ABX Skiba - more than minimal functionality
ffecfa5a 6// Created: 10/13/04
e9c52a40
WS
7// RCS-ID: $Id$
8// Copyright: (c) William Osborne <wbo@freeshell.org>, Wlodzimierz Skiba
ffecfa5a
JS
9// Licence: wxWindows licence
10///////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
ffecfa5a
JS
20// For compilers that support precompilation, includes "wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
24 #pragma hdrstop
25#endif
26
27#ifndef WX_PRECOMP
28 #include "wx/app.h"
29 #include "wx/toplevel.h"
30 #include "wx/dialog.h"
31 #include "wx/string.h"
32 #include "wx/log.h"
33 #include "wx/intl.h"
34 #include "wx/frame.h"
35 #include "wx/containr.h" // wxSetFocusToChild()
36#endif //WX_PRECOMP
37
38#include "wx/module.h"
ffecfa5a
JS
39#include "wx/display.h"
40
a152561c
WS
41// controls for sending select event
42#include "wx/button.h"
43#include "wx/checkbox.h"
44#include "wx/radiobut.h"
45#include "wx/tglbtn.h"
9a727a3b 46#include "wx/slider.h"
6a27c749 47#include "wx/datectrl.h"
a152561c 48
20bc5ad8
WS
49#include <Window.h>
50#include <Form.h>
51
ffecfa5a
JS
52// ----------------------------------------------------------------------------
53// globals
54// ----------------------------------------------------------------------------
55
56// the name of the default wxWidgets class
57extern const wxChar *wxCanvasClassName;
58
59// Pointer to the currently active frame for the form event handler.
db101bd3 60wxTopLevelWindowPalm* ActiveParentFrame;
ffecfa5a 61
20bc5ad8
WS
62static Boolean FrameFormHandleEvent(EventType *event);
63
ffecfa5a
JS
64// ============================================================================
65// wxTopLevelWindowPalm implementation
66// ============================================================================
67
68BEGIN_EVENT_TABLE(wxTopLevelWindowPalm, wxTopLevelWindowBase)
69 EVT_ACTIVATE(wxTopLevelWindowPalm::OnActivate)
70END_EVENT_TABLE()
71
72// ----------------------------------------------------------------------------
73// wxTopLevelWindowPalm creation
74// ----------------------------------------------------------------------------
75
76void wxTopLevelWindowPalm::Init()
77{
78}
79
80WXDWORD wxTopLevelWindowPalm::PalmGetStyle(long style, WXDWORD *exflags) const
81{
82 return 0;
83}
84
ffecfa5a 85bool wxTopLevelWindowPalm::Create(wxWindow *parent,
e9c52a40
WS
86 wxWindowID id,
87 const wxString& title,
88 const wxPoint& pos,
89 const wxSize& size,
90 long style,
91 const wxString& name)
ffecfa5a 92{
db101bd3
WS
93 // this is a check for limitation mentioned before FrameFormHandleEvent() code
94 if(wxTopLevelWindows.GetCount()>0)
ffecfa5a
JS
95 return false;
96
db101bd3 97 ActiveParentFrame=NULL;
ffecfa5a 98
ffecfa5a
JS
99 wxTopLevelWindows.Append(this);
100
101 if ( parent )
102 parent->AddChild(this);
103
ba889513 104 SetId( id == wxID_ANY ? NewControlId() : id );
ffecfa5a 105
db101bd3
WS
106 WinConstraintsType constraints;
107 memset(&constraints, 0, sizeof(WinConstraintsType));
ba889513 108 // position
db101bd3
WS
109 constraints.x_pos = ( pos.x == wxDefaultCoord ) ? winUndefConstraint : pos.x;
110 constraints.y_pos = ( pos.y == wxDefaultCoord ) ? winUndefConstraint : pos.y;
ba889513 111 // size
db101bd3
WS
112 constraints.x_min = winUndefConstraint;
113 constraints.x_max = winMaxConstraint;
114 constraints.x_pref = ( size.x == wxDefaultCoord ) ? winUndefConstraint : size.x;
115 constraints.y_min = winUndefConstraint;
116 constraints.y_max = winMaxConstraint;
117 constraints.y_pref = ( size.y == wxDefaultCoord ) ? winUndefConstraint : size.y;
118
119 FrameForm = FrmNewFormWithConstraints(
ba889513 120 GetId(),
db101bd3
WS
121 title.c_str(),
122 winFlagBackBuffer,
123 &constraints,
124 0,
125 NULL,
126 0,
127 NULL,
128 0
129 );
130
131 if(FrameForm==NULL)
ffecfa5a
JS
132 return false;
133
20bc5ad8 134 FrmSetEventHandler((FormType *)FrameForm,FrameFormHandleEvent);
e9c52a40 135
20bc5ad8 136 FrmSetActiveForm((FormType *)FrameForm);
e9c52a40 137
db101bd3 138 ActiveParentFrame=this;
e9c52a40 139
ffecfa5a
JS
140 return true;
141}
142
143wxTopLevelWindowPalm::~wxTopLevelWindowPalm()
144{
145}
146
324eeecb
WS
147// ---------------------------------------------------------------------------
148// implementation
149// ---------------------------------------------------------------------------
150
151WXWINHANDLE wxTopLevelWindowPalm::GetWinHandle() const
152{
20bc5ad8 153 FormType *form = (FormType *)GetForm();
324eeecb
WS
154 if(form)
155 return FrmGetWindowHandle(form);
20bc5ad8 156 return NULL;
324eeecb
WS
157}
158
ffecfa5a
JS
159// ----------------------------------------------------------------------------
160// wxTopLevelWindowPalm showing
161// ----------------------------------------------------------------------------
162
163void wxTopLevelWindowPalm::DoShowWindow(int nShowCmd)
164{
165}
166
167bool wxTopLevelWindowPalm::Show(bool show)
168{
20bc5ad8 169 FrmDrawForm((FormType *)FrameForm);
e9c52a40 170
ffecfa5a
JS
171 wxPaintEvent event(m_windowId);
172 event.SetEventObject(this);
e9c52a40
WS
173 GetEventHandler()->ProcessEvent(event);
174
ffecfa5a
JS
175 return true;
176}
177
178// ----------------------------------------------------------------------------
179// wxTopLevelWindowPalm maximize/minimize
180// ----------------------------------------------------------------------------
181
182void wxTopLevelWindowPalm::Maximize(bool maximize)
183{
184}
185
186bool wxTopLevelWindowPalm::IsMaximized() const
187{
188 return false;
189}
190
191void wxTopLevelWindowPalm::Iconize(bool iconize)
192{
193}
194
195bool wxTopLevelWindowPalm::IsIconized() const
196{
197 return false;
198}
199
200void wxTopLevelWindowPalm::Restore()
201{
202}
203
808e3bce
WS
204void wxTopLevelWindowPalm::DoGetSize( int *width, int *height ) const
205{
206 RectangleType rect;
20bc5ad8 207 FrmGetFormBounds( (FormType *)GetForm() , &rect );
808e3bce
WS
208 if(width)
209 *width = rect.extent.x;
210 if(height)
211 *height = rect.extent.y;
212}
213
ffecfa5a
JS
214// ----------------------------------------------------------------------------
215// wxTopLevelWindowPalm fullscreen
216// ----------------------------------------------------------------------------
217
218bool wxTopLevelWindowPalm::ShowFullScreen(bool show, long style)
219{
220 return false;
221}
222
223// ----------------------------------------------------------------------------
224// wxTopLevelWindowPalm misc
225// ----------------------------------------------------------------------------
226
0ab48d64
WS
227void wxTopLevelWindowPalm::SetTitle( const wxString& WXUNUSED(title))
228{
229}
230
231wxString wxTopLevelWindowPalm::GetTitle() const
232{
233 return wxEmptyString;
234}
235
ffecfa5a
JS
236void wxTopLevelWindowPalm::SetIcon(const wxIcon& icon)
237{
238}
239
240void wxTopLevelWindowPalm::SetIcons(const wxIconBundle& icons)
241{
242}
243
244bool wxTopLevelWindowPalm::EnableCloseButton(bool enable)
245{
246 return false;
247}
248
20bc5ad8 249WXFORMPTR wxTopLevelWindowPalm::GetForm() const
bdb54365 250{
808e3bce 251 return FrmGetActiveForm();
bdb54365
WS
252}
253
ffecfa5a
JS
254bool wxTopLevelWindowPalm::SetShape(const wxRegion& region)
255{
256 return false;
257}
258
ffecfa5a 259// ----------------------------------------------------------------------------
721a9626 260// wxTopLevelWindow native event handling
ffecfa5a
JS
261// ----------------------------------------------------------------------------
262
20bc5ad8 263bool wxTopLevelWindowPalm::HandleControlSelect(WXEVENTPTR event)
a152561c 264{
20bc5ad8
WS
265 const EventType *palmEvent = (EventType *)event;
266 const int id = palmEvent->data.ctlSelect.controlID;
721a9626 267
a152561c
WS
268 wxWindow* win = FindWindowById(id,this);
269 if(win==NULL)
270 return false;
271
6a27c749 272#if wxUSE_BUTTON
a152561c
WS
273 wxButton* button = wxDynamicCast(win,wxButton);
274 if(button)
275 return button->SendClickEvent();
6a27c749 276#endif // wxUSE_BUTTON
a152561c 277
6a27c749 278#if wxUSE_CHECKBOX
a152561c
WS
279 wxCheckBox* checkbox = wxDynamicCast(win,wxCheckBox);
280 if(checkbox)
281 return checkbox->SendClickEvent();
6a27c749 282#endif // wxUSE_CHECKBOX
a152561c 283
6a27c749 284#if wxUSE_TOGGLEBTN
a152561c
WS
285 wxToggleButton* toggle = wxDynamicCast(win,wxToggleButton);
286 if(toggle)
287 return toggle->SendClickEvent();
6a27c749 288#endif // wxUSE_TOGGLEBTN
a152561c 289
6a27c749 290#if wxUSE_RADIOBTN
a152561c
WS
291 wxRadioButton* radio = wxDynamicCast(win,wxRadioButton);
292 if(radio)
293 return radio->SendClickEvent();
6a27c749 294#endif // wxUSE_RADIOBTN
a152561c 295
6a27c749
WS
296#if wxUSE_DATEPICKCTRL
297 wxDatePickerCtrl* datepicker = wxDynamicCast(win,wxDatePickerCtrl);
298 if(datepicker)
299 return datepicker->SendClickEvent();
300#endif // wxUSE_DATEPICKCTRL
301
302#if wxUSE_SLIDER
9a727a3b
WS
303 wxSlider* slider = wxDynamicCast(win,wxSlider);
304 if(slider)
305 return slider->SendUpdatedEvent();
6a27c749 306#endif // wxUSE_SLIDER
9a727a3b 307
a152561c
WS
308 return false;
309}
310
20bc5ad8 311bool wxTopLevelWindowPalm::HandleControlRepeat(WXEVENTPTR event)
721a9626 312{
20bc5ad8
WS
313 const EventType *palmEvent = (EventType *)event;
314 const int id = palmEvent->data.ctlRepeat.controlID;
721a9626 315
20bc5ad8 316 wxWindow* win = FindWindowById(id, this);
721a9626
WS
317 if(win==NULL)
318 return false;
319
6a27c749 320#if wxUSE_SLIDER
721a9626
WS
321 wxSlider* slider = wxDynamicCast(win,wxSlider);
322 if(slider)
323 return slider->SendScrollEvent(event);
6a27c749 324#endif // wxUSE_SLIDER
721a9626
WS
325
326 return false;
327}
328
20bc5ad8 329bool wxTopLevelWindowPalm::HandleSize(WXEVENTPTR event)
721a9626 330{
20bc5ad8
WS
331 const EventType *palmEvent = (EventType *)event;
332 wxSize newSize(palmEvent->data.winResized.newBounds.extent.x,
333 palmEvent->data.winResized.newBounds.extent.y);
721a9626
WS
334 wxSizeEvent eventWx(newSize,GetId());
335 eventWx.SetEventObject(this);
336 return GetEventHandler()->ProcessEvent(eventWx);
337}
338
ffecfa5a
JS
339void wxTopLevelWindowPalm::OnActivate(wxActivateEvent& event)
340{
341}
342
343/* Palm OS Event handler for the window
e9c52a40
WS
344 *
345 * This function *must* be located outside of the wxTopLevelWindow class because
e2731512
WS
346 * the Palm OS API expects a standalone C function as a callback. You cannot
347 * pass a pointer to a member function of a C++ class as a callback because the
348 * prototypes don't match. (A member function has a hidden "this" pointer as
ffecfa5a 349 * its first parameter).
e2731512
WS
350 *
351 * This event handler uses a global pointer to the current wxFrame to process
352 * the events generated by the Palm OS form API. I know this is ugly, but right
353 * now I can't think of any other way to deal with this problem. If someone
354 * finds a better solution, please let me know. My email address is
ffecfa5a
JS
355 * wbo@freeshell.org
356 */
20bc5ad8 357static Boolean FrameFormHandleEvent(EventType *event)
ffecfa5a 358{
721a9626
WS
359 // frame and tlw point to the same object but they are for convenience
360 // of calling proper structure withiout later dynamic typcasting
361 wxFrame* frame = wxDynamicCast(ActiveParentFrame,wxFrame);
362 wxTopLevelWindowPalm* tlw = ActiveParentFrame;
a152561c 363 Boolean handled = false;
e2731512 364
a152561c 365 switch (event->eType) {
ffecfa5a 366 case ctlSelectEvent:
721a9626
WS
367 handled = tlw->HandleControlSelect(event);
368 break;
369 case ctlRepeatEvent:
370 handled = tlw->HandleControlRepeat(event);
371 break;
372 case winResizedEvent:
373 handled = tlw->HandleSize(event);
ffecfa5a
JS
374 break;
375#if wxUSE_MENUS_NATIVE
376 case menuOpenEvent:
a152561c 377 handled = frame->HandleMenuOpen();
e2731512 378 break;
ffecfa5a 379 case menuEvent:
a152561c 380 handled = frame->HandleMenuSelect(event);
ffecfa5a
JS
381 break;
382#endif
383 default:
384 break;
385 }
e2731512 386
a152561c 387 return handled;
ffecfa5a 388}