user-interface - 在 Pane 对象中没有鼠标滚动？

Question

以下Pane使用鼠标滚轮时对象不滚动。有没有人遇到同样的行为？这是默认行为吗？知道为什么吗？它可能是特定于平台的吗？

CreateDialog[Pane[Column[Range[30]], {300, 200}, Scrollbars -> True]]

我的平台:Win7-64、Mathematica 8.0.1

Answer 1

另一种解决方案:

Needs["GUIKit`"]
ref = GUIRun[
   Widget["Panel", {
     Widget["ScrollPane", {
       "viewportView" -> Widget["List", {
          "visibleRowCount" -> 4,
          "items" -> Script[Range[30]]
          }] }] }]
   ];

Pane 的问题在于 MouseWheel事件不受约束，就像在 GUIKit 中一样。使用这种技术你也可以做 Bind["MouseWheel" ...]到任何其他 Action 。