fixed bug with the caret positioning after SetValue() introduced by the last commit

[wxWidgets.git] / samples / mdi / mdi.cpp

diff --git a/samples/mdi/mdi.cpp b/samples/mdi/mdi.cpp
index eb98b73dee8f9f5544d92a7ebf01b1be49ddd3a5..5e67d487e2a7eb8ac0c2843ab8f872a9ee1647c7 100644 (file)
--- a/samples/mdi/mdi.cpp
+++ b/samples/mdi/mdi.cpp
@@ -17,11 +17,6 @@
 // headers
 // ---------------------------------------------------------------------------
 
 // headers
 // ---------------------------------------------------------------------------
 

-#ifdef __VMS
-#define XtDisplay XTDISPLAY
-#define XtWindow XTWINDOW
-#endif
-

 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 


@@ -36,7 +31,7 @@
 
 #include <wx/toolbar.h>
 
 
 #include <wx/toolbar.h>
 

-#if defined(__WXGTK__) || defined(__WXMOTIF__)
+#if defined(__WXGTK__) || defined(__WXMOTIF__) || defined(__WXMAC__)

     #include "mondrian.xpm"
     #include "bitmaps/new.xpm"
     #include "bitmaps/open.xpm"
     #include "mondrian.xpm"
     #include "bitmaps/new.xpm"
     #include "bitmaps/open.xpm"


@@ -89,8 +84,6 @@ BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame)
     EVT_MENU(MDI_CHANGE_POSITION, MyChild::OnChangePosition)
     EVT_MENU(MDI_CHANGE_SIZE, MyChild::OnChangeSize)
 
     EVT_MENU(MDI_CHANGE_POSITION, MyChild::OnChangePosition)
     EVT_MENU(MDI_CHANGE_SIZE, MyChild::OnChangeSize)
 

-    EVT_UPDATE_UI(MDI_REFRESH, MyChild::OnUpdateRefresh)
-

     EVT_SIZE(MyChild::OnSize)
     EVT_MOVE(MyChild::OnMove)
 
     EVT_SIZE(MyChild::OnSize)
     EVT_MOVE(MyChild::OnMove)
 


@@ -170,7 +163,8 @@ MyFrame::MyFrame(wxWindow *parent,
                  const wxPoint& pos,
                  const wxSize& size,
                  const long style)
                  const wxPoint& pos,
                  const wxSize& size,
                  const long style)

-       : wxMDIParentFrame(parent, id, title, pos, size, style)
+       : wxMDIParentFrame(parent, id, title, pos, size,
+                          style | wxNO_FULL_REPAINT_ON_RESIZE)

 {
     textWindow = new wxTextCtrl(this, -1, "A help window",
                                 wxDefaultPosition, wxDefaultSize,
 {
     textWindow = new wxTextCtrl(this, -1, "A help window",
                                 wxDefaultPosition, wxDefaultSize,


@@ -240,22 +234,25 @@ void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
     // Make a menubar
     wxMenu *file_menu = new wxMenu;
 
     // Make a menubar
     wxMenu *file_menu = new wxMenu;
 

-    file_menu->Append(MDI_NEW_WINDOW, "&New window\tCtrl-N");
+    file_menu->Append(MDI_NEW_WINDOW, "&New window");

     file_menu->Append(MDI_CHILD_QUIT, "&Close child", "Close this window");
     file_menu->Append(MDI_CHILD_QUIT, "&Close child", "Close this window");

-    file_menu->Append(MDI_QUIT, "&Exit\tAlt-X");
+    file_menu->Append(MDI_QUIT, "&Exit");

 
     wxMenu *option_menu = new wxMenu;
 
 
     wxMenu *option_menu = new wxMenu;
 

-    option_menu->Append(MDI_REFRESH, "&Refresh picture\tF5");
+    option_menu->Append(MDI_REFRESH, "&Refresh picture");

     option_menu->Append(MDI_CHANGE_TITLE, "Change &title...\tCtrl-T");
     option_menu->Append(MDI_CHANGE_TITLE, "Change &title...\tCtrl-T");

+    option_menu->AppendSeparator();
+    option_menu->Append(MDI_CHANGE_POSITION, "Move frame\tCtrl-M");
+    option_menu->Append(MDI_CHANGE_SIZE, "Resize frame\tCtrl-S");

 
     wxMenu *help_menu = new wxMenu;
 
     wxMenu *help_menu = new wxMenu;

-    help_menu->Append(MDI_ABOUT, "&About\tF1");
+    help_menu->Append(MDI_ABOUT, "&About");

 
     wxMenuBar *menu_bar = new wxMenuBar;
 
     menu_bar->Append(file_menu, "&File");
 
     wxMenuBar *menu_bar = new wxMenuBar;
 
     menu_bar->Append(file_menu, "&File");

-    menu_bar->Append(option_menu, "&Options");
+    menu_bar->Append(option_menu, "&Child");

     menu_bar->Append(help_menu, "&Help");
 
     // Associate the menu bar with the frame
     menu_bar->Append(help_menu, "&Help");
 
     // Associate the menu bar with the frame


@@ -349,7 +346,9 @@ void MyFrame::InitToolBar(wxToolBar* toolBar)
 // Define a constructor for my canvas
 MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size)
         : wxScrolledWindow(parent, -1, pos, size,
 // Define a constructor for my canvas
 MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size)
         : wxScrolledWindow(parent, -1, pos, size,

-                           wxSUNKEN_BORDER|wxVSCROLL|wxHSCROLL)
+                           wxSUNKEN_BORDER |
+                           wxNO_FULL_REPAINT_ON_RESIZE |
+                           wxVSCROLL | wxHSCROLL)

 {
     SetBackgroundColour(wxColour("WHITE"));
 
 {
     SetBackgroundColour(wxColour("WHITE"));
 


@@ -412,10 +411,14 @@ void MyCanvas::OnEvent(wxMouseEvent& event)
 MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title,
                  const wxPoint& pos, const wxSize& size,
                  const long style)
 MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title,
                  const wxPoint& pos, const wxSize& size,
                  const long style)

-       : wxMDIChildFrame(parent, -1, title, pos, size, style)
+       : wxMDIChildFrame(parent, -1, title, pos, size,
+                         style | wxNO_FULL_REPAINT_ON_RESIZE)

 {
     canvas = (MyCanvas *) NULL;
     my_children.Append(this);
 {
     canvas = (MyCanvas *) NULL;
     my_children.Append(this);

+
+    // this should work for MDI frames as well as for normal ones
+    SetSizeHints(100, 100);

 }
 
 MyChild::~MyChild()
 }
 
 MyChild::~MyChild()


@@ -428,17 +431,22 @@ void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
     Close(TRUE);
 }
 
     Close(TRUE);
 }
 

