cddfbd9f55
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@5174 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
297 lines
6.8 KiB
C++
297 lines
6.8 KiB
C++
/*
|
|
* Program: scrollsub
|
|
*
|
|
* Author: Robert Roebling
|
|
*
|
|
* Copyright: (C) 1999, Robert Roebling
|
|
*
|
|
*/
|
|
|
|
// For compilers that support precompilation, includes "wx/wx.h".
|
|
#include "wx/wxprec.h"
|
|
|
|
#ifdef __BORLANDC__
|
|
#pragma hdrstop
|
|
#endif
|
|
|
|
#ifndef WX_PRECOMP
|
|
#include "wx/wx.h"
|
|
#endif
|
|
|
|
#include "wx/image.h"
|
|
#include "wx/listctrl.h"
|
|
#include "wx/sizer.h"
|
|
#include "wx/log.h"
|
|
|
|
|
|
// derived classes
|
|
|
|
class MyFrame;
|
|
class MyScrolledWindow;
|
|
class MyCanvas;
|
|
class MyApp;
|
|
|
|
// MyScrolledWindow
|
|
|
|
class MyScrolledWindow: public wxScrolledWindow
|
|
{
|
|
public:
|
|
MyScrolledWindow() {}
|
|
MyScrolledWindow( wxWindow *parent, wxWindowID id, const wxPoint &pos, const wxSize &size );
|
|
~MyScrolledWindow();
|
|
void OnPaint( wxPaintEvent &event );
|
|
|
|
private:
|
|
MyCanvas *m_canvas;
|
|
|
|
DECLARE_DYNAMIC_CLASS(MyScrolledWindow)
|
|
DECLARE_EVENT_TABLE()
|
|
};
|
|
|
|
// MyCanvas
|
|
|
|
class MyCanvas: public wxPanel
|
|
{
|
|
public:
|
|
MyCanvas() {}
|
|
MyCanvas( wxScrolledWindow *parent, wxWindowID id, const wxPoint &pos, const wxSize &size );
|
|
~MyCanvas();
|
|
void OnPaint( wxPaintEvent &event );
|
|
|
|
private:
|
|
wxScrolledWindow *m_owner;
|
|
|
|
DECLARE_DYNAMIC_CLASS(MyCanvas)
|
|
DECLARE_EVENT_TABLE()
|
|
};
|
|
|
|
// MyFrame
|
|
|
|
class MyFrame: public wxFrame
|
|
{
|
|
public:
|
|
MyFrame();
|
|
|
|
void OnAbout( wxCommandEvent &event );
|
|
void OnQuit( wxCommandEvent &event );
|
|
|
|
wxScrolledWindow *m_scrolled;
|
|
wxTextCtrl *m_log;
|
|
|
|
private:
|
|
DECLARE_DYNAMIC_CLASS(MyFrame)
|
|
DECLARE_EVENT_TABLE()
|
|
};
|
|
|
|
// MyApp
|
|
|
|
class MyApp: public wxApp
|
|
{
|
|
public:
|
|
virtual bool OnInit();
|
|
};
|
|
|
|
// main program
|
|
|
|
IMPLEMENT_APP(MyApp)
|
|
|
|
// MyScrolledWindow
|
|
|
|
IMPLEMENT_DYNAMIC_CLASS(MyScrolledWindow, wxScrolledWindow)
|
|
|
|
BEGIN_EVENT_TABLE(MyScrolledWindow, wxScrolledWindow)
|
|
EVT_PAINT( MyScrolledWindow::OnPaint)
|
|
END_EVENT_TABLE()
|
|
|
|
MyScrolledWindow::MyScrolledWindow( wxWindow *parent, wxWindowID id,
|
|
const wxPoint &pos, const wxSize &size )
|
|
: wxScrolledWindow( parent, id, pos, size, wxSUNKEN_BORDER, "test canvas" )
|
|
{
|
|
m_canvas = new MyCanvas( this, -1, wxDefaultPosition, wxDefaultSize );
|
|
|
|
SetTargetWindow( m_canvas );
|
|
|
|
SetBackgroundColour( "WHEAT" );
|
|
|
|
SetCursor( wxCursor( wxCURSOR_HAND ) );
|
|
|
|
|
|
wxBoxSizer *topsizer = new wxBoxSizer( wxVERTICAL );
|
|
|
|
topsizer->Add( m_canvas, 1, wxEXPAND|wxALL, 30 );
|
|
|
|
SetAutoLayout( TRUE );
|
|
SetSizer( topsizer );
|
|
}
|
|
|
|
MyScrolledWindow::~MyScrolledWindow()
|
|
{
|
|
}
|
|
|
|
void MyScrolledWindow::OnPaint( wxPaintEvent &WXUNUSED(event) )
|
|
{
|
|
wxPaintDC dc( this );
|
|
|
|
wxSize size( GetClientSize() );
|
|
|
|
long w,h;
|
|
dc.GetTextExtent( wxT("Headline"), &w, &h );
|
|
|
|
dc.DrawText( wxT("Headline"), long (size.x / 2 - w / 2), 10 );
|
|
}
|
|
|
|
// MyCanvas
|
|
|
|
IMPLEMENT_DYNAMIC_CLASS(MyCanvas, wxPanel)
|
|
|
|
BEGIN_EVENT_TABLE(MyCanvas, wxPanel)
|
|
EVT_PAINT( MyCanvas::OnPaint)
|
|
END_EVENT_TABLE()
|
|
|
|
MyCanvas::MyCanvas( wxScrolledWindow *parent, wxWindowID id,
|
|
const wxPoint &pos, const wxSize &size )
|
|
: wxPanel( parent, id, pos, size, wxSUNKEN_BORDER, "test canvas" )
|
|
{
|
|
m_owner = parent;
|
|
|
|
(void)new wxButton( this, -1, "Hallo I", wxPoint(0,50), wxSize(100,25) );
|
|
(void)new wxButton( this, -1, "Hallo II", wxPoint(200,50), wxSize(100,25) );
|
|
|
|
SetBackgroundColour( *wxWHITE );
|
|
|
|
SetCursor( wxCursor( wxCURSOR_IBEAM ) );
|
|
}
|
|
|
|
MyCanvas::~MyCanvas()
|
|
{
|
|
}
|
|
|
|
void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
|
|
{
|
|
wxPaintDC dc( this );
|
|
m_owner->PrepareDC( dc );
|
|
|
|
dc.SetPen( *wxBLACK_PEN );
|
|
|
|
// OK, let's assume we are a grid control and we have two
|
|
// grid cells. Here in OnPaint we want to know which cell
|
|
// to redraw so that we prevent redrawing cells that don't
|
|
// need to get redrawn. We have one cell at (0,0) and one
|
|
// more at (200,0), both having a size of (100,25).
|
|
|
|
// We can query how much the window has been scrolled
|
|
// by calling CalcUnscrolledPosition()
|
|
|
|
int scroll_x = 0;
|
|
int scroll_y = 0;
|
|
m_owner->CalcUnscrolledPosition( scroll_x, scroll_y, &scroll_x, &scroll_y );
|
|
|
|
// We also need to know the size of the window to see which
|
|
// cells are completely hidden and not get redrawn
|
|
|
|
int size_x = 0;
|
|
int size_y = 0;
|
|
GetClientSize( &size_x, &size_y );
|
|
|
|
// First cell: (0,0)(100,25)
|
|
// It it on screen?
|
|
if ((0+100-scroll_x > 0) && (0+25-scroll_y > 0) &&
|
|
(0-scroll_x < size_x) && (0-scroll_y < size_y))
|
|
{
|
|
// Has the region an screen been exposed?
|
|
if (IsExposed(0,0,100,25))
|
|
{
|
|
wxLogMessage( "Redraw first cell" );
|
|
dc.DrawRectangle( 0, 0, 100, 25 );
|
|
dc.DrawText( "First Cell", 5, 5 );
|
|
}
|
|
}
|
|
|
|
|
|
// Second cell: (0,200)(100,25)
|
|
// It it on screen?
|
|
if ((200+100-scroll_x > 0) && (0+25-scroll_y > 0) &&
|
|
(200-scroll_x < size_x) && (0-scroll_y < size_y))
|
|
{
|
|
// Has the region an screen been exposed?
|
|
if (IsExposed(200,0,100,25))
|
|
{
|
|
wxLogMessage( "Redraw second cell" );
|
|
dc.DrawRectangle( 200, 0, 100, 25 );
|
|
dc.DrawText( "Second Cell", 205, 5 );
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
|
|
// MyFrame
|
|
|
|
const int ID_QUIT = 108;
|
|
const int ID_ABOUT = 109;
|
|
|
|
IMPLEMENT_DYNAMIC_CLASS( MyFrame, wxFrame )
|
|
|
|
BEGIN_EVENT_TABLE(MyFrame,wxFrame)
|
|
EVT_MENU (ID_ABOUT, MyFrame::OnAbout)
|
|
EVT_MENU (ID_QUIT, MyFrame::OnQuit)
|
|
END_EVENT_TABLE()
|
|
|
|
MyFrame::MyFrame()
|
|
: wxFrame( (wxFrame *)NULL, -1, "wxScrolledWindow sample",
|
|
wxPoint(20,20), wxSize(470,500) )
|
|
{
|
|
wxMenu *file_menu = new wxMenu();
|
|
file_menu->Append( ID_ABOUT, "&About..");
|
|
file_menu->Append( ID_QUIT, "E&xit\tAlt-X");
|
|
|
|
wxMenuBar *menu_bar = new wxMenuBar();
|
|
menu_bar->Append(file_menu, "&File");
|
|
|
|
SetMenuBar( menu_bar );
|
|
|
|
CreateStatusBar(2);
|
|
int widths[] = { -1, 100 };
|
|
SetStatusWidths( 2, widths );
|
|
|
|
m_scrolled = new MyScrolledWindow( this, -1, wxPoint(0,0), wxSize(100,100) );
|
|
m_scrolled->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 );
|
|
|
|
topsizer->Add( m_scrolled, 1, wxEXPAND );
|
|
topsizer->Add( m_log, 0, wxEXPAND );
|
|
|
|
SetAutoLayout( TRUE );
|
|
SetSizer( topsizer );
|
|
}
|
|
|
|
void MyFrame::OnQuit( wxCommandEvent &WXUNUSED(event) )
|
|
{
|
|
Close( TRUE );
|
|
}
|
|
|
|
void MyFrame::OnAbout( wxCommandEvent &WXUNUSED(event) )
|
|
{
|
|
(void)wxMessageBox( "wxScroll demo II\n"
|
|
"Robert Roebling (c) 1998",
|
|
"About wxScroll II Demo", wxICON_INFORMATION | wxOK );
|
|
}
|
|
|
|
//-----------------------------------------------------------------------------
|
|
// MyApp
|
|
//-----------------------------------------------------------------------------
|
|
|
|
bool MyApp::OnInit()
|
|
{
|
|
wxFrame *frame = new MyFrame();
|
|
frame->Show( TRUE );
|
|
|
|
return TRUE;
|
|
}
|
|
|