Subscribe Bookmark RSS Feed

Create search function

jade

Contributor

Joined:

Apr 22, 2017

Hi ,everyone

One problem that i had face is in my script for the text edit box, i had put set hint for the text edit box, but when i run the program, it does not function.
Does anyone can help me take a look?

Thanks.

I have attach script below:

nw = New Window("SB Selection",
	<< modal,

	V List box (
	  // " ",
	  // "Select SB of Interest",
	  // " ",
	   Line up box(1, "SB:", SB = SBList ),
	   //" ",
	   
	    Lineup box (Ncol(1),
	    aa = List Box(SBList),
	    ted = Text Edit Box(" ", << Set Hint("search word example: I"),
	    << Set Script(
	    	Wrd = Uppercase(ted << Get Text);
	    	SBListNew = {};
	    	For(j = 1, j<= N Items(SBList), j++,
	    		if (Contains(SBList[j], Wrd),
	    			Insert Into(SBListNew, SBList[j])
	    		)
	    	);
	    	
	    aa << Set items(SBListNew);
	    	
	                )		
	                
                )
            ),
            
    Panel Box("Select",
    rb = Radio Box(u1u2)
	
	),
   H List box( Button Box( "OK" ), Button Box( "Cancel" ) ),

         )

    );   
       
		If( nw["Button"] == -1,
			Throw( "User Cancel" )
		);
		Remove From( nw );
		Eval List( nw );
		
		B = SBList[SB];
		
		Include( JSL ); 
     )   
     
);