www.pudn.com > Ms_segmenter.rar > Operation_prompt.m

if Region_left{I} == 0	% region was not chosen via "Select" 
	% prompt for an operation - one region only 
	Scr_sz = get(0, 'ScreenSize'); 
	New_wind = dialog('Name', 'Choose region(s)', 'Position', ... 
	   [Scr_sz(3)*0.3 Scr_sz(4)*0.4 Scr_sz(3)*0.3 Scr_sz(4)*0.1]); 
	 
	k = 0;  Ok_button = 0;	Interactive = 1; 
	if Show_all_regions{I}		% not just active 
		k = Bndred_regions{I}; 
	  	for i=1:Bndred_regions{I} 
			  Regions_disp{i} = sprintf('%d', i); 
	  	end 
	else 
	  for i=1:Bndred_regions{I} 
		  if Regions{I}{i}.Private.Active 
			  k = k+1; 
			  Regions_disp{k} = sprintf('%d', i); 
		  end 
	  end 
	end 
	 
	if k > 0 
		Region_left{I} = base2dec(Regions_disp{1}, 10);		% to correspond 
		Choice_left = uicontrol('Parent', New_wind); 
		Call_back_left=sprintf('Segment_demo(''Left'',%18.16f,%d)', Choice_left, I); 
		set(Choice_left, 'Style', 'Popup', 'String', Regions_disp, ... 
		  	'Units', 'Normalized', 'Position', [0 0.5 0.45 0.5], ... 
		  	'Callback', Call_back_left); 
		Ok_button = uicontrol('Parent', New_wind, ... 
	      'String', 'OK', 'Style', 'Pushbutton', ... 
	      'Units', 'Normalized', 'Position', [0.1 0 0.3 0.4]); 
	end 
	 
	Callback=sprintf('Segment_demo(''%s'',%d,%d)', 'Cancel operation', 0, I); 
	Cancel_button = uicontrol('Parent', New_wind, ... 
	   'String', 'Cancel', 'Style', 'Pushbutton', 'Callback', Callback, ... 
	   'Units', 'Normalized', 'Position', [0.6 0 0.3 0.4]); 
else 
	Interactive = 0; 
end