]> git.saurik.com Git - wxWidgets.git/blobdiff - samples/scroll/scroll.cpp
MutexGui calls in WakeUpIdle are not needed under GTK2, fixing the long-standing...
[wxWidgets.git] / samples / scroll / scroll.cpp
index b190de4637455759b5dca805cc3c0bc9bc215818..4b60e0ab04305bc07dea44c7029f0b3439c556c8 100644 (file)
@@ -4,6 +4,7 @@
  * Author: Robert Roebling
  *
  * Copyright: (C) 1998, Robert Roebling
+ *                2002, Ron Lee
  *
  */
 
@@ -34,9 +35,9 @@ class MyApp;
 class MyCanvas: public wxScrolledWindow
 {
 public:
-    MyCanvas() {};
+    MyCanvas() {}
     MyCanvas( wxWindow *parent, wxWindowID, const wxPoint &pos, const wxSize &size );
-    ~MyCanvas();
+    ~MyCanvas(){};
     void OnPaint( wxPaintEvent &event );
     void OnQueryPosition( wxCommandEvent &event );
     void OnAddButton( wxCommandEvent &event );
@@ -44,7 +45,6 @@ public:
     void OnMoveButton( wxCommandEvent &event );
     void OnScrollWin( wxCommandEvent &event );
     void OnMouseDown( wxMouseEvent &event );
-    void OnScroll( wxScrollWinEvent &event );
 
     wxButton *m_button;
 
@@ -52,7 +52,92 @@ public:
     DECLARE_EVENT_TABLE()
 };
 
+
+// ----------------------------------------------------------------------------
+// Autoscrolling example.
+// ----------------------------------------------------------------------------
+
+// this class uses the 'virtual' size attribute along with an internal
+// sizer to automatically set up scrollbars as needed
+
+class MyAutoScrollWindow : public wxScrolledWindow
+{
+private:
+
+    wxButton    *m_button;
+
+public:
+
+    MyAutoScrollWindow( wxWindow *parent );
+
+    void OnResizeClick( wxCommandEvent &WXUNUSED( event ) );
+
+    DECLARE_EVENT_TABLE()
+};
+
+
+// ----------------------------------------------------------------------------
+// MyScrolledWindow classes: examples of wxScrolledWindow usage
+// ----------------------------------------------------------------------------
+
+// base class for both of them
+class MyScrolledWindowBase : public wxScrolledWindow
+{
+public:
+    MyScrolledWindowBase(wxWindow *parent)
+        : wxScrolledWindow(parent)
+        , m_nLines( 100 )
+    {
+        wxClientDC dc(this);
+        dc.GetTextExtent(_T("Line 17"), NULL, &m_hLine);
+    }
+
+protected:
+    // the height of one line on screen
+    wxCoord m_hLine;
+
+    // the number of lines we draw
+    size_t m_nLines;
+};
+
+// this class does "stupid" redrawing - it redraws everything each time
+// and sets the scrollbar extent directly.
+
+class MyScrolledWindowDumb : public MyScrolledWindowBase
+{
+public:
+    MyScrolledWindowDumb(wxWindow *parent) : MyScrolledWindowBase(parent)
+    {
+        // no horz scrolling
+        SetScrollbars(0, m_hLine, 0, m_nLines + 1, 0, 0, true /* no refresh */);
+    }
+
+    virtual void OnDraw(wxDC& dc);
+};
+
+// this class does "smart" redrawing - only redraws the lines which must be
+// redrawn and sets the scroll rate and virtual size to affect the
+// scrollbars.
+//
+// Note that this class should produce identical results to the one above.
+
+class MyScrolledWindowSmart : public MyScrolledWindowBase
+{
+public:
+    MyScrolledWindowSmart(wxWindow *parent) : MyScrolledWindowBase(parent)
+    {
+        // no horz scrolling
+        SetScrollRate( 0, m_hLine );
+        SetVirtualSize( -1, ( m_nLines + 1 ) * m_hLine );
+    }
+
+    virtual void OnDraw(wxDC& dc);
+};
+
+
+// ----------------------------------------------------------------------------
 // MyFrame
