]> git.saurik.com Git - wxWidgets.git/blame - src/gtk/scrolwin.cpp
Applied patch [ 810585 ] wxTextCtrl::GetTextLine returns empty String
[wxWidgets.git] / src / gtk / scrolwin.cpp
CommitLineData
30954328 1/////////////////////////////////////////////////////////////////////////////
e1437456 2// Name: gtk/scrolwin.cpp
30954328
RR
3// Purpose: wxScrolledWindow implementation
4// Author: Julian Smart
566d84a7 5// Modified by: Ron Lee
30954328
RR
6// Created: 01/02/97
7// RCS-ID: $Id$
6c9a19aa
JS
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
30954328
RR
10/////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
14f355c2 20#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
30954328
RR
21 #pragma implementation "scrolwin.h"
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
28 #pragma hdrstop
29#endif
30
31#include "wx/utils.h"
32#include "wx/dcclient.h"
33
9e691f46 34#include "wx/scrolwin.h"
30954328 35#include "wx/panel.h"
30486297 36#include "wx/sizer.h"
30954328 37
9e691f46 38#include "wx/gtk/private.h"
30954328
RR
39#include "wx/gtk/win_gtk.h"
40
41// ----------------------------------------------------------------------------
42// event tables
43// ----------------------------------------------------------------------------
44
45BEGIN_EVENT_TABLE(wxScrolledWindow, wxPanel)
d9a4f620 46 EVT_SCROLLWIN(wxScrolledWindow::OnScroll)
30954328
RR
47 EVT_SIZE(wxScrolledWindow::OnSize)
48 EVT_PAINT(wxScrolledWindow::OnPaint)
49 EVT_CHAR(wxScrolledWindow::OnChar)
50END_EVENT_TABLE()
51
52IMPLEMENT_DYNAMIC_CLASS(wxScrolledWindow, wxPanel)
53
54// ============================================================================
55// implementation
56// ============================================================================
57
58//-----------------------------------------------------------------------------
59// data
60//-----------------------------------------------------------------------------
61
62extern bool g_blockEventsOnDrag;
cf19b0bd 63extern bool g_blockEventsOnScroll;
30954328
RR
64
65//-----------------------------------------------------------------------------
66// idle system
67//-----------------------------------------------------------------------------
68
69extern void wxapp_install_idle_handler();
70extern bool g_isIdle;
71
72//-----------------------------------------------------------------------------
73// "value_changed" from m_vAdjust
74//-----------------------------------------------------------------------------
75
9e691f46
VZ
76static void gtk_scrolled_window_vscroll_callback( GtkAdjustment *adjust,
77 SCROLLBAR_CBACK_ARG
78 wxScrolledWindow *win )
30954328
RR
79{
80 if (g_isIdle)
81 wxapp_install_idle_handler();
82
83 if (g_blockEventsOnDrag) return;
84
85 if (!win->m_hasVMT) return;
86
9e691f46
VZ
87 win->GtkVScroll( adjust->value,
88 GET_SCROLL_TYPE(GTK_SCROLLED_WINDOW(win->m_widget)->vscrollbar) );
30954328
RR
89}
90
91//-----------------------------------------------------------------------------
92// "value_changed" from m_hAdjust
93//-----------------------------------------------------------------------------
94
9e691f46
VZ
95static void gtk_scrolled_window_hscroll_callback( GtkAdjustment *adjust,
96 SCROLLBAR_CBACK_ARG
97 wxScrolledWindow *win )
30954328
RR
98{
99 if (g_isIdle)
100 wxapp_install_idle_handler();
101
102 if (g_blockEventsOnDrag) return;
103 if (!win->m_hasVMT) return;
104
9e691f46
VZ
105 win->GtkHScroll( adjust->value,
106 GET_SCROLL_TYPE(GTK_SCROLLED_WINDOW(win->m_widget)->hscrollbar) );
30954328
RR
107}
108
cf19b0bd
RR
109//-----------------------------------------------------------------------------
110// "button_press_event" from scrollbar
111//-----------------------------------------------------------------------------
112
113static gint gtk_scrollbar_button_press_callback( GtkRange *widget,
114 GdkEventButton *gdk_event,
115 wxWindowGTK *win)
116{
117 if (g_isIdle)
118 wxapp_install_idle_handler();
119
120 g_blockEventsOnScroll = TRUE;
9e691f46
VZ
121
122 // FIXME: there is no slider field any more, what was meant here?
123#ifndef __WXGTK20__
cf19b0bd 124 win->m_isScrolling = (gdk_event->window == widget->slider);
9e691f46 125#endif
cf19b0bd
RR
126
127 return FALSE;
128}
129
130//-----------------------------------------------------------------------------
131// "button_release_event" from scrollbar
132//-----------------------------------------------------------------------------
133
134static gint gtk_scrollbar_button_release_callback( GtkRange *widget,
135 GdkEventButton *WXUNUSED(gdk_event),
136 wxWindowGTK *win)
137{
138// don't test here as we can release the mouse while being over
139// a different window than the slider
140//
141// if (gdk_event->window != widget->slider) return FALSE;
142
143 g_blockEventsOnScroll = FALSE;
144
145 if (win->m_isScrolling)
146 {
147 wxEventType command = wxEVT_SCROLLWIN_THUMBRELEASE;
148 int value = -1;
149 int dir = -1;
150
151 GtkScrolledWindow *scrolledWindow = GTK_SCROLLED_WINDOW(win->m_widget);
152 if (widget == GTK_RANGE(scrolledWindow->hscrollbar))
153 {
154 value = (int)(win->m_hAdjust->value+0.5);
155 dir = wxHORIZONTAL;
156 }
157 if (widget == GTK_RANGE(scrolledWindow->vscrollbar))
158 {
159 value = (int)(win->m_vAdjust->value+0.5);
160 dir = wxVERTICAL;
161 }
162
163 wxScrollWinEvent event( command, value, dir );
164 event.SetEventObject( win );
165 win->GetEventHandler()->ProcessEvent( event );
166 }
167
168 win->m_isScrolling = FALSE;
169
170 return FALSE;
171}
172
30954328
RR
173//-----------------------------------------------------------------------------
174// InsertChild for wxScrolledWindow
175//-----------------------------------------------------------------------------
176
177static void wxInsertChildInScrolledWindow( wxWindow* parent, wxWindow* child )
178{
830ed6d9
RR
179 // The window might have been scrolled already, do we
180 // have to adapt the position.
30954328
RR
181 GtkPizza *pizza = GTK_PIZZA(parent->m_wxwindow);
182 child->m_x += pizza->xoffset;
183 child->m_y += pizza->yoffset;
184
185 gtk_pizza_put( GTK_PIZZA(parent->m_wxwindow),
186 GTK_WIDGET(child->m_widget),
187 child->m_x,
188 child->m_y,
189 child->m_width,
190 child->m_height );
191}
192
193// ----------------------------------------------------------------------------
194// wxScrolledWindow creation
195// ----------------------------------------------------------------------------
196
830ed6d9 197void wxScrolledWindow::Init()
30954328
RR
198{
199 m_xScrollPixelsPerLine = 0;
200 m_yScrollPixelsPerLine = 0;
201 m_xScrollingEnabled = TRUE;
202 m_yScrollingEnabled = TRUE;
203 m_xScrollPosition = 0;
204 m_yScrollPosition = 0;
30954328
RR
205 m_xScrollLinesPerPage = 0;
206 m_yScrollLinesPerPage = 0;
207 m_targetWindow = (wxWindow*) NULL;
d9a4f620
RR
208 m_scaleX = 1.0;
209 m_scaleY = 1.0;
e1437456 210 m_hasScrolling = TRUE;
30954328
RR
211}
212
213bool wxScrolledWindow::Create(wxWindow *parent,
214 wxWindowID id,
215 const wxPoint& pos,
216 const wxSize& size,
217 long style,
218 const wxString& name)
219{
830ed6d9
RR
220 Init();
221
30954328
RR
222 if (!PreCreation( parent, pos, size ) ||
223 !CreateBase( parent, id, pos, size, style, wxDefaultValidator, name ))
224 {
225 wxFAIL_MSG( wxT("wxWindow creation failed") );
226 return FALSE;
227 }
228
229 m_insertCallback = wxInsertChildInScrolledWindow;
39c869a6 230
30954328
RR
231 m_targetWindow = this;
232
233 m_widget = gtk_scrolled_window_new( (GtkAdjustment *) NULL, (GtkAdjustment *) NULL );
234 GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
235
236 GtkScrolledWindow *scrolledWindow = GTK_SCROLLED_WINDOW(m_widget);
237
238 GtkScrolledWindowClass *scroll_class = GTK_SCROLLED_WINDOW_CLASS( GTK_OBJECT_GET_CLASS(m_widget) );
239 scroll_class->scrollbar_spacing = 0;
240
241 gtk_scrolled_window_set_policy( scrolledWindow, GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC );
242
243 m_hAdjust = gtk_range_get_adjustment( GTK_RANGE(scrolledWindow->hscrollbar) );
244 m_vAdjust = gtk_range_get_adjustment( GTK_RANGE(scrolledWindow->vscrollbar) );
245
246 m_wxwindow = gtk_pizza_new();
247
248 gtk_container_add( GTK_CONTAINER(m_widget), m_wxwindow );
249
250 GtkPizza *pizza = GTK_PIZZA(m_wxwindow);
251
252 if (HasFlag(wxRAISED_BORDER))
253 {
254 gtk_pizza_set_shadow_type( pizza, GTK_MYSHADOW_OUT );
255 }
256 else if (HasFlag(wxSUNKEN_BORDER))
257 {
258 gtk_pizza_set_shadow_type( pizza, GTK_MYSHADOW_IN );
259 }
260 else if (HasFlag(wxSIMPLE_BORDER))
261 {
262 gtk_pizza_set_shadow_type( pizza, GTK_MYSHADOW_THIN );
263 }
264 else
265 {
266 gtk_pizza_set_shadow_type( pizza, GTK_MYSHADOW_NONE );
267 }
268
269 GTK_WIDGET_SET_FLAGS( m_wxwindow, GTK_CAN_FOCUS );
270 m_acceptsFocus = TRUE;
271
272 // I _really_ don't want scrollbars in the beginning
273 m_vAdjust->lower = 0.0;
274 m_vAdjust->upper = 1.0;
275 m_vAdjust->value = 0.0;
276 m_vAdjust->step_increment = 1.0;
4ca24f18 277 m_vAdjust->page_increment = 2.0;
30954328
RR
278 gtk_signal_emit_by_name( GTK_OBJECT(m_vAdjust), "changed" );
279 m_hAdjust->lower = 0.0;
280 m_hAdjust->upper = 1.0;
281 m_hAdjust->value = 0.0;
282 m_hAdjust->step_increment = 1.0;
4ca24f18 283 m_hAdjust->page_increment = 2.0;
30954328
RR
284 gtk_signal_emit_by_name( GTK_OBJECT(m_hAdjust), "changed" );
285
830ed6d9
RR
286 // Handlers for new scrollbar values
287 GtkVConnectEvent();
288 GtkHConnectEvent();
30954328 289
cf19b0bd
RR
290 // these handlers block mouse events to any window during scrolling such as
291 // motion events and prevent GTK and wxWindows from fighting over where the
292 // slider should be
293
294 gtk_signal_connect( GTK_OBJECT(scrolledWindow->vscrollbar), "button_press_event",
295 (GtkSignalFunc)gtk_scrollbar_button_press_callback, (gpointer) this );
296
297 gtk_signal_connect( GTK_OBJECT(scrolledWindow->hscrollbar), "button_press_event",
298 (GtkSignalFunc)gtk_scrollbar_button_press_callback, (gpointer) this );
299
300 gtk_signal_connect( GTK_OBJECT(scrolledWindow->vscrollbar), "button_release_event",
301 (GtkSignalFunc)gtk_scrollbar_button_release_callback, (gpointer) this );
302
303 gtk_signal_connect( GTK_OBJECT(scrolledWindow->hscrollbar), "button_release_event",
304 (GtkSignalFunc)gtk_scrollbar_button_release_callback, (gpointer) this );
305
30954328
RR
306 gtk_widget_show( m_wxwindow );
307
308 if (m_parent)
309 m_parent->DoAddChild( this );
30486297 310
c9c4b3a0 311 m_focusWidget = m_wxwindow;
30954328
RR
312
313 PostCreation();
314
315 Show( TRUE );
2b5f62a0 316
30954328
RR
317 return TRUE;
318}
319
30954328
RR
320// ----------------------------------------------------------------------------
321// setting scrolling parameters
322// ----------------------------------------------------------------------------
323
566d84a7
RL
324void wxScrolledWindow::DoSetVirtualSize( int x, int y )
325{
326 wxPanel::DoSetVirtualSize( x, y );
327 AdjustScrollbars();
92aff599
RL
328
329#if wxUSE_CONSTRAINTS
330 if (GetAutoLayout())
331 Layout();
332#endif
566d84a7
RL
333}
334
30954328
RR
335/*
336 * pixelsPerUnitX/pixelsPerUnitY: number of pixels per unit (e.g. pixels per text line)
337 * noUnitsX/noUnitsY: : no. units per scrollbar
338 */
566d84a7
RL
339void wxScrolledWindow::SetScrollbars( int pixelsPerUnitX, int pixelsPerUnitY,
340 int noUnitsX, int noUnitsY,
341 int xPos, int yPos, bool noRefresh )
30954328 342{
1adff2f5
JS
343 int xs, ys;
344 GetViewStart (& xs, & ys);
345
346 int old_x = m_xScrollPixelsPerLine * xs;
347 int old_y = m_yScrollPixelsPerLine * ys;
30486297 348
30954328
RR
349 m_xScrollPixelsPerLine = pixelsPerUnitX;
350 m_yScrollPixelsPerLine = pixelsPerUnitY;
39c869a6 351
566d84a7
RL
352 m_hAdjust->value = m_xScrollPosition = xPos;
353 m_vAdjust->value = m_yScrollPosition = yPos;
30954328 354
2b5f62a0
VZ
355 // Setting hints here should arguably be deprecated, but without it
356 // a sizer might override this manual scrollbar setting in old code.
566d84a7 357 m_targetWindow->SetVirtualSizeHints( noUnitsX * pixelsPerUnitX, noUnitsY * pixelsPerUnitY );
30486297 358
2b5f62a0
VZ
359 m_targetWindow->SetVirtualSize( noUnitsX * pixelsPerUnitX, noUnitsY * pixelsPerUnitY );
360
ec7482df
RR
361 if (!noRefresh)
362 {
363 int new_x = m_xScrollPixelsPerLine * m_xScrollPosition;
364 int new_y = m_yScrollPixelsPerLine * m_yScrollPosition;
30486297 365
566d84a7 366 m_targetWindow->ScrollWindow( old_x - new_x, old_y - new_y );
ec7482df 367 }
30954328
RR
368}
369
370void wxScrolledWindow::AdjustScrollbars()
371{
372 int w, h;
566d84a7
RL
373 int vw, vh;
374
30954328 375 m_targetWindow->GetClientSize( &w, &h );
566d84a7 376 m_targetWindow->GetVirtualSize( &vw, &vh );
39c869a6 377
30954328 378 if (m_xScrollPixelsPerLine == 0)
4ca24f18
RR
379 {
380 m_hAdjust->upper = 1.0;
30954328 381 m_hAdjust->page_size = 1.0;
4ca24f18 382 }
30954328 383 else
4ca24f18 384 {
566d84a7 385 m_hAdjust->upper = vw / m_xScrollPixelsPerLine;
30954328 386 m_hAdjust->page_size = (w / m_xScrollPixelsPerLine);
39c869a6 387
566d84a7
RL
388 // If the scrollbar hits the right side, move the window
389 // right to keep it from over extending.
4ca24f18 390
2b5f62a0 391 if ((m_hAdjust->value != 0.0) && (m_hAdjust->value + m_hAdjust->page_size > m_hAdjust->upper))
566d84a7 392 {
2b5f62a0
VZ
393 m_hAdjust->value = m_hAdjust->upper - m_hAdjust->page_size;
394 if (m_hAdjust->value < 0.0)
395 m_hAdjust->value = 0.0;
396
b03f81b7 397 if (GetChildren().GetCount() == 0)
2b5f62a0
VZ
398 m_xScrollPosition = (int)m_hAdjust->value; // This is enough without child windows
399 else
400 gtk_signal_emit_by_name( GTK_OBJECT(m_hAdjust), "value_changed" ); // Actually scroll window
566d84a7 401 }
4ca24f18
RR
402 }
403
30954328 404 if (m_yScrollPixelsPerLine == 0)
4ca24f18
RR
405 {
406 m_vAdjust->upper = 1.0;
30954328 407 m_vAdjust->page_size = 1.0;
4ca24f18 408 }
30954328 409 else
4ca24f18 410 {
566d84a7 411 m_vAdjust->upper = vh / m_yScrollPixelsPerLine;
30954328 412 m_vAdjust->page_size = (h / m_yScrollPixelsPerLine);
39c869a6 413
2b5f62a0 414 if ((m_vAdjust->value != 0.0) && (m_vAdjust->value + m_vAdjust->page_size > m_vAdjust->upper))
566d84a7 415 {
2b5f62a0
VZ
416 m_vAdjust->value = m_vAdjust->upper - m_vAdjust->page_size;
417 if (m_vAdjust->value < 0.0)
418 m_vAdjust->value = 0.0;
419
b03f81b7 420 if (GetChildren().GetCount() == 0)
2b5f62a0
VZ
421 m_yScrollPosition = (int)m_vAdjust->value;
422 else
423 gtk_signal_emit_by_name( GTK_OBJECT(m_vAdjust), "value_changed" );
566d84a7 424 }
4ca24f18
RR
425 }
426
0bc0cd5d
RR
427 m_xScrollLinesPerPage = (int)(m_hAdjust->page_size + 0.5);
428 m_yScrollLinesPerPage = (int)(m_vAdjust->page_size + 0.5);
39c869a6 429
30954328
RR
430 gtk_signal_emit_by_name( GTK_OBJECT(m_vAdjust), "changed" );
431 gtk_signal_emit_by_name( GTK_OBJECT(m_hAdjust), "changed" );
432}
433
566d84a7 434
30954328
RR
435// ----------------------------------------------------------------------------
436// target window handling
437// ----------------------------------------------------------------------------
438
13ff9344 439void wxScrolledWindow::SetTargetWindow( wxWindow *target, bool WXUNUSED(pushEventHandler) )
30954328
RR
440{
441 wxASSERT_MSG( target, wxT("target window must not be NULL") );
442 m_targetWindow = target;
443}
444
bfe35776 445wxWindow *wxScrolledWindow::GetTargetWindow() const
30954328
RR
446{
447 return m_targetWindow;
448}
449
450// Override this function if you don't want to have wxScrolledWindow
451// automatically change the origin according to the scroll position.
452void wxScrolledWindow::PrepareDC(wxDC& dc)
453{
454 dc.SetDeviceOrigin( -m_xScrollPosition * m_xScrollPixelsPerLine,
455 -m_yScrollPosition * m_yScrollPixelsPerLine );
456}
457
566d84a7
RL
458void wxScrolledWindow::SetScrollRate( int xstep, int ystep )
459{
460 int old_x = m_xScrollPixelsPerLine * m_xScrollPosition;
461 int old_y = m_yScrollPixelsPerLine * m_yScrollPosition;
462
463 m_xScrollPixelsPerLine = xstep;
464 m_yScrollPixelsPerLine = ystep;
465
466 int new_x = m_xScrollPixelsPerLine * m_xScrollPosition;
467 int new_y = m_yScrollPixelsPerLine * m_yScrollPosition;
468
469 m_targetWindow->ScrollWindow( old_x - new_x, old_y - new_y );
470
471 AdjustScrollbars();
472}
473
30954328
RR
474void wxScrolledWindow::GetScrollPixelsPerUnit (int *x_unit, int *y_unit) const
475{
476 if ( x_unit )
477 *x_unit = m_xScrollPixelsPerLine;
478 if ( y_unit )
479 *y_unit = m_yScrollPixelsPerLine;
480}
481
482int wxScrolledWindow::GetScrollPageSize(int orient) const
483{
484 if ( orient == wxHORIZONTAL )
485 return m_xScrollLinesPerPage;
486 else
487 return m_yScrollLinesPerPage;
488}
489
490void wxScrolledWindow::SetScrollPageSize(int orient, int pageSize)
491{
492 if ( orient == wxHORIZONTAL )
493 m_xScrollLinesPerPage = pageSize;
494 else
495 m_yScrollLinesPerPage = pageSize;
496}
497
d9a4f620
RR
498void wxScrolledWindow::OnScroll(wxScrollWinEvent& event)
499{
500 int orient = event.GetOrientation();
0bc0cd5d 501
d9a4f620
RR
502 int nScrollInc = CalcScrollInc(event);
503 if (nScrollInc == 0) return;
504
505 if (orient == wxHORIZONTAL)
506 {
507 int newPos = m_xScrollPosition + nScrollInc;
508 SetScrollPos(wxHORIZONTAL, newPos, TRUE );
509 }
510 else
511 {
512 int newPos = m_yScrollPosition + nScrollInc;
513 SetScrollPos(wxVERTICAL, newPos, TRUE );
514 }
515
516 if (orient == wxHORIZONTAL)
517 {
518 m_xScrollPosition += nScrollInc;
519 }
520 else
521 {
522 m_yScrollPosition += nScrollInc;
523 }
524
525 if (orient == wxHORIZONTAL)
526 {
527 if (m_xScrollingEnabled)
528 m_targetWindow->ScrollWindow(-m_xScrollPixelsPerLine * nScrollInc, 0, (const wxRect *) NULL);
529 else
530 m_targetWindow->Refresh();
531 }
532 else
533 {
534 if (m_yScrollingEnabled)
535 m_targetWindow->ScrollWindow(0, -m_yScrollPixelsPerLine * nScrollInc, (const wxRect *) NULL);
536 else
537 m_targetWindow->Refresh();
538 }
539}
540
30954328
RR
541void wxScrolledWindow::Scroll( int x_pos, int y_pos )
542{
566d84a7 543 wxASSERT_MSG( m_targetWindow != 0, _T("No target window") );
30954328
RR
544
545 if (((x_pos == -1) || (x_pos == m_xScrollPosition)) &&
546 ((y_pos == -1) || (y_pos == m_yScrollPosition))) return;
547
30954328
RR
548 if ((x_pos != -1) && (m_xScrollPixelsPerLine))
549 {
830ed6d9
RR
550 int max = (int)(m_hAdjust->upper - m_hAdjust->page_size + 0.5);
551 if (max < 0) max = 0;
552 if (x_pos > max) x_pos = max;
553 if (x_pos < 0) x_pos = 0;
39c869a6 554
30954328
RR
555 int old_x = m_xScrollPosition;
556 m_xScrollPosition = x_pos;
aafe4488 557 m_hAdjust->value = x_pos;
39c869a6 558
aafe4488 559 m_targetWindow->ScrollWindow( (old_x-m_xScrollPosition)*m_xScrollPixelsPerLine, 0 );
39c869a6 560
830ed6d9
RR
561 // Just update the scrollbar, don't send any wxWindows event
562 GtkHDisconnectEvent();
aafe4488 563 gtk_signal_emit_by_name( GTK_OBJECT(m_hAdjust), "value_changed" );
830ed6d9 564 GtkHConnectEvent();
30954328 565 }
39c869a6 566
30954328
RR
567 if ((y_pos != -1) && (m_yScrollPixelsPerLine))
568 {
830ed6d9
RR
569 int max = (int)(m_vAdjust->upper - m_vAdjust->page_size + 0.5);
570 if (max < 0) max = 0;
571 if (y_pos > max) y_pos = max;
572 if (y_pos < 0) y_pos = 0;
39c869a6 573
30954328
RR
574 int old_y = m_yScrollPosition;
575 m_yScrollPosition = y_pos;
aafe4488 576 m_vAdjust->value = y_pos;
39c869a6 577
aafe4488 578 m_targetWindow->ScrollWindow( 0, (old_y-m_yScrollPosition)*m_yScrollPixelsPerLine );
39c869a6 579
830ed6d9
RR
580 // Just update the scrollbar, don't send any wxWindows event
581 GtkVDisconnectEvent();
aafe4488 582 gtk_signal_emit_by_name( GTK_OBJECT(m_vAdjust), "value_changed" );
830ed6d9 583 GtkVConnectEvent();
30954328
RR
584 }
585}
586
9e691f46
VZ
587// TODO: [VH]Scroll functions should be combined
588
589void wxScrolledWindow::GtkVScroll( float value, unsigned int scroll_type )
30954328 590{
566d84a7 591 wxASSERT_MSG( m_targetWindow != 0, _T("No target window") );
aafe4488
RR
592
593 if (m_yScrollPixelsPerLine == 0)
594 return;
39c869a6 595
aafe4488 596 int y_pos = (int)(value+0.5);
39c869a6 597
aafe4488
RR
598 if (y_pos == m_yScrollPosition)
599 return;
39c869a6 600
9e691f46 601 wxEventType command = GtkScrollWinTypeToWx(scroll_type);
d9a4f620 602
0bc0cd5d 603 wxScrollWinEvent event( command, y_pos, wxVERTICAL );
d9a4f620
RR
604 event.SetEventObject( this );
605 GetEventHandler()->ProcessEvent( event );
30954328
RR
606}
607
9e691f46 608void wxScrolledWindow::GtkHScroll( float value, unsigned int scroll_type )
30954328 609{
566d84a7 610 wxASSERT_MSG( m_targetWindow != 0, _T("No target window") );
39c869a6 611
aafe4488
RR
612 if (m_xScrollPixelsPerLine == 0)
613 return;
39c869a6 614
aafe4488 615 int x_pos = (int)(value+0.5);
0bc0cd5d 616
aafe4488
RR
617 if (x_pos == m_xScrollPosition)
618 return;
aafe4488 619
9e691f46 620 wxEventType command = GtkScrollWinTypeToWx(scroll_type);
d9a4f620 621
0bc0cd5d 622 wxScrollWinEvent event( command, x_pos, wxHORIZONTAL );
d9a4f620
RR
623 event.SetEventObject( this );
624 GetEventHandler()->ProcessEvent( event );
30954328
RR
625}
626
627void wxScrolledWindow::EnableScrolling (bool x_scroll, bool y_scroll)
628{
629 m_xScrollingEnabled = x_scroll;
630 m_yScrollingEnabled = y_scroll;
631}
632
30954328
RR
633// Where the current view starts from
634void wxScrolledWindow::GetViewStart (int *x, int *y) const
635{
636 if ( x )
637 *x = m_xScrollPosition;
638 if ( y )
639 *y = m_yScrollPosition;
640}
641
8c2f3797 642void wxScrolledWindow::DoCalcScrolledPosition(int x, int y, int *xx, int *yy) const
30954328 643{
1adff2f5
JS
644 int xs, ys;
645 GetViewStart (& xs, & ys);
646
30954328 647 if ( xx )
1adff2f5 648 *xx = x - xs * m_xScrollPixelsPerLine;
30954328 649 if ( yy )
1adff2f5 650 *yy = y - ys * m_yScrollPixelsPerLine;
30954328
RR
651}
652
8c2f3797 653void wxScrolledWindow::DoCalcUnscrolledPosition(int x, int y, int *xx, int *yy) const
30954328 654{
1adff2f5
JS
655 int xs, ys;
656 GetViewStart (& xs, & ys);
657
30954328 658 if ( xx )
1adff2f5 659 *xx = x + xs * m_xScrollPixelsPerLine;
30954328 660 if ( yy )
1adff2f5 661 *yy = y + ys * m_yScrollPixelsPerLine;
30954328
RR
662}
663
d9a4f620
RR
664int wxScrolledWindow::CalcScrollInc(wxScrollWinEvent& event)
665{
666 int pos = event.GetPosition();
667 int orient = event.GetOrientation();
668
669 int nScrollInc = 0;
670 if (event.GetEventType() == wxEVT_SCROLLWIN_TOP)
671 {
672 if (orient == wxHORIZONTAL)
673 nScrollInc = - m_xScrollPosition;
674 else
675 nScrollInc = - m_yScrollPosition;
676 } else
677 if (event.GetEventType() == wxEVT_SCROLLWIN_BOTTOM)
678 {
679 if (orient == wxHORIZONTAL)
566d84a7 680 nScrollInc = GetVirtualSize().GetWidth() / m_xScrollPixelsPerLine - m_xScrollPosition;
d9a4f620 681 else
566d84a7 682 nScrollInc = GetVirtualSize().GetHeight() / m_yScrollPixelsPerLine - m_yScrollPosition;
d9a4f620
RR
683 } else
684 if (event.GetEventType() == wxEVT_SCROLLWIN_LINEUP)
685 {
686 nScrollInc = -1;
687 } else
688 if (event.GetEventType() == wxEVT_SCROLLWIN_LINEDOWN)
689 {
690 nScrollInc = 1;
691 } else
692 if (event.GetEventType() == wxEVT_SCROLLWIN_PAGEUP)
693 {
694 if (orient == wxHORIZONTAL)
695 nScrollInc = -GetScrollPageSize(wxHORIZONTAL);
696 else
697 nScrollInc = -GetScrollPageSize(wxVERTICAL);
698 } else
699 if (event.GetEventType() == wxEVT_SCROLLWIN_PAGEDOWN)
700 {
701 if (orient == wxHORIZONTAL)
702 nScrollInc = GetScrollPageSize(wxHORIZONTAL);
703 else
704 nScrollInc = GetScrollPageSize(wxVERTICAL);
705 } else
706 if ((event.GetEventType() == wxEVT_SCROLLWIN_THUMBTRACK) ||
707 (event.GetEventType() == wxEVT_SCROLLWIN_THUMBRELEASE))
708 {
709 if (orient == wxHORIZONTAL)
710 nScrollInc = pos - m_xScrollPosition;
711 else
712 nScrollInc = pos - m_yScrollPosition;
713 }
714
715 if (orient == wxHORIZONTAL)
716 {
717 if (m_xScrollPixelsPerLine > 0)
718 {
830ed6d9
RR
719 int max = (int)(m_hAdjust->upper - m_hAdjust->page_size + 0.5);
720 if (max < 0) max = 0;
d9a4f620
RR
721
722 if ( (m_xScrollPosition + nScrollInc) < 0 )
723 nScrollInc = -m_xScrollPosition; // As -ve as we can go
830ed6d9
RR
724 else if ( (m_xScrollPosition + nScrollInc) > max )
725 nScrollInc = max - m_xScrollPosition; // As +ve as we can go
d9a4f620
RR
726 }
727 else
728 m_targetWindow->Refresh();
729 }
730 else
731 {
732 if (m_yScrollPixelsPerLine > 0)
733 {
830ed6d9
RR
734 int max = (int)(m_vAdjust->upper - m_vAdjust->page_size + 0.5);
735 if (max < 0) max = 0;
d9a4f620
RR
736
737 if ( (m_yScrollPosition + nScrollInc) < 0 )
738 nScrollInc = -m_yScrollPosition; // As -ve as we can go
830ed6d9
RR
739 else if ( (m_yScrollPosition + nScrollInc) > max )
740 nScrollInc = max - m_yScrollPosition; // As +ve as we can go
d9a4f620
RR
741 }
742 else
743 m_targetWindow->Refresh();
744 }
745
746 return nScrollInc;
747}
748
f47ae6e7 749void wxScrolledWindow::SetScrollPos( int orient, int pos, bool refresh )
0bc0cd5d
RR
750{
751 wxCHECK_RET( m_widget != NULL, wxT("invalid window") );
752
753 wxCHECK_RET( m_wxwindow != NULL, wxT("window needs client area for scrolling") );
754
755 if (orient == wxHORIZONTAL)
756 {
830ed6d9
RR
757 int max = (int)(m_hAdjust->upper - m_hAdjust->page_size + 0.5);
758 if (max < 0) max = 0;
39c869a6 759
830ed6d9
RR
760 if (pos > max) pos = 0;
761 if (pos < 0) pos = 0;
39c869a6 762
830ed6d9
RR
763 if (pos == (int)(m_hAdjust->value+0.5)) return;
764 m_hAdjust->value = pos;
0bc0cd5d
RR
765 }
766 else
767 {
830ed6d9
RR
768 int max = (int)(m_vAdjust->upper - m_vAdjust->page_size + 0.5);
769 if (max < 0) max = 0;
39c869a6 770
830ed6d9
RR
771 if (pos > max) pos = 0;
772 if (pos < 0) pos = 0;
39c869a6 773
830ed6d9
RR
774 if (pos == (int)(m_vAdjust->value+0.5)) return;
775 m_vAdjust->value = pos;
0bc0cd5d
RR
776 }
777
778 if (m_wxwindow->window)
779 {
780 if (orient == wxHORIZONTAL)
781 {
830ed6d9
RR
782 // Just update the scrollbar, don't send any wxWindows event
783 GtkHDisconnectEvent();
0bc0cd5d 784 gtk_signal_emit_by_name( GTK_OBJECT(m_hAdjust), "value_changed" );
830ed6d9 785 GtkHConnectEvent();
0bc0cd5d
RR
786 }
787 else
788 {
830ed6d9
RR
789 // Just update the scrollbar, don't send any wxWindows event
790 GtkVDisconnectEvent();
0bc0cd5d 791 gtk_signal_emit_by_name( GTK_OBJECT(m_vAdjust), "value_changed" );
830ed6d9 792 GtkVConnectEvent();
0bc0cd5d
RR
793 }
794 }
795}
796
830ed6d9
RR
797void wxScrolledWindow::GtkVConnectEvent()
798{
799 gtk_signal_connect( GTK_OBJECT(m_vAdjust), "value_changed",
800 (GtkSignalFunc) gtk_scrolled_window_vscroll_callback, (gpointer) this );
801}
802
803void wxScrolledWindow::GtkHConnectEvent()
804{
805 gtk_signal_connect( GTK_OBJECT(m_hAdjust), "value_changed",
806 (GtkSignalFunc) gtk_scrolled_window_hscroll_callback, (gpointer) this );
807}
808
809void wxScrolledWindow::GtkHDisconnectEvent()
810{
811 gtk_signal_disconnect_by_func( GTK_OBJECT(m_hAdjust),
812 (GtkSignalFunc) gtk_scrolled_window_hscroll_callback, (gpointer) this );
813}
814
815void wxScrolledWindow::GtkVDisconnectEvent()
816{
817 gtk_signal_disconnect_by_func( GTK_OBJECT(m_vAdjust),
818 (GtkSignalFunc) gtk_scrolled_window_vscroll_callback, (gpointer) this );
819}
820
30486297
RD
821bool wxScrolledWindow::Layout()
822{
566d84a7 823 if (GetSizer() && m_targetWindow == this)
30486297 824 {
566d84a7
RL
825 // If we're the scroll target, take into account the
826 // virtual size and scrolled position of the window.
827
30486297
RD
828 int x, y, w, h;
829 CalcScrolledPosition(0,0, &x,&y);
830 GetVirtualSize(&w, &h);
831 GetSizer()->SetDimension(x, y, w, h);
832 return TRUE;
833 }
834 else
835 return wxPanel::Layout(); // fall back to default for LayoutConstraints
836}
837
30954328
RR
838// ----------------------------------------------------------------------------
839// event handlers
840// ----------------------------------------------------------------------------
841
842// Default OnSize resets scrollbars, if any
843void wxScrolledWindow::OnSize(wxSizeEvent& WXUNUSED(event))
844{
150c8d89 845 if( GetAutoLayout() || m_targetWindow->GetAutoLayout() )
2b5f62a0
VZ
846 {
847 if( m_targetWindow != this )
848 m_targetWindow->FitInside();
566d84a7 849
2b5f62a0 850 FitInside();
150c8d89
RL
851
852 // FIXME: Something is really weird here... This should be
853 // called by FitInside above (and apparently is), yet the
854 // scrollsub sample will get the scrollbar wrong if resized
855 // quickly. This masks the bug, but is surely not the right
856 // answer at all.
857 AdjustScrollbars();
2b5f62a0
VZ
858 }
859 else
860 {
861 AdjustScrollbars();
862 }
30954328
RR
863}
864
865// This calls OnDraw, having adjusted the origin according to the current
866// scroll position
867void wxScrolledWindow::OnPaint(wxPaintEvent& WXUNUSED(event))
868{
869 wxPaintDC dc(this);
870 PrepareDC(dc);
871
872 OnDraw(dc);
873}
874
875// kbd handling: notice that we use OnChar() and not OnKeyDown() for
876// compatibility here - if we used OnKeyDown(), the programs which process
877// arrows themselves in their OnChar() would never get the message and like
878// this they always have the priority
879void wxScrolledWindow::OnChar(wxKeyEvent& event)
880{
881 int stx, sty, // view origin
882 szx, szy, // view size (total)
883 clix, cliy; // view size (on screen)
884
2b5f62a0 885 GetViewStart(&stx, &sty);
30954328
RR
886 GetClientSize(&clix, &cliy);
887 GetVirtualSize(&szx, &szy);
888
889 if( m_xScrollPixelsPerLine )
890 {
891 clix /= m_xScrollPixelsPerLine;
892 szx /= m_xScrollPixelsPerLine;
893 }
894 else
895 {
896 clix = 0;
897 szx = -1;
898 }
899 if( m_yScrollPixelsPerLine )
900 {
901 cliy /= m_yScrollPixelsPerLine;
902 szy /= m_yScrollPixelsPerLine;
903 }
904 else
905 {
906 cliy = 0;
907 szy = -1;
908 }
909
39c869a6
VZ
910 int xScrollOld = GetScrollPos(wxHORIZONTAL),
911 yScrollOld = GetScrollPos(wxVERTICAL);
912
30954328 913 int dsty;
12a3f227 914 switch ( event.GetKeyCode() )
30954328
RR
915 {
916 case WXK_PAGEUP:
917 case WXK_PRIOR:
918 dsty = sty - (5 * cliy / 6);
919 Scroll(-1, (dsty == -1) ? 0 : dsty);
920 break;
921
922 case WXK_PAGEDOWN:
923 case WXK_NEXT:
924 Scroll(-1, sty + (5 * cliy / 6));
925 break;
926
927 case WXK_HOME:
928 Scroll(0, event.ControlDown() ? 0 : -1);
929 break;
930
931 case WXK_END:
932 Scroll(szx - clix, event.ControlDown() ? szy - cliy : -1);
933 break;
934
935 case WXK_UP:
936 Scroll(-1, sty - 1);
937 break;
938
939 case WXK_DOWN:
940 Scroll(-1, sty + 1);
941 break;
942
943 case WXK_LEFT:
944 Scroll(stx - 1, -1);
945 break;
946
947 case WXK_RIGHT:
948 Scroll(stx + 1, -1);
949 break;
950
951 default:
952 // not for us
953 event.Skip();
39c869a6
VZ
954 return;
955 }
956
957 int xScroll = GetScrollPos(wxHORIZONTAL);
958 if ( xScroll != xScrollOld )
959 {
960 wxScrollWinEvent event(wxEVT_SCROLLWIN_THUMBTRACK, xScroll,
961 wxHORIZONTAL);
962 event.SetEventObject(this);
963 GetEventHandler()->ProcessEvent(event);
964 }
965
966 int yScroll = GetScrollPos(wxVERTICAL);
967 if ( yScroll != yScrollOld )
968 {
969 wxScrollWinEvent event(wxEVT_SCROLLWIN_THUMBTRACK, yScroll,
970 wxVERTICAL);
971 event.SetEventObject(this);
972 GetEventHandler()->ProcessEvent(event);
30954328
RR
973 }
974}
3379ed37 975
566d84a7
RL
976
977// vi:sts=4:sw=4:et