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