+// ----------------------------------------------------------------------------
 
 class MyFrame: public wxFrame
 {
@@ -85,13 +170,13 @@ IMPLEMENT_APP(MyApp)
 
 // ids
 
-#define   ID_ADDBUTTON    1
-#define   ID_DELBUTTON    2
-#define   ID_MOVEBUTTON   3
-#define   ID_SCROLLWIN    4
-#define   ID_QUERYPOS     5
+const long   ID_ADDBUTTON   = wxNewId();
+const long   ID_DELBUTTON   = wxNewId();
+const long   ID_MOVEBUTTON  = wxNewId();
+const long   ID_SCROLLWIN   = wxNewId();
+const long   ID_QUERYPOS    = wxNewId();
 
-#define   ID_NEWBUTTON    10
+const long   ID_NEWBUTTON   = wxNewId();
 
 // MyCanvas
 
@@ -99,23 +184,27 @@ IMPLEMENT_DYNAMIC_CLASS(MyCanvas, wxScrolledWindow)
 
 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
   EVT_PAINT(                  MyCanvas::OnPaint)
-  EVT_MOUSE_EVENTS(                  MyCanvas::OnMouseDown)
+  EVT_MOUSE_EVENTS(           MyCanvas::OnMouseDown)
   EVT_BUTTON( ID_QUERYPOS,    MyCanvas::OnQueryPosition)
   EVT_BUTTON( ID_ADDBUTTON,   MyCanvas::OnAddButton)
   EVT_BUTTON( ID_DELBUTTON,   MyCanvas::OnDeleteButton)
   EVT_BUTTON( ID_MOVEBUTTON,  MyCanvas::OnMoveButton)
   EVT_BUTTON( ID_SCROLLWIN,   MyCanvas::OnScrollWin)
-  EVT_SCROLLWIN(              MyCanvas::OnScroll)
 END_EVENT_TABLE()
 
 MyCanvas::MyCanvas( wxWindow *parent, wxWindowID id,
                     const wxPoint &pos, const wxSize &size )
-        : wxScrolledWindow( parent, id, pos, size, wxSUNKEN_BORDER | wxTAB_TRAVERSAL, "test canvas" )
+    : wxScrolledWindow( parent, id, pos, size, wxSUNKEN_BORDER | wxTAB_TRAVERSAL, _T("test canvas") )
 {
-    (void) new wxButton( this, ID_ADDBUTTON, "add button", wxPoint(10,10) );
-    (void) new wxButton( this, ID_DELBUTTON, "del button", wxPoint(10,40) );
-    (void) new wxButton( this, ID_MOVEBUTTON, "move button", wxPoint(150,10) );
-    (void) new wxButton( this, ID_SCROLLWIN, "scroll win", wxPoint(250,10) );
+    SetScrollRate( 10, 10 );
+    SetVirtualSize( 500, 1000 );
+
+    (void) new wxButton( this, ID_ADDBUTTON,  _T("add button"), wxPoint(10,10) );
+    (void) new wxButton( this, ID_DELBUTTON,  _T("del button"), wxPoint(10,40) );
+    (void) new wxButton( this, ID_MOVEBUTTON, _T("move button"), wxPoint(150,10) );
+    (void) new wxButton( this, ID_SCROLLWIN,  _T("scroll win"), wxPoint(250,10) );
+
+#if 0
 
     wxString choices[] =
     {
@@ -125,22 +214,22 @@ MyCanvas::MyCanvas( wxWindow *parent, wxWindowID id,
         "wonderful",
         "examples."
     };
-  
+
     m_button = new wxButton( this, ID_QUERYPOS, "Query position", wxPoint(10,110) );
-  
-    (void) new wxTextCtrl( this, -1, "wxTextCtrl", wxPoint(10,150), wxSize(80,-1) );
-  
-    (void) new wxRadioButton( this, -1, "Disable", wxPoint(10,190) );
-  
-    (void) new wxComboBox( this, -1, "This", wxPoint(10,230), wxDefaultSize, 5, choices );
-  
-    (void) new wxRadioBox( this, -1, "This", wxPoint(10,310), wxDefaultSize, 5, choices, 2, wxRA_SPECIFY_COLS );
 
-    (void) new wxRadioBox( this, -1, "This", wxPoint(10,440), wxDefaultSize, 5, choices, 2, wxRA_SPECIFY_ROWS );
+    (void) new wxTextCtrl( this, wxID_ANY, "wxTextCtrl", wxPoint(10,150), wxSize(80,wxDefaultCoord) );
+
+    (void) new wxRadioButton( this, wxID_ANY, "Disable", wxPoint(10,190) );
+
+    (void) new wxComboBox( this, wxID_ANY, "This", wxPoint(10,230), wxDefaultSize, 5, choices );
+
+    (void) new wxRadioBox( this, wxID_ANY, "This", wxPoint(10,310), wxDefaultSize, 5, choices, 2, wxRA_SPECIFY_COLS );
+
+    (void) new wxRadioBox( this, wxID_ANY, "This", wxPoint(10,440), wxDefaultSize, 5, choices, 2, wxRA_SPECIFY_ROWS );
 
     wxListCtrl *m_listCtrl = new wxListCtrl(
-       this, -1, wxPoint(200, 110), wxSize(180, 120),
-       wxLC_REPORT | wxSIMPLE_BORDER | wxLC_SINGLE_SEL );
+            this, wxID_ANY, wxPoint(200, 110), wxSize(180, 120),
+            wxLC_REPORT | wxSIMPLE_BORDER | wxLC_SINGLE_SEL );
 
     m_listCtrl->InsertColumn(0, "First", wxLIST_FORMAT_LEFT, 90);
     m_listCtrl->InsertColumn(1, "Last", wxLIST_FORMAT_LEFT, 90);
@@ -153,31 +242,34 @@ MyCanvas::MyCanvas( wxWindow *parent, wxWindowID id,
     }
     m_listCtrl->SetItemState( 3, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
 
-    (void) new wxListBox( this, -1, wxPoint(260,280), wxSize(120,120), 5, choices, wxLB_ALWAYS_SB );
+    (void) new wxListBox( this, wxID_ANY, wxPoint(260,280), wxSize(120,120), 5, choices, wxLB_ALWAYS_SB );
 
-    wxPanel *test = new wxPanel( this, -1, wxPoint(10, 530), wxSize(130,120), wxSIMPLE_BORDER | wxTAB_TRAVERSAL );
-    test->SetBackgroundColour( "WHEAT" );
-    wxButton *test2 = new wxButton( test, -1, "Hallo", wxPoint(10,10) );
-  
-    test = new wxPanel( this, -1, wxPoint(160, 530), wxSize(130,120), wxSUNKEN_BORDER | wxTAB_TRAVERSAL );
-    test->SetBackgroundColour( "WHEAT" );
+#endif
+
+    wxPanel *test = new wxPanel( this, wxID_ANY, wxPoint(10, 110), wxSize(130,50), wxSIMPLE_BORDER | wxTAB_TRAVERSAL );
+    test->SetBackgroundColour( wxT("WHEAT") );
+
+#if 0
+
+    wxButton *test2 = new wxButton( test, wxID_ANY, "Hallo", wxPoint(10,10) );
+
+    test = new wxPanel( this, wxID_ANY, wxPoint(160, 530), wxSize(130,120), wxSUNKEN_BORDER | wxTAB_TRAVERSAL );
+    test->SetBackgroundColour( wxT("WHEAT") );
     test->SetCursor( wxCursor( wxCURSOR_NO_ENTRY ) );
-    test2 = new wxButton( test, -1, "Hallo", wxPoint(10,10) );
+    test2 = new wxButton( test, wxID_ANY, "Hallo", wxPoint(10,10) );
     test2->SetCursor( wxCursor( wxCURSOR_PENCIL ) );
-  
-    test = new wxPanel( this, -1, wxPoint(310, 530), wxSize(130,120), wxRAISED_BORDER | wxTAB_TRAVERSAL );
-    test->SetBackgroundColour( "WHEAT" );
+
+    test = new wxPanel( this, wxID_ANY, wxPoint(310, 530), wxSize(130,120), wxRAISED_BORDER | wxTAB_TRAVERSAL );
+    test->SetBackgroundColour( wxT("WHEAT") );
     test->SetCursor( wxCursor( wxCURSOR_PENCIL ) );
-    test2 = new wxButton( test, -1, "Hallo", wxPoint(10,10) );
+    test2 = new wxButton( test, wxID_ANY, "Hallo", wxPoint(10,10) );
     test2->SetCursor( wxCursor( wxCURSOR_NO_ENTRY ) );
 
-    SetBackgroundColour( "WHEAT" );
-  
-    SetCursor( wxCursor( wxCURSOR_IBEAM ) );
-}
+#endif
 
-MyCanvas::~MyCanvas()
-{
+    SetBackgroundColour( wxT("BLUE") );
+
+    SetCursor( wxCursor( wxCURSOR_IBEAM ) );
 }
 
 void MyCanvas::OnMouseDown( wxMouseEvent &event )
@@ -187,10 +279,10 @@ void MyCanvas::OnMouseDown( wxMouseEvent &event )
         wxPoint pt( event.GetPosition() );
         int x,y;
         CalcUnscrolledPosition( pt.x, pt.y, &x, &y );
-        wxLogMessage( "Mouse down event at: %d %d, scrolled: %d %d", pt.x, pt.y, x, y );
+        wxLogMessage( wxT("Mouse down event at: %d %d, scrolled: %d %d"), pt.x, pt.y, x, y );
 
         if ( !event.LeftIsDown() )
-            wxLogMessage( "Error: LeftIsDown() should be TRUE if for LeftDown()" );
+            wxLogMessage( wxT("Error: LeftIsDown() should be true if for LeftDown()") );
     }
 }
 
