VisualWorks Smalltalk - 在運行時設置滑塊值

Question

我有一個滑塊並希望在某些功能中更改其值。我嘗試過這樣的事情：

(builder componentAt: #SliderR) widget model setValue: 124. 

但它不起作用。 （值已更改，但標記保持在同一位置）。

Answer 1

嘗試值：不是的setValue：

的咒語訪問此而ValueHolder似乎相當長的和脆弱的。一定要在清晰的消息選擇器下包裝這些代碼。或者可能想到在應用程序的實例變量中共享此狀態...

Answer 2

通常，您會將滑塊添加到UIPainter中的畫布上，然後在GUI畫筆工具窗口中爲其輸入一個方面名稱。該窗口工具欄中的第二個按鈕稱爲「定義」。點擊那裏創建一個方法，返回一個ValueHolder與滑塊的值。然後，您可以使用#value：在運行時更改ValueHolder的值，並且會更新滑塊的值並重繪它。

對於某些背景：ValueHolders保存一個值，其他對象可以註冊爲依賴項，以便在值更改時通知它。 UI就是這樣做的，所以你可以更新ValueHolder，UI將自動更新。