topic Re: JSL: Update/redraw ListBox's contents in Discussions

JSL: Update/redraw ListBox's contents

ABI — Mon, 16 Jan 2017 20:01:10 GMT

I have a ListBox ("listDisplay") that is initialized with an empty list ("workingList") on a form.

As the user works through the form, new entries are added to "workingList". Is there a way to force "listDisplay" to redraw itself with the updated "workingList" on demand? I've tried <<UpdateWindow, but that didn't do the trick.

If that doesn't work, how can I tell "listDisplay" to overwrite its currently displayed values with the updated incarnation of "workingList"? I looked through the scripting index but couldn't find the function.

One last thing...if anyone knows a way to circumvent the need for "workingList", I'm all ears. I suppose there's something clever that could be done with calling <<Get on the ListBox itself, but I'm at a loss.

Stripped-down example code:

workingList = {};
New Window( "Example",
	<<Modal,
	H List Box(
		V List Box(
			clb = Col List Box( All ),
			Button Box( "Add", 
				workingList = Insert(workingList, clb<<get selected);
				//redraw listDisplay?
			),
			listDisplay = List Box( workingList ),
		),
	), 
);

Also -- why isn't my JSL code being highlighted in the box above? I'm using the "Insert JSL Script" button on the toolbar. Is there something else that needs to be done?

Re: JSL: Update/redraw ListBox's contents

txnelson — Tue, 17 Jan 2017 06:37:31 GMT

check this one out

dt=current data table();
New Window( "Example",
	<<Modal,
	H List Box(
		V List Box(
			clb = Col List Box( ),
			clb << append(  dt << get column names ),
			Button Box( "Lot Column",
							 LotCold << Append(  clb << GetSelected )
						),
						 LotCold = Col List Box(
						),
		),
	), 
);

Look at the File Exchange for:

Runs Test (Wald-Wolfowitz Test) and JSL Implementation of JMP Platform Dialog Box

For an example of a fairly complete implementation of the JMP Platform dialog box, with filtering, recall, help, etc. All of which can be ported easily to other scripts.

Re: JSL: Update/redraw ListBox's contents

ABI — Tue, 17 Jan 2017 16:45:21 GMT

Thank you, Jim, this works beautifully. I've grabbed your Runs Test addin and can already tell it's going to help immensely with my current project.

While I have your ear, would it be possible to do something like resize the number of entry boxes in a NumberColEditBox based on the currently displayed list size of ListBox? I couldn't find an example of this behavior elsewhere.

dt = Current Data Table();
New Window( "Example",
	<<Modal,
	H List Box(
		V List Box(
			clb = Col List Box(),
			clb << append( dt << get column names ),
			Button Box( "Lot Column", 
				LotCold << Append( clb << GetSelected ),
				//Increase # of edit boxes available in NumBox so that it's equal to number of entries in LotCold?
			),
			LotCold = List Box(),
			NumBox = NumberColEditBox("",{}),
		),

	),

);

PS: You probably don't remember me, but we had talked briefly at the jmp summit a few months back. It's great to see you here -- you'd given me a couple of great pointers for working in jsl, and working in general ("the best work gets accomplished in the morning"). Thanks again!

Re: JSL: Update/redraw ListBox's contents

txnelson — Tue, 17 Jan 2017 18:22:41 GMT

try this

dt = Current Data Table();
New Window( "Example", 
	//<<Modal,
	H List Box(
		V List Box(
			clb = Col List Box(),
			clb << append( dt << get column names ),
			Button Box( "Lot Column",
				LotCold << Append( clb << GetSelected );
				numbox << delete;
				myvalues = [];
				For( i = 1, i <= N Items( lotcold << get items ), i++,
					myvalues = V Concat( Myvalues, i )
				);
				thevlb << append( numbox = Number Col Edit Box( "", myvalues ) );
				//Increase # of edit boxes available in NumBox so that it's equal to number of entries in LotCold?
			),
			LotCold = List Box(),
			Text Box( "The Number Col Edit Box" ),
			thevlb = V List Box( numbox = Number Col Edit Box( "", [] ) )
		)
	)
);

Re: JSL: Update/redraw ListBox's contents

ABI — Wed, 18 Jan 2017 14:31:36 GMT

Beautiful, thanks again