Hopefully fixed library names generated by wx-config for OS/2's PM port.

[wxWidgets.git] / src / palmos / toplevel.cpp

diff --git a/src/palmos/toplevel.cpp b/src/palmos/toplevel.cpp
index 3f09270a6d3ac1573082b56158d359d4eb0f58dd..0fe4043a0f2f1f8e069ed04343f030ecfc926c4a 100644 (file)
--- a/src/palmos/toplevel.cpp
+++ b/src/palmos/toplevel.cpp
@@ -40,9 +40,16 @@
 #endif //WX_PRECOMP
 
 #include "wx/module.h"
-
 #include "wx/display.h"
 
+// controls for sending select event
+#include "wx/button.h"
+#include "wx/checkbox.h"
+#include "wx/radiobut.h"
+#include "wx/tglbtn.h"
+#include "wx/slider.h"
+#include "wx/datectrl.h"
+
 // ----------------------------------------------------------------------------
 // globals
 // ----------------------------------------------------------------------------
@@ -74,11 +81,6 @@ WXDWORD wxTopLevelWindowPalm::PalmGetStyle(long style, WXDWORD *exflags) const
     return 0;
 }
 
-WXHWND wxTopLevelWindowPalm::PalmGetParent() const
-{
-    return NULL;
-}
-
 bool wxTopLevelWindowPalm::Create(wxWindow *parent,
                                   wxWindowID id,
                                   const wxString& title,
@@ -141,6 +143,18 @@ wxTopLevelWindowPalm::~wxTopLevelWindowPalm()
 {
 }
 
+// ---------------------------------------------------------------------------
+// implementation
+// ---------------------------------------------------------------------------
+
+WXWINHANDLE wxTopLevelWindowPalm::GetWinHandle() const
+{
+    FormType *form = GetForm();
+    if(form)
+        return FrmGetWindowHandle(form);
+    return 0;
+}
+
 // ----------------------------------------------------------------------------
 // wxTopLevelWindowPalm showing
 // ----------------------------------------------------------------------------
@@ -186,6 +200,16 @@ void wxTopLevelWindowPalm::Restore()
 {
 }
 
+void wxTopLevelWindowPalm::DoGetSize( int *width, int *height ) const
+{
+    RectangleType rect;
+    FrmGetFormBounds( GetForm() , &rect );
+    if(width)
+        *width = rect.extent.x;
+    if(height)
+        *height = rect.extent.y;
+}
+
 // ----------------------------------------------------------------------------
 // wxTopLevelWindowPalm fullscreen
 // ----------------------------------------------------------------------------
@@ -212,24 +236,93 @@ bool wxTopLevelWindowPalm::EnableCloseButton(bool enable)
     return false;
 }
 
-FormType *wxTopLevelWindowPalm::GetForm()
+FormType *wxTopLevelWindowPalm::GetForm() const
 {
-    return FrmGetActiveForm ();
+    return FrmGetActiveForm();
 }
 
-#ifndef __WXWINCE__
-
 bool wxTopLevelWindowPalm::SetShape(const wxRegion& region)
 {
     return false;
 }
 
-#endif // !__WXWINCE__
-
 // ----------------------------------------------------------------------------
-// wxTopLevelWindow event handling
+// wxTopLevelWindow native event handling
 // ----------------------------------------------------------------------------
 
