Multiple Choice for CHOOSE command

[Carlos295pz]

(08-09-2018 07:07 AM)Giancarlo Wrote:  For example if the program asks for ‘ice cream preferred flavors’ the user could select multiple flavors like ‘vanilla’, ‘strawberry’ and ‘coffee’.

This system (CHOOSE command nested into a REPEAT...UNTIL loop) work until you don’t have to exit from the loop. Which condition? I don’t know how to exit from the test because there is no way to understand when the user stops the selection of items...

It can be achieved like this:

Code:

  LOCAL List={"vanilla","strawberry","coffee","coconut","chocolate"};
  LOCAL X,SList={};
  WHILE CHOOSE(X,"Chosen ("+SIZE(SList)+")",List) DO
    SList:=UNION(SList,X)
  END;
  L1:=List;
  MSGBOX(EXECON("L1(&1)",SList))

[Esc] on CHOOSE return a 0