let canvas_sb_h = (Scrollbar.create ~orient:`Horizontal canvasFrame : Widget.scrollbar Widget.widget)