@@ -199,73 +291,139 @@ void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
     wxPaintDC dc( this );
     PrepareDC( dc );
 
-    dc.DrawText( "Press mouse button to test calculations!", 160, 50 );
+    dc.DrawText( _T("Press mouse button to test calculations!"), 160, 50 );
+
+    dc.DrawText( _T("Some text"), 140, 140 );
 
-    dc.DrawText( "Some text", 140, 140 );
-  
     dc.DrawRectangle( 100, 160, 200, 200 );
 }
 
 void MyCanvas::OnQueryPosition( wxCommandEvent &WXUNUSED(event) )
 {
     wxPoint pt( m_button->GetPosition() );
-    wxLogMessage( "Position of ""Query position"" is %d %d", pt.x, pt.y );
+    wxLogMessage( wxT("Position of \"Query position\" is %d %d"), pt.x, pt.y );
     pt = ClientToScreen( pt );
-    wxLogMessage( "Position of ""Query position"" on screen is %d %d", pt.x, pt.y );
+    wxLogMessage( wxT("Position of \"Query position\" on screen is %d %d"), pt.x, pt.y );
 }
 
 void MyCanvas::OnAddButton( wxCommandEvent &WXUNUSED(event) )
 {
-    wxLogMessage( "Inserting button at position 10,70..." );
-    wxButton *button = new wxButton( this, ID_NEWBUTTON, "new button", wxPoint(10,70), wxSize(80,25) );
+    wxLogMessage( wxT("Inserting button at position 10,70...") );
+    wxButton *button = new wxButton( this, ID_NEWBUTTON, wxT("new button"), wxPoint(10,70), wxSize(80,25) );
     wxPoint pt( button->GetPosition() );
-    wxLogMessage( "-> Position after inserting %d %d", pt.x, pt.y );
+    wxLogMessage( wxT("-> Position after inserting %d %d"), pt.x, pt.y );
 }
 
