mirrors
/
non
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Make zoom follow mouse.

This commit is contained in:
Jonathan Moore Liles 2008-05-02 21:17:34 -05:00
parent 6bb756d4dc
commit 4b51c8f82a
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
Timeline/Timeline.C
View File

@ -89,10 +89,15 @@ Timeline::cb_scroll ( Fl_Widget *w )
{ {
if ( hscroll->zoom_changed() ) if ( hscroll->zoom_changed() )
{ {
nframes_t under_mouse = x_to_offset( Fl::event_x() );
_fpp = hscroll->zoom(); _fpp = hscroll->zoom();
const int tw = tracks->w() - Track::width() - vscroll->w(); const int tw = tracks->w() - Track::width();
hscroll->value( ts_to_x( xoffset ), tw, 0, ts_to_x( _length ) ); // hscroll->value( ts_to_x( xoffset ), tw, 0, ts_to_x( _length ) );
hscroll->value( max( 0, ts_to_x( under_mouse ) - ( Fl::event_x() - tracks->x() - Track::width() ) ),
tw, 0, ts_to_x( _length ) );
redraw(); redraw();
} }