252739_fr-FR

liliconcom

La case à cocher question avec des sous-groupes avec sélectionner tous les sous-groupes échoue

Bonjour les gens! J'ai généré une fenêtre utilisateur pour sélectionner l'une des 2 séries de graphiques.  Les séries sont "Courbes uniquement" ou "Courbes et points de données".  Mon problème est que je dois également avoir les options "Sélectionner toutes les courbes" et "Sélectionner toutes les courbes et tous les points".  Les deux cases à cocher "Sélectionner tout" fonctionnent très bien. Cependant, si je sélectionne quelque chose du côté du graphique de courbe et NE cochez PAS la case "Sélectionner toutes les courbes et tous les points" (même pour les sélectionner et les désélectionner), je sélectionne plutôt un ou plusieurs individuellement, les graphiques de courbe et de points de données sélectionnés ne sont pas entré dans la liste des cartes à produire.  Qu'est-ce que je fais mal? Code inclus.  Merci à tous d'avance d'avoir examiné mon problème!

//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 );

Re: Question de case à cocher avec des sous-groupes avec la sélection de tous les sous-groupes échoue

Donnez à chaque case à cocher sa propre fonction et assurez-vous que toutes les fonctions ont des noms différents:

//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>

Re: Question de case à cocher avec des sous-groupes avec la sélection de tous les sous-groupes échoueIMPRESSIONNANT! Merci pour le tutoriel et l'avancement de ma compréhension et de ma boîte à outils JSL!