Unicode compilation fixes.
[wxWidgets.git] / samples / splitter / splitter.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: splitter.cpp
3 // Purpose: wxSplitterWindow sample
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 04/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
11
12 // For compilers that support precompilation, includes "wx/wx.h".
13 #include "wx/wxprec.h"
14
15 #ifdef __BORLANDC__
16 #pragma hdrstop
17 #endif
18
19 #ifndef WX_PRECOMP
20 #include "wx/wx.h"
21 #endif
22
23 #include "wx/splitter.h"
24
25 class MyApp;
26 class MyFrame;
27 class MyCanvas;
28
29 class MyApp: public wxApp
30 {
31 public:
32 bool OnInit();
33 };
34
35 class MySplitterWindow : public wxSplitterWindow
36 {
37 public:
38 MySplitterWindow(wxFrame *parent, wxWindowID id)
39 : wxSplitterWindow(parent, id, wxDefaultPosition, wxDefaultSize,
40 wxSP_3D | wxSP_LIVE_UPDATE | wxCLIP_CHILDREN)
41 {
42 m_frame = parent;
43 }
44
45 virtual bool OnSashPositionChange(int newSashPosition)
46 {
47 if ( !wxSplitterWindow::OnSashPositionChange(newSashPosition) )
48 return FALSE;
49
50 wxString str;
51 str.Printf( _T("Sash position = %d"), newSashPosition);
52 m_frame->SetStatusText(str);
53
54 return TRUE;
55 }
56
57 private:
58 wxFrame *m_frame;
59 };
60
61 class MyFrame: public wxFrame
62 {
63 public:
64 MyFrame(wxFrame* frame, const wxString& title, const wxPoint& pos, const wxSize& size);
65 virtual ~MyFrame();
66
67 // Menu commands
68 void SplitHorizontal(wxCommandEvent& event);
69 void SplitVertical(wxCommandEvent& event);
70 void Unsplit(wxCommandEvent& event);
71 void SetMinSize(wxCommandEvent& event);
72 void Quit(wxCommandEvent& event);
73
74 // Menu command update functions
75 void UpdateUIHorizontal(wxUpdateUIEvent& event);
76 void UpdateUIVertical(wxUpdateUIEvent& event);
77 void UpdateUIUnsplit(wxUpdateUIEvent& event);
78
79 private:
80 void UpdatePosition();
81
82 wxScrolledWindow *m_left, *m_right;
83
84 MySplitterWindow* m_splitter;
85
86 DECLARE_EVENT_TABLE()
87 };
88
89 class MyCanvas: public wxScrolledWindow
90 {
91 public:
92 MyCanvas(wxWindow* parent, wxWindowID id = -1, const wxPoint& pos = wxDefaultPosition, const wxSize& size = wxDefaultSize, const wxString& name = "");
93 virtual ~MyCanvas();
94
95 virtual void OnDraw(wxDC& dc);
96
97 DECLARE_EVENT_TABLE()
98 };
99
100 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
101 END_EVENT_TABLE()
102
103 // ID for the menu commands
104 enum
105 {
106 SPLIT_QUIT,
107 SPLIT_HORIZONTAL,
108 SPLIT_VERTICAL,
109 SPLIT_UNSPLIT,
110 SPLIT_SETMINSIZE
111 };
112
113 // Window ids
114 #define SPLITTER_WINDOW 100
115 #define SPLITTER_FRAME 101
116 #define CANVAS1 102
117 #define CANVAS2 103
118
119 IMPLEMENT_APP(MyApp)
120
121 bool MyApp::OnInit(void)
122 {
123 MyFrame* frame = new MyFrame((wxFrame *) NULL, "wxSplitterWindow Example",
124 wxPoint(50, 50), wxSize(420, 300));
125
126 // Show the frame
127 frame->Show(TRUE);
128
129 SetTopWindow(frame);
130
131 return TRUE;
132 }
133
134 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
135 EVT_MENU(SPLIT_VERTICAL, MyFrame::SplitVertical)
136 EVT_MENU(SPLIT_HORIZONTAL, MyFrame::SplitHorizontal)
137 EVT_MENU(SPLIT_UNSPLIT, MyFrame::Unsplit)
138 EVT_MENU(SPLIT_QUIT, MyFrame::Quit)
139 EVT_MENU(SPLIT_SETMINSIZE, MyFrame::SetMinSize)
140
141 EVT_UPDATE_UI(SPLIT_VERTICAL, MyFrame::UpdateUIVertical)
142 EVT_UPDATE_UI(SPLIT_HORIZONTAL, MyFrame::UpdateUIHorizontal)
143 EVT_UPDATE_UI(SPLIT_UNSPLIT, MyFrame::UpdateUIUnsplit)
144 END_EVENT_TABLE()
145
146 // My frame constructor
147 MyFrame::MyFrame(wxFrame* frame, const wxString& title,
148 const wxPoint& pos, const wxSize& size)
149 : wxFrame(frame, SPLITTER_FRAME, title, pos, size,
150 wxDEFAULT_FRAME_STYLE | wxNO_FULL_REPAINT_ON_RESIZE)
151 {
152 CreateStatusBar(2);
153
154 // Make a menubar
155 wxMenu *fileMenu = new wxMenu;
156 fileMenu->Append(SPLIT_VERTICAL, "Split &Vertically\tCtrl-V", "Split vertically");
157 fileMenu->Append(SPLIT_HORIZONTAL, "Split &Horizontally\tCtrl-H", "Split horizontally");
158 fileMenu->Append(SPLIT_UNSPLIT, "&Unsplit\tCtrl-U", "Unsplit");
159 fileMenu->AppendSeparator();
160 fileMenu->Append(SPLIT_SETMINSIZE, "Set &min size", "Set minimum pane size");
161 fileMenu->AppendSeparator();
162 fileMenu->Append(SPLIT_QUIT, "E&xit\tAlt-X", "Exit");
163
164 wxMenuBar *menuBar = new wxMenuBar;
165 menuBar->Append(fileMenu, "&File");
166
167 SetMenuBar(menuBar);
168
169 m_splitter = new MySplitterWindow(this, SPLITTER_WINDOW);
170
171 #if 1
172 m_left = new MyCanvas(m_splitter, CANVAS1, wxPoint(0, 0), wxSize(400, 400), "Test1" );
173 m_left->SetBackgroundColour(*wxRED);
174 m_left->SetScrollbars(20, 20, 50, 50);
175 m_left->SetCursor(wxCursor(wxCURSOR_MAGNIFIER));
176
177 m_right = new MyCanvas(m_splitter, CANVAS2, wxPoint(0, 0), wxSize(400, 400), "Test2" );
178 m_right->SetBackgroundColour(*wxCYAN);
179 m_right->SetScrollbars(20, 20, 50, 50);
180 #else // for testing kbd navigation inside the splitter
181 m_left = new wxTextCtrl(m_splitter, -1, "first text");
182 m_right = new wxTextCtrl(m_splitter, -1, "second text");
183 #endif
184
185 // you can also do this to start with a single window
186 #if 0
187 m_right->Show(FALSE);
188 m_splitter->Initialize(m_left);
189 #else
190 m_splitter->SplitVertically(m_left, m_right, 100);
191 #endif
192
193 SetStatusText("Min pane size = 0", 1);
194 }
195
196 MyFrame::~MyFrame()
197 {
198 }
199
200 void MyFrame::Quit(wxCommandEvent& WXUNUSED(event) )
201 {
202 Close(TRUE);
203 }
204
205 void MyFrame::SplitHorizontal(wxCommandEvent& WXUNUSED(event) )
206 {
207 if ( m_splitter->IsSplit() )
208 m_splitter->Unsplit();
209 m_left->Show(TRUE);
210 m_right->Show(TRUE);
211 m_splitter->SplitHorizontally( m_left, m_right );
212 UpdatePosition();
213 }
214
215 void MyFrame::SplitVertical(wxCommandEvent& WXUNUSED(event) )
216 {
217 if ( m_splitter->IsSplit() )
218 m_splitter->Unsplit();
219 m_left->Show(TRUE);
220 m_right->Show(TRUE);
221 m_splitter->SplitVertically( m_left, m_right );
222 UpdatePosition();
223 }
224
225 void MyFrame::Unsplit(wxCommandEvent& WXUNUSED(event) )
226 {
227 if ( m_splitter->IsSplit() )
228 m_splitter->Unsplit();
229 SetStatusText("No splitter");
230 }
231
232 void MyFrame::SetMinSize(wxCommandEvent& WXUNUSED(event) )
233 {
234 wxString str;
235 str.Printf( _T("%d"), m_splitter->GetMinimumPaneSize());
236 str = wxGetTextFromUser("Enter minimal size for panes:", "", str, this);
237 if ( str.IsEmpty() )
238 return;
239
240 int minsize = wxStrtol( str, (wxChar**)NULL, 10 );
241 m_splitter->SetMinimumPaneSize(minsize);
242 str.Printf( _T("Min pane size = %d"), minsize);
243 SetStatusText(str, 1);
244 }
245
246 void MyFrame::UpdateUIHorizontal(wxUpdateUIEvent& event)
247 {
248 bool foo = ( (!m_splitter->IsSplit()) || (m_splitter->GetSplitMode() != wxSPLIT_HORIZONTAL) );
249 if( !foo )
250 event.Enable( foo );
251 }
252
253 void MyFrame::UpdateUIVertical(wxUpdateUIEvent& event)
254 {
255 event.Enable( ( (!m_splitter->IsSplit()) || (m_splitter->GetSplitMode() != wxSPLIT_VERTICAL) ) );
256 }
257
258 void MyFrame::UpdateUIUnsplit(wxUpdateUIEvent& event)
259 {
260 event.Enable( m_splitter->IsSplit() );
261 }
262
263 void MyFrame::UpdatePosition()
264 {
265 wxString str;
266 str.Printf( _("Sash position = %d"), m_splitter->GetSashPosition());
267 SetStatusText(str);
268 }
269
270 MyCanvas::MyCanvas(wxWindow* parent, wxWindowID id, const wxPoint& point, const wxSize& size, const wxString &name ) :
271 wxScrolledWindow(parent, id, point, size, 0, name )
272 {
273 }
274
275 MyCanvas::~MyCanvas()
276 {
277 }
278
279 void MyCanvas::OnDraw(wxDC& dc)
280 {
281 dc.SetPen(*wxBLACK_PEN);
282 dc.DrawLine(0, 0, 100, 100);
283
284 dc.SetBackgroundMode(wxTRANSPARENT);
285 dc.DrawText("Testing", 50, 50);
286
287 dc.SetPen(*wxRED_PEN);
288 dc.SetBrush(*wxGREEN_BRUSH);
289 dc.DrawRectangle(120, 120, 100, 80);
290 }