252739_zh-TW

liliconcom

選中帶有每個子組的子組的複選框問題失敗

大家好！我已經生成了一個用戶窗口，可以從2系列圖表中選擇任何一個。  該系列是“僅曲線”或“曲線和數據點”。  我的問題是，我還需要具有“選擇所有曲線”和“選擇所有曲線和點”選項。  兩個“全選”複選框非常有用。但是，如果我在“曲線圖”側選擇了任何內容，並且不選擇“選擇所有曲線和點”複選框（即使要選擇和取消選擇），而是我單獨選擇了一個或多個，則所選曲線和數據點圖也不會進入要生成的圖表列表。  我究竟做錯了什麼？包含代碼。  預先感謝大家關注我的問題！

//Generate charts for selected data
GetCharts = {};
GetDPCharts = {};

//Window for user to select which charts to be generated
WhatCharts = New Window( "Select Curve Charts to Generate", << Modal,
 << On open( WhatCharts << Window Size( 200, 100 ) ),
 H List Box( 
 //All charts wtih ONLY curves
 cbAllCharts = Check Box( {"By Condition", "By Cond No", "By Sample", "Average by Condition"} ),
 Spacer Box( Size( 10, 0 ) ),
 //Charts with Data Points AND Curves
 cbAllDPCharts = Check Box( {"By Condition w/ Data Points", "By Cond No w/ Data Points", "By Sample w/ Data Points", "Average by Condition w/ Data Points"})
 ),
 //Allow the user to select all charts
 H List Box(
 cbAll = Check Box( " ",
  << Set Function(
   Function( {this},
    cbAllCharts << Set All( this << Get, run script( 1 ) )
   )
  ),
 ),
 Text Box( "Select All Curve Plots" ),
 Spacer Box( Size( 9, 0 ) ),
 cbAll2 = Check Box( " ",
  << Set Function(
   Function( {this},
    cbAllDPCharts << Set All( this << Get, run script( 1 ) )
   )
  ),
 ),
 Text Box( "Select all Points and Curve Plots" ),
 ),
 H Center Box( Button Box( "OK", GetChkBoxes ) 
 )
);

//Place all selections into one list
if( N Items( GetDPCharts ) > 0,
 For( i = 1, i<= N Items( GetDPCharts ), i++,
  Insert Into( GetCharts, GetDPCharts[i] )
 )
);

//Expressions
GetChkBoxes = Expr(
 GetCharts = cbAllCharts << Get Selected;
 GetDPCharts = cbAllDPCharts << Get Selected;
);

Print( GetCharts, GetDPCharts );

回复：帶有選擇每個子組的所有子組的複選框問題失敗

為每個複選框提供自己的功能，並確保所有功能都具有不同的名稱：

//Generate charts for selected databutton

GetCharts = {};
GetDPCharts = {};

//Window for user to select which charts to be generated
WhatCharts = New Window( "Select Curve Charts to Generate", << Modal, << Return Result,
 //<< On open( WhatCharts << Window Size( 200, 100 ) ),
 H List Box( 
 //All charts wtih ONLY curves
 cbAllCharts = Check Box( {"By Condition", "By Cond No", "By Sample", "Average by Condition"},
  <<SETFUNCTION> 0,
 For( i = 1, i<= N Items( GetDPCharts ), i++,
  Insert Into( GetCharts, GetDPCharts[i] )
 )
);

Print( GetCharts, GetDPCharts );</SETFUNCTION>

回复：帶有選擇每個子組的所有子組的複選框問題失敗真棒！感謝您的教程，並加深了我對JSL的理解和工具箱！