+bool wxTopLevelWindowPalm::HandleControlSelect(EventType* event)
+{
+    int id = event->data.ctlSelect.controlID;
+
+    wxWindow* win = FindWindowById(id,this);
+    if(win==NULL)
+        return false;
+
+#if wxUSE_BUTTON
+    wxButton* button = wxDynamicCast(win,wxButton);
+    if(button)
+        return button->SendClickEvent();
+#endif // wxUSE_BUTTON
+
+#if wxUSE_CHECKBOX
+    wxCheckBox* checkbox = wxDynamicCast(win,wxCheckBox);
+    if(checkbox)
+        return checkbox->SendClickEvent();
+#endif // wxUSE_CHECKBOX
+
+#if wxUSE_TOGGLEBTN
+    wxToggleButton* toggle = wxDynamicCast(win,wxToggleButton);
+    if(toggle)
+        return toggle->SendClickEvent();
+#endif // wxUSE_TOGGLEBTN
+
+#if wxUSE_RADIOBTN
+    wxRadioButton* radio = wxDynamicCast(win,wxRadioButton);
+    if(radio)
+        return radio->SendClickEvent();
+#endif // wxUSE_RADIOBTN
+
+#if wxUSE_DATEPICKCTRL
+    wxDatePickerCtrl* datepicker = wxDynamicCast(win,wxDatePickerCtrl);
+    if(datepicker)
+        return datepicker->SendClickEvent();
+#endif // wxUSE_DATEPICKCTRL
+
+#if wxUSE_SLIDER
+    wxSlider* slider = wxDynamicCast(win,wxSlider);
+    if(slider)
+        return slider->SendUpdatedEvent();
+#endif // wxUSE_SLIDER
+
+    return false;
+}
+
+bool wxTopLevelWindowPalm::HandleControlRepeat(EventType* event)
+{
+    int id = event->data.ctlRepeat.controlID;
+
+    wxWindow* win = FindWindowById(id,this);
+    if(win==NULL)
+        return false;
+
+#if wxUSE_SLIDER
+    wxSlider* slider = wxDynamicCast(win,wxSlider);
+    if(slider)
+        return slider->SendScrollEvent(event);
+#endif // wxUSE_SLIDER
+
+    return false;
+}
+
+bool wxTopLevelWindowPalm::HandleSize(EventType* event)
+{
+    wxSize newSize(event->data.winResized.newBounds.extent.x,
+                   event->data.winResized.newBounds.extent.y);
+    wxSizeEvent eventWx(newSize,GetId());
+    eventWx.SetEventObject(this);
+    return GetEventHandler()->ProcessEvent(eventWx);
+}
+
 void wxTopLevelWindowPalm::OnActivate(wxActivateEvent& event)
 {
 }
@@ -248,29 +341,35 @@ void wxTopLevelWindowPalm::OnActivate(wxActivateEvent& event)
  * finds a better solution, please let me know.  My email address is
  * wbo@freeshell.org
  */
-static Boolean FrameFormHandleEvent(EventType* pEvent)
+static Boolean FrameFormHandleEvent(EventType* event)
 {
-    wxFrame*    frame = wxDynamicCast(ActiveParentFrame,wxFrame);
-    Boolean     fHandled = false;
-    FormType*   pForm;
-    WinHandle   hWindow;
-    int         ItemID=0;
+    // frame and tlw point to the same object but they are for convenience
+    // of calling proper structure withiout later dynamic typcasting
+    wxFrame* frame = wxDynamicCast(ActiveParentFrame,wxFrame);
+    wxTopLevelWindowPalm* tlw = ActiveParentFrame;
+    Boolean     handled = false;
 
-    switch (pEvent->eType) {
+    switch (event->eType) {
         case ctlSelectEvent:
+            handled = tlw->HandleControlSelect(event);
+            break;
+        case ctlRepeatEvent:
+            handled = tlw->HandleControlRepeat(event);
+            break;
+        case winResizedEvent:
+            handled = tlw->HandleSize(event);
             break;
 #if wxUSE_MENUS_NATIVE
         case menuOpenEvent:
-            fHandled = frame->HandleMenuOpen();
+            handled = frame->HandleMenuOpen();
             break;
         case menuEvent:
-            ItemID = pEvent->data.menu.itemID;
-            fHandled = frame->HandleMenuSelect(ItemID);
+            handled = frame->HandleMenuSelect(event);
             break;
 #endif
         default:
             break;
     }
 
-    return fHandled;
+    return handled;
 }