-void MyCanvas::OnDeleteButton( wxCommandEvent &event )
+void MyCanvas::OnDeleteButton( wxCommandEvent &WXUNUSED(event) )
 {
-    wxLogMessage( "Deleting button inserted with ""Add button""..." );
+    wxLogMessage( wxT("Deleting button inserted with \"Add button\"...") );
     wxWindow *win = FindWindow( ID_NEWBUTTON );
     if (win)
        win->Destroy();
     else
-       wxLogMessage( "-> No window with id = ID_NEWBUTTON found." );
+       wxLogMessage( wxT("-> No window with id = ID_NEWBUTTON found.") );
 }
 
 void MyCanvas::OnMoveButton( wxCommandEvent &event )
 {
-    wxLogMessage( "Moving button 10 pixels downward.." );
+    wxLogMessage( wxT("Moving button 10 pixels downward..") );
     wxWindow *win = FindWindow( event.GetId() );
     wxPoint pt( win->GetPosition() );
-    wxLogMessage( "-> Position before move is %d %d", pt.x, pt.y );
-    win->Move( -1, pt.y + 10 );
+    wxLogMessage( wxT("-> Position before move is %d %d"), pt.x, pt.y );
+    win->Move( wxDefaultCoord, pt.y + 10 );
     pt = win->GetPosition();
-    wxLogMessage( "-> Position after move is %d %d", pt.x, pt.y );
+    wxLogMessage( wxT("-> Position after move is %d %d"), pt.x, pt.y );
 }
 
 void MyCanvas::OnScrollWin( wxCommandEvent &WXUNUSED(event) )
 {
-    wxLogMessage( "Scrolling 2 units up.\nThe white square and the controls should move equally!" );
+    wxLogMessage( wxT("Scrolling 2 units up.\nThe white square and the controls should move equally!") );
     int x,y;
-    ViewStart( &x, &y );
+    GetViewStart( &x, &y );
     Scroll( -1, y+2 );
 }
 
