ダイアログボックスのグラフを更新<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />「新しいウィンドウ」にラジオボックスとグラフを表示しています。ユーザーがラジオ ボックスで別のグラフを選択した場合、古いグラフを削除し、新しいグラフをすべて同じウィンドウに表示したいと考えています。これを正確に行う方法がわかりません。最初のグラフを表示する簡単な例を次に示します。
dt =開ける( 「$sample_data\Big Class.jmp」 ) ;
my_1_script =式(
my_gb =グラフビルダー(
コントロールパネルを表示( 0 ） 、
変数(バツ( :重さ) 、 Y ( :身長) ) 、
要素(ポイント(バツ、 Y 、伝説( 1 ） ） 、よりスムーズに(バツ、 Y 、伝説( 3 ） ） ）
) ;
) ;
my_2_script =式(
my_gb =グラフビルダー(
コントロールパネルを表示( 0 ) 、
変数(バツ( :セックス） 、 Y ( :年) ) 、
要素(ヒストグラム(バツ、 Y 、伝説( 5 ) ) ）
） ;
) ;
my_3_script =式(
my_gb =グラフビルダー(
コントロールパネルを表示( 0 ) 、
変数(バツ( :年） 、 Y ( :年) ） 、
要素(
パイ(バツ、 Y 、伝説( 2 ) 、パイスタイル( "パイ" ） 、
要約統計量( "平均" ） 、ラベル( 「ラベルなし」 ）
）
)
) ;
) ;
チャートリスト= { 「チャート1」 、 「チャート2」 、 「チャート3」 } ;
//------------------------------------------------ ------------------------------
私の勝利=新しい窓( 「チャート表示」 、
パネルボックス( 「グラフオプション」 、
リストボックス(
パネルボックス( 「チャートを選択」 、
チャート_rb =ラジオボックス(チャートリスト、
選択された_チャート=チャート_rb <<選ばれる;
もし(選択された_チャート== 「チャート1」 、
my_1_script 、
選択された_チャート== 「チャート2」 、
my_2_script 、
選択された_チャート== 「チャート3」 、
my_3_script
)
)
） 、
）
) 、
// デフォルトはチャート 1 です
my_1_script
) ;
Re: ダイアログボックスのグラフを更新する本当に素晴らしいMSです。比較的単純であることはわかっていましたが、構文を正しく理解することができませんでした。ありがとう！
Re: ダイアログボックスのグラフを更新するこれは、同じアプローチを使用したより単純なバージョンであり、一般化が容易になる可能性があります。
チャートリスト= { 「チャート1」 、 「チャート2」 、 「チャート3」 } ;
スクリプトリスト= { my_1_script 、 my_2_script 、 my_3_script } ;
私の勝利=新しい窓( 「チャート表示」 、
パネルボックス( 「グラフオプション」 、
H リストボックス(
パネルボックス( 「チャートを選択」 、
チャート_rb =ラジオボックス(
チャートリスト、
ギガバイト<<消去;
私の勝利<<追加する(ギガバイト=評価(スクリプトリスト[チャート_rb <<得る] ) ）
) 、
）
）
) 、
// デフォルトはチャート 1 です
ギガバイト=評価(スクリプトリスト[ 1 ])
） ;
Re: ダイアログボックスのグラフを更新する変数名を指定すると、グラフをウィンドウに追加する前にグラフを簡単に削除できます。
これはうまくいくようです:
私の勝利=新しい窓( 「チャート表示」 、
パネルボックス( 「グラフオプション」 、
H リストボックス(
パネルボックス( 「チャートを選択」 、
チャート_rb =ラジオボックス(
チャートリスト、
選択された_チャート=チャート_rb <<選ばれる;
もし(選択された_チャート== 「チャート1」 、
ギガバイト<<消去;
私の勝利<<追加する(ギガバイト= my_1_script ） 、
選択された_チャート== 「チャート2」 、
ギガバイト<<消去;
私の勝利<<追加する(ギガバイト= my_2_script ） 、
選択された_チャート== 「チャート3」 、
ギガバイト<<消去;
私の勝利<<追加する(ギガバイト= my_3_script ) 、
) ;
)
) 、
)
) 、
// デフォルトはチャート 1 です
ギガバイト= my_1_script
) ;
