私の launchWin ウィンドウはインタラクティブなボタン ボックスで構成されています。 しかし、ボタンを押してもウィンドウが閉じません。 理由はわかりません。 ボタンをクリックしたら自動的に閉じるものだと思っていました
以下のコードがあります:
//作業テーブルを現在のテーブルとして設定します。どのテーブルが一番上にあるかに注意してください
dt = 現在のデータテーブル();
//各ボックス内の合計アリコートのサマリーをボックス ID ごとに作成します
sumdt = dt << 概要(
グループ( :BOX ID )、
Sum( :Name( "アリコート数" ) ),
Freq( "なし" ),
重量(「なし」)
);
//各ボックスの空き領域を計算し、新しい列に割り当てます
Col5 = sumdt << New Column("FreeSpace", データ型 (数値),
式（
96 - :Name("合計(アリコート数)")
）
);
// 新しいテーブルを新しい列でソートします
sumdt << Sort(By(:FreeSpace), Order(降順), テーブルを置換);
box10 = sumdt[インデックス(1,10), 1];
row10 = sumdt[インデックス(1,10), 4];
close(sumdt, nosave);
launchWin = 新しいウィンドウ( "ランチャー",
<<モーダル、
V リストボックス(
ラインナップボックス( N Col( 4 )、間隔( 20 )、
//空き容量を確認する
ボタンボックス( "スペースをチェック",
新しいウィンドウ (「利用可能なスペース」、
テーブルボックス(
Number Col Box("ボックス ID", box10),
Number Col Box(「使用可能なスロット」、行 10)
）
）
）、
//キャンセル
ボタンボックス(「キャンセル」、スロー(1))
）、
）
);
ボタン ボックスに「OK」という名前を付けると、ボタン ボックスは自動的に閉じます。 ただし、独自の名前を付けて独自のボタンを作成したのは問題ありませんが、カスタム ボタンは指示されたことしか実行しません。
ボタンのウィンドウを閉じる機能を追加するには 2 つの方法があります。 1 つは、ボタン ボックスを変数に割り当て、ボタンのスクリプト内でウィンドウを閉じるメッセージを送信する方法です。
b=Button Box( "Check Space",
New Window( "Available Spaces",
Table Box( Number Col Box( "Box ID", box10 ), Number Col Box( "Available Slot", row10 ) )
);
b<<CLOSE window=""></CLOSE>
または、ボタンに関数を割り当てて、グローバル名前空間に変数を追加しないようにすることもできます。
Button Box( "Check Space",
<<SET function=""></SET>
HTH、
メラニー
