Hello Doru,<div><br></div><div>As Alex suggested, Pharo scrollbars can be added to Roassal visualizations (see the script at the end). Similarly, we can change GLMRoassalRender&gt;&gt;render: to add scrollbars to roassal visualizations in Glamour. </div>

<div>Here is a proposition:</div><div><div><br></div><div>render: aRoassalPresentation</div><div><span style="white-space:pre-wrap">	</span>| view scrollPane|</div><div><span style="white-space:pre-wrap">	</span>view := aRoassalPresentation view.</div>

<div><span style="white-space:pre-wrap">	</span>aRoassalPresentation renderOn: view.</div><div><span style="white-space:pre-wrap">	</span>aRoassalPresentation on: GLMPresentationUpdated send: #actOnPresentationUpdate: to: self.</div>

<div><span style="white-space:pre-wrap">	</span>myMorph := ROMorph on: view stack. </div><div><span style="white-space:pre-wrap">	</span>myMorph extent: (view raw encompassingRectangle extent + (40 @ 40)).</div>
<div><span style="white-space:pre-wrap">	</span>scrollPane := ScrollPane new. </div><div>      scrollPane scroller addMorph: (myMorph).</div><div><span style="white-space:pre-wrap">	</span>^ scrollPane </div>
<div><br></div>Indeed, that means that roassal visualizations are strongly-tied to Morphic. Do you want me to push my changes to Glamour so that we have morphic-based scrollbars unless there is a practical roassal-based solution? </div>
<div><br></div><div>regards,</div><div>Usman</div><div><br></div><div>Alex&#39;s script:<br><div class="gmail_quote">
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><br>
<br>
=-=-=-=-=-= =-=-=-=-=-= =-=-=-=-=-= =-=-=-=-=-= =-=-=-=-=-=<br>
| view roView roMorph  pane window stack rawView nodes |<br>
<div>        &quot;Preparing&quot;<br>
        window := StandardWindow labelled: &#39;windowLabel&#39;.<br>
        window model: self.<br>
        window extent: 340 @ 480.<br>
</div>        stack := ROViewStack new.<br>
        rawView := ROView new.<br>
        stack addView: rawView.<br>
<br>
        view := ROMondrianViewBuilder initializedView: rawView.<br>
        view stack: stack.<br>
        view shape rectangle width: [ :c | c numberOfVariables * 5 ]; height: #numberOfMethods.<br>
        nodes := view nodes: Collection withAllSubclasses.<br>
<div>        view edgesFrom:  #superclass.<br>
        view treeLayout.<br>
        view applyLayout.<br>
<br>
</div>        roMorph := ROMorph on: stack.<br>
        pane := ScrollPane new.<br>
        roMorph extent: ( view raw encompassingRectangle extent + (40 @ 40)) .<br>
        pane scroller addMorph: (roMorph).<br>
<div>        window<br>
                addMorph: pane<br>
                 frame: (0@0 corner: 1@1).<br>
        window openInWorld.<br>
</div>=-=-=-=-=-= =-=-=-=-=-= =-=-=-=-=-= =-=-=-=-=-= =-=-=-=-=-=<br><br></blockquote></div></div>