-void MyCanvas::OnScroll( wxScrollWinEvent &event )
+// MyAutoScrollWindow
+
+const long   ID_RESIZEBUTTON = wxNewId();
+const wxSize SMALL_BUTTON( 100, 50 );
+const wxSize LARGE_BUTTON( 300, 100 );
+
+BEGIN_EVENT_TABLE( MyAutoScrollWindow, wxScrolledWindow)
+  EVT_BUTTON( ID_RESIZEBUTTON,    MyAutoScrollWindow::OnResizeClick)
+END_EVENT_TABLE()
+
+MyAutoScrollWindow::MyAutoScrollWindow( wxWindow *parent )
+    : wxScrolledWindow( parent )
 {
-    if (( event.GetEventType() == wxEVT_SCROLLWIN_THUMBRELEASE ))
-    {
-        wxLogMessage( "Thumb released; position: %u", event.GetPosition() );
-    }
-    event.Skip();
+    SetBackgroundColour( wxT("GREEN") );
+
+    // Set the rate we'd like for scrolling.
+
+    SetScrollRate( 5, 5 );
+
+    // Populate a sizer with a 'resizing' button and some
+    // other static decoration
+
+    wxFlexGridSizer  *innersizer = new wxFlexGridSizer( 2, 2 );
+
+    m_button = new wxButton( this,
+                             ID_RESIZEBUTTON,
+                             _T("Press me"),
+                             wxDefaultPosition,
+                             SMALL_BUTTON );
+
+    // We need to do this here, because wxADJUST_MINSIZE below
+    // will cause the initial size to be ignored for Best/Min size.
+    // It would be nice to fix the sizers to handle this a little
+    // more cleanly.
+
+    m_button->SetSizeHints( SMALL_BUTTON.GetWidth(), SMALL_BUTTON.GetHeight() );
+
+    innersizer->Add( m_button,
+                     0,
+                     wxALIGN_CENTER | wxALL | wxADJUST_MINSIZE,
+                     20 );
+
+    innersizer->Add( new wxStaticText( this, wxID_ANY, _T("This is just") ),
+                    0,
+                    wxALIGN_CENTER );
+
+    innersizer->Add( new wxStaticText( this, wxID_ANY, _T("some decoration") ),
+                    0,
+                    wxALIGN_CENTER );
+
+    innersizer->Add( new wxStaticText( this, wxID_ANY, _T("for you to scroll...") ),
+                    0,
+                    wxALIGN_CENTER );
+
+    // Then use the sizer to set the scrolled region size.
+
+    SetSizer( innersizer );
+}
+
+void MyAutoScrollWindow::OnResizeClick( wxCommandEvent &WXUNUSED( event ) )
+{
+    // Arbitrarily resize the button to change the minimum size of
+    // the (scrolled) sizer.
+
+    if( m_button->GetSize() == SMALL_BUTTON )
+        m_button->SetSizeHints( LARGE_BUTTON.GetWidth(), LARGE_BUTTON.GetHeight() );
+    else
+        m_button->SetSizeHints( SMALL_BUTTON.GetWidth(), SMALL_BUTTON.GetHeight() );
+
+    // Force update layout and scrollbars, since nothing we do here
+    // necessarily generates a size event which would do it for us.
+
+    FitInside();
 }
 
 // MyFrame
 
