topic How to setup Combo box list? in Discussions

How to setup Combo box list?

LBrian — Sun, 11 Jun 2023 00:02:09 GMT

Hello.

I wanna make a list using combo box, showing ".csv" only.

How to setup the list?

In my code,

All files are listed up on selected directory.

Names Default To Here( 1 );
Load file = New Window( "New Window",
	<<modal(),
	<<ReturnResult,
	<<on close(
	), 

	H List Box(
		Text Box( "Choose directory" ),
		Spacer Box( size( 10, 10 ) ),
		BB1 = Button Box( "Load file", 
			address1 = Pick Directory();
				
			If( address1 == "",
				file1 << set text( "" ), //else if
				If( address1 != "",
					file1 << set text( address1 )
				)
			);
		)
	), 	
	

	Panel Box( "",
		V List Box( Text Box( "Directory path :" ), Spacer Box( size( 300, 10 ) ), file1 = Text Box( "" ) )
	)
);
	
path = address1;
address1 = Files In Directory( address1 );
			
	
nw = New Window( "Pick CSV Files",
	Panel Box( "List",
		Lineup Box( N Col( 2 ),
			Text Box( "1st:" ),
			cb1 = Combo Box( address1 ),		
			Button Box( "OK" );	
		)
	);
);

Re: How to setup Combo box list?

txnelson — Thu, 08 Jun 2023 10:08:59 GMT

All you need to do is to loop backwards through the address1 list and remove all of the entries that are not .csv files.

For( i = N Items( address1 ), i >= 1, i--,
	If( Word( -1, address1[i], "." ) != "csv",
		Remove From( address1, i, 1 )
	)
);

See the Scripting Index for definition and examples of any of the above used functions.

Re: How to setup Combo box list?

LBrian — Thu, 08 Jun 2023 23:53:24 GMT

It works very well!

Thank you so much.

Re: How to setup Combo box list?

jthi — Fri, 09 Jun 2023 05:05:24 GMT

Also if you have JMP16+, you can use Filter Each

address2 = Filter Each({filename}, Files In Directory(address1),
	Ends With(filename, ".csv");
);