How to force user to provide valid input

samir

Hi ,

I am trying to force the user to give a valid entry: I display a modal window, and ask to give a value.

If this value is a string different than "" , then the code should go on using the value given. If not , the script should hang on or prompt the user to give correct input.

I tried using a modal window + hiding the OK button, but somehow, it does not do the job (see attached code).

Please help.

win = New Window( "Set a Value", 

	<<Modal,

	<<Return Result, 

	tb = Text Box( "Set this value" ), 

	variablebox = Text Edit Box( "", 
		//bb << enable(variablebox << get text !="");
		If( variablebox << get text != "",
			bb << Visibility( "Visible" )
		),

	), 

	bb = Button Box( "OK" ),
	bb << Visibility( "Hidden" ),
	If( variablebox << get text != "",
		bb << Visibility( "Visible" ),
		bb << Visibility( "Hidden" )
	), 

	//Button Box( "Cancel" ),
	
	

);

Mark_Bailey

I prefer to explicitly use a Cancel button, but the design of your dialog is your business.

 

This modified version of the example I showed earlier should handle the case of the user clicking Cancel or the close window button.

 

Names Default to Here( 1 );

// put up dialog box for user entry
win = New Window( "Set a Value", 
	<<Modal,
	<<Return Result, 
	tb = Text Box( "Set this value" ), 
	variablebox = Text Edit Box( "",
		<< Set Function(
			Function( { me },
				content = me << Get Text;
				If( Is Missing( content ),
					bb << Enable( 0 ),
					bb << Enable( 1 )
				)
			)
		)
	), 
	bb = Button Box( "OK",
		<< Enable( 0 ),
		content = bb << Get Text;
	),
	Button Box( "Cancel" ),
);

// unload dialog
If( win["Button"] == -1, Throw( "User cancelled" ) );

// continue with remainder of script
Show( content );