-const int ID_QUIT  = 108;
-const int ID_ABOUT = 109;
-const int ID_DELETE_ALL = 110;
-const int ID_INSERT_NEW = 111;
+const long ID_QUIT       = wxNewId();
+const long ID_ABOUT      = wxNewId();
+const long ID_DELETE_ALL = wxNewId();
+const long ID_INSERT_NEW = wxNewId();
 
 IMPLEMENT_DYNAMIC_CLASS( MyFrame, wxFrame )
 
@@ -277,37 +435,44 @@ BEGIN_EVENT_TABLE(MyFrame,wxFrame)
 END_EVENT_TABLE()
 
 MyFrame::MyFrame()
-       : wxFrame( (wxFrame *)NULL, -1, "wxScrolledWindow sample",
+       : wxFrame( (wxFrame *)NULL, wxID_ANY, _T("wxScrolledWindow sample"),
                   wxPoint(20,20), wxSize(470,500) )
 {
     wxMenu *file_menu = new wxMenu();
-    file_menu->Append( ID_DELETE_ALL, "Delete all");
-    file_menu->Append( ID_INSERT_NEW, "Insert new");
-    file_menu->Append( ID_ABOUT, "&About..");
-    file_menu->Append( ID_QUIT, "E&xit\tAlt-X");
+    file_menu->Append( ID_DELETE_ALL, _T("Delete all"));
+    file_menu->Append( ID_INSERT_NEW, _T("Insert new"));
+    file_menu->Append( ID_ABOUT,      _T("&About.."));
+    file_menu->Append( ID_QUIT,       _T("E&xit\tAlt-X"));
 
     wxMenuBar *menu_bar = new wxMenuBar();
-    menu_bar->Append(file_menu, "&File");
+    menu_bar->Append(file_menu, _T("&File"));
 
     SetMenuBar( menu_bar );
 
+#if wxUSE_STATUSBAR
     CreateStatusBar(2);
     int widths[] = { -1, 100 };
     SetStatusWidths( 2, widths );
+#endif // wxUSE_STATUSBAR
 
-    m_canvas = new MyCanvas( this, -1, wxPoint(0,0), wxSize(100,100) );
-    m_canvas->SetScrollbars( 10, 10, 50, 100 );
-  
-    m_log = new wxTextCtrl( this, -1, "This is the log window.\n", wxPoint(0,0), wxSize(100,100), wxTE_MULTILINE );
-    wxLog *old_log = wxLog::SetActiveTarget( new wxLogTextCtrl( m_log ) );
-    delete old_log;
-    
     wxBoxSizer *topsizer = new wxBoxSizer( wxVERTICAL );
-    
+
+    // Setting an explicit size here is superfluous, it will be overridden
+    // by the sizer in any case.
+    m_canvas = new MyCanvas( this, wxID_ANY, wxPoint(0,0), wxSize(100,100) );
+
+    // This is done with ScrollRate/VirtualSize in MyCanvas ctor now,
+    // both should produce identical results.
+    //m_canvas->SetScrollbars( 10, 10, 50, 100 );
+
     topsizer->Add( m_canvas, 1, wxEXPAND );
-    topsizer->Add( m_log, 0, wxEXPAND );
+    topsizer->Add( new MyAutoScrollWindow( this ), 1, wxEXPAND );
+
+    wxSizer *sizerBtm = new wxBoxSizer(wxHORIZONTAL);
+    sizerBtm->Add( new MyScrolledWindowDumb(this), 1, wxEXPAND );
+    sizerBtm->Add( new MyScrolledWindowSmart(this), 1, wxEXPAND );
+    topsizer->Add( sizerBtm, 1, wxEXPAND );
 
-    SetAutoLayout( TRUE );
     SetSizer( topsizer );
 }
 
@@ -318,19 +483,22 @@ void MyFrame::OnDeleteAll( wxCommandEvent &WXUNUSED(event) )
 
 void MyFrame::OnInsertNew( wxCommandEvent &WXUNUSED(event) )
 {
-    (void)new wxButton( m_canvas, -1, "Hello", wxPoint(100,100) );
+    (void)new wxButton( m_canvas, wxID_ANY, _T("Hello"), wxPoint(100,100) );
 }
 
 void MyFrame::OnQuit( wxCommandEvent &WXUNUSED(event) )
 {
-  Close( TRUE );
+  Close( true );
 }
 
 void MyFrame::OnAbout( wxCommandEvent &WXUNUSED(event) )
 {
-  (void)wxMessageBox( "wxScroll demo\n"
-                      "Robert Roebling (c) 1998",
-                      "About wxScroll Demo", wxICON_INFORMATION | wxOK );
+  (void)wxMessageBox( _T("wxScroll demo\n")
+                      _T("Robert Roebling (c) 1998\n")
+                      _T("Autoscrolling examples\n")
+                      _T("Ron Lee (c) 2002"),
+                      _T("About wxScroll Demo"),
+                      wxICON_INFORMATION | wxOK );
 }
 
 //-----------------------------------------------------------------------------
@@ -340,8 +508,58 @@ void MyFrame::OnAbout( wxCommandEvent &WXUNUSED(event) )
 bool MyApp::OnInit()
 {
   wxFrame *frame = new MyFrame();
-  frame->Show( TRUE );
+  frame->Show( true );
+
+  return true;
+}
+
+// ----------------------------------------------------------------------------
+// MyScrolledWindowXXX
+// ----------------------------------------------------------------------------
+
+void MyScrolledWindowDumb::OnDraw(wxDC& dc)
+{
+    // this is useful to see which lines are redrawn
+    static size_t s_redrawCount = 0;
+    dc.SetTextForeground(s_redrawCount++ % 2 ? *wxRED : *wxBLUE);
+
+    wxCoord y = 0;
+    for ( size_t line = 0; line < m_nLines; line++ )
+    {
+        wxCoord yPhys;
+        CalcScrolledPosition(0, y, NULL, &yPhys);
 
-  return TRUE;
+        dc.DrawText(wxString::Format(_T("Line %u (logical %d, physical %d)"),
+                                     line, y, yPhys), 0, y);
+        y += m_hLine;
+    }
 }
 
+void MyScrolledWindowSmart::OnDraw(wxDC& dc)
+{
+    // this is useful to see which lines are redrawn
+    static size_t s_redrawCount = 0;
+    dc.SetTextForeground(s_redrawCount++ % 2 ? *wxRED : *wxBLUE);
+
+    // update region is always in device coords, translate to logical ones
+    wxRect rectUpdate = GetUpdateRegion().GetBox();
+    CalcUnscrolledPosition(rectUpdate.x, rectUpdate.y,
+                           &rectUpdate.x, &rectUpdate.y);
+
+    size_t lineFrom = rectUpdate.y / m_hLine,
+           lineTo = rectUpdate.GetBottom() / m_hLine;
+
+    if ( lineTo > m_nLines - 1)
+        lineTo = m_nLines - 1;
+
+    wxCoord y = lineFrom*m_hLine;
+    for ( size_t line = lineFrom; line <= lineTo; line++ )
+    {
+        wxCoord yPhys;
+        CalcScrolledPosition(0, y, NULL, &yPhys);
+
+        dc.DrawText(wxString::Format(_T("Line %u (logical %d, physical %d)"),
+                                     line, y, yPhys), 0, y);
+        y += m_hLine;
+    }
+}