327607_ja-JP

liliconcom

ウィンドウを閉じるにはローカル変数が必要

複数のウィンドウを生成し、閉じるボタンでそれぞれを個別に閉じようとしています。しかし、それは私が期待したようには機能していません。コードを2回実行してみてください。閉じるボタンは一方のウィンドウでは機能しますが、もう一方のウィンドウでは機能しません。

::a = "The quick fox jumped over the brown log";
::b = "Hello World I want to get off now";

names default to here(1);
nw = new window("Test",
 text box(::a),
 text box(::b),
 button box("Close", nw << close window)
);

グラフィックススクリプティングRe：ウィンドウを閉じるにはローカル変数が必要です

これが私がそれを処理する方法です

::a = "The quick fox jumped over the brown log";
::b = "Hello World I want to get off now";

Names Default To Here( 1 );
Eval(
 Substitute(
   Expr(
    __nw__ = New Window( "Test",
     Text Box( ::a ),
     Text Box( ::b ),
     Button Box( "Close", __nw__ << close window )
    )
   ),
  Expr( __nw__ ),
   Parse( "nw" || Char( Random Integer( 1, 999999999 ) ) )
 )
);

Re：ウィンドウを閉じるにはローカル変数が必要です

動作するジムに感謝します。しかし、2つの質問：

1.なぜあなたはうまくいき、私のものではないのですか？

2. __nw__をランダムな整数に割り当てているようですが、それはすでに「ウィンドウハンドル」です。それはウィンドウハンドルの値を上書きしませんか？

 

ボーナスの質問として、なぜすべての二重アンダースコアがありますか？コードはそれらがなくても正常に機能します。