WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター
GUIKit の例題：RealTimeAlgebra

GUIKit の例題：RealTimeAlgebra

GUIKitで提供されていた機能は，組込みのWolfram言語にネイティブのインターフェース構造およびコントロール関数で利用できるようになった．

コード
Wolfram Language code: Needs["GUIKit`"]
Wolfram Language code: expr = Widget["Panel", { Widget["ScrollPane", { "viewportView" -> Widget["TextArea", { "text" -> "", "rows" -> 10, "columns" -> 40, "editable" -> False}, Name -> "textArea"]}], Widget["Slider", {"value" -> 5, BindEvent["change", Script[sliderChanged[]]] }, Name -> "slider"], Script[ sliderChanged[] := Block[{val, x, y}, val = ToExpression[PropertyValue[{"slider", "value"}]];SetPropertyValue[{"textArea", "text"}, ToString[Expand[(x + y)^val], InputForm, PageWidth -> ToExpression[PropertyValue[{"textArea", "columns"}]] ]] ]; sliderChanged[]] }];
Wolfram Language code: RealTimeAlgebraModal[] := GUIRunModal[expr];
Wolfram Language code: RealTimeAlgebraModeless[] := GUIRun[expr];

例題

次は J/Link の例題であるRealTimeAlgebraを実装する．

Wolfram Language code: RealTimeAlgebraModal[]

モードレスセッションでダイアログとインタラクトすることも可能である．

Wolfram Language code: RealTimeAlgebraModeless[];