-void MyChild::OnUpdateRefresh(wxUpdateUIEvent& event)
-{
-    event.Enable( canvas && canvas->IsDirty() );
-}
-

 void MyChild::OnRefresh(wxCommandEvent& WXUNUSED(event))
 {
     if ( canvas )
         canvas->Refresh();
 }
 
 void MyChild::OnRefresh(wxCommandEvent& WXUNUSED(event))
 {
     if ( canvas )
         canvas->Refresh();
 }
 

+void MyChild::OnChangePosition(wxCommandEvent& WXUNUSED(event))
+{
+    Move(10, 10);
+}
+
+void MyChild::OnChangeSize(wxCommandEvent& WXUNUSED(event))
+{
+    SetClientSize(100, 100);
+}
+

 void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event))
 {
     static wxString s_title = _T("Canvas Frame");
 void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event))
 {
     static wxString s_title = _T("Canvas Frame");


@@ -446,7 +454,7 @@ void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event))
     wxString title = wxGetTextFromUser(_T("Enter the new title for MDI child"),
                                        _T("MDI sample question"),
                                        s_title,
     wxString title = wxGetTextFromUser(_T("Enter the new title for MDI child"),
                                        _T("MDI sample question"),
                                        s_title,

-                                       GetParent());
+                                       GetParent()->GetParent());

     if ( !title )
         return;
 
     if ( !title )
         return;
 


@@ -460,6 +468,33 @@ void MyChild::OnActivate(wxActivateEvent& event)
         canvas->SetFocus();
 }
 
         canvas->SetFocus();
 }
 

+void MyChild::OnMove(wxMoveEvent& event)
+{
+    // VZ: here everything is totally wrong under MSW, the positions are
+    //     different and both wrong (pos2 is off by 2 pixels for me which seems
+    //     to be the width of the MDI canvas border)
+    wxPoint pos1 = event.GetPosition(),
+            pos2 = GetPosition();
+    wxLogStatus(wxT("position from event: (%d, %d), from frame (%d, %d)"),
+                pos1.x, pos1.y, pos2.x, pos2.y);
+
+    event.Skip();
+}
+
+void MyChild::OnSize(wxSizeEvent& event)
+{
+    // VZ: under MSW the size event carries the client size (quite
+    //     unexpectedly) *except* for the very first one which has the full
+    //     size... what should it really be? TODO: check under wxGTK
+    wxSize size1 = event.GetSize(),
+           size2 = GetSize(),
+           size3 = GetClientSize();
+    wxLogStatus(wxT("size from event: %dx%d, from frame %dx%d, client %dx%d"),
+                size1.x, size1.y, size2.x, size2.y, size3.x, size3.y);
+
+    event.Skip();
+}
+

 void MyChild::OnClose(wxCloseEvent& event)
 {
     if ( canvas && canvas->IsDirty() )
 void MyChild::OnClose(wxCloseEvent& event)
 {
     if ( canvas && canvas->IsDirty() )