6
$\begingroup$

I use two finger movement on my trackpad for scrolling a notebook page up and down. Is it possible to make a docked cells that scrolls to the left and right using a two finger movement on the trackpad?

The reason I ask is because sometimes my notebook window is not full screen. My notebook needs to be in full screen mode to see the entire docked cell. I have lots of buttons that can't be seen if it is not. I don't want to make the buttons smaller than they already are.

It would be nice to have a way to scroll to the right and left to reach the buttons without resizing the notebook window. Is this possible?

Improve this question
$\endgroup$
6
  • 1
    $\begingroup$ You could wrap the content with Pane with Scrollbars and it seem it partially works, can't use the bar itself but arrows at its ends are. Maybe a grid of buttons is a solution, or do you insist on having one? $\endgroup$
    – Kuba
    Commented Nov 27, 2015 at 10:52
  • $\begingroup$ Thank you Kuba. I would like to be able to use two finger gesture instead of manually clicking the scrollbar. I would prefer if the scrollbar wasn't present at all. I could do as you suggested and create a grid instead of row, but was trying to avoid this as it would make my toolbar taller which cuts into my viewing area. $\endgroup$
    – B flat
    Commented Nov 27, 2015 at 10:58
  • 1
    $\begingroup$ Try GestureHandler with Alignment or a ScrollPosition, can't test now, no pad around ;) $\endgroup$
    – Kuba
    Commented Nov 27, 2015 at 11:02
  • $\begingroup$ I will! Thanks again Kuba. If this works, I'll post my solution. $\endgroup$
    – B flat
    Commented Nov 27, 2015 at 11:15
  • $\begingroup$ It looks like the gesture handler is for touch devices only. It doesn't recognize the gestures on the trackpad on my mac. $\endgroup$
    – B flat
    Commented Nov 27, 2015 at 13:41

1 Answer 1

Reset to default
5
$\begingroup$

Using MMA 11.0.0 the following works to create a scrollable docked cell:

setScrollingDockedCell[expr_] :=
  SetOptions[EvaluationNotebook[],
   DockedCells ->
    Cell[BoxData@ToBoxes@
       Pane[expr,
        ImageSize -> Scaled[1]
        ]
     ]
   ];

Note that the ImageSize -> Scaled[1] is crucial here. Without an explicit ImageSize no scrolling occurs. Scaled[1] sticks the expression on a single line. Something ludicrous like ImageSize -> 100000000 will also work.

This works with all of the expressions I've tried:

setScrollingDockedCell@
 Row@Table[
   With[{i = i},
    PasteButton[i]
    ],
   {i, Range[100]}
   ]

setScrollingDockedCell@
 Grid@Table[
   With[{i = i},
    PasteButton[Row@{i, j}, {i, j}]
    ],
   {i, Range[3]},
   {j, Range[100]}
   ]

setScrollingDockedCell@
 Pane[Graphics[{
    Disk[{0, 0}, 1000],
    {White, Disk[{0, 0}, {100, 900}]},
    {Green, Disk[{0, 0}, {75, 750}]},
    {Black, Disk[{0, 0}, {50, 500}]},
    Disk[{2000, 0}, 1000],
    {White, Disk[{2000, 0}, {100, 900}]},
    {Green, Disk[{2000, 0}, {75, 750}]},
    {Black, Disk[{2000, 0}, {50, 500}]}
    }, AspectRatio -> Full,
   ImageSize -> 1000],
  {Automatic, 25}]

All of those work

It seems to balk when there's a lot of blank space in the expression though:

setScrollingDockedCell@Range[1000]

That only starts scrolling when you have the cursor over one of the expression elements (a number/bracket/comma I mean)

Perhaps this is new as of 11 but I don't have a copy of 10 to test. It is very useful for things like tabbed windows though.

Improve this answer
$\endgroup$
1
  • $\begingroup$ Works in 10.3 as well. $\endgroup$
    – B flat
    Commented Nov 25, 2016 at 2:55

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.