close request function Copyright (C) 2011, ATR All Rights Reserved. License : New BSD License(see VBMEG_LICENSE.txt)
0001 function vb_parm_editor_gui_closereq(fig, do_check) 0002 % close request function 0003 % 0004 % Copyright (C) 2011, ATR All Rights Reserved. 0005 % License : New BSD License(see VBMEG_LICENSE.txt) 0006 if ~exist('do_check', 'var') 0007 do_check = true; 0008 end 0009 0010 data = guidata(fig); 0011 if isfield(data, 'modified') && do_check 0012 res = questdlg('The Parameter was modified. Discard?', 'Confirm', ... 0013 'Yes', 'No', 'Yes'); 0014 if strcmpi(res, 'yes') 0015 set(fig, 'Visible', 'off'); 0016 else 0017 return; 0018 end 0019 end 0020 set(fig, 'Visible', 'off');