问法罗:在游乐场里，我怎样才能改变每一个卷轴的线数？

EN

这只不过是一次黑客攻击，而不是正确的方法，但我发现：

vSetScrollDelta
  |pd|
  pd := self vPageDelta.
  self vScrollbar
    scrollDelta: pd / 50 "<- added / 50"
    pageDelta: pd;
    interval: self vScrollbarInterval;
    setValue: self vScrollbarValue

编辑

我一直在想，如果我告诉我如何找到上面的方法，这个答案会更有用。这真的很容易，花了我几分钟时间(尽管我不是法老的使用者)

1. 首先，我写下了scroll这个词。这是一个显而易见的选择，因为问题在于滚动，对吗？
2. 然后右击得到菜单：

​

​

1. selectors containing it命令把我带到了这个列表

​

​

1. 在这个列表中，类GeneralScrollPane出现了很多次，所以我浏览了它。在那里，我发现了一种看起来很有前途的方法vScrollbarInterval。右击再次得到它的发件人和vSetScrollDelta弹出，所以我试了一试。