pa_brain_parm_gui_callback

 callback function for brain advanced parameter gui.
 [USAGE]
    pa_brain_parm_gui_callback(fig, hObj);
 [IN]
     fig : figure handle of brain advanced parameter gui.
    hObj : event component handle
 [OUT]
    none

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function pa_brain_parm_gui_callback(fig, hObj)
0002 % callback function for brain advanced parameter gui.
0003 % [USAGE]
0004 %    pa_brain_parm_gui_callback(fig, hObj);
0005 % [IN]
0006 %     fig : figure handle of brain advanced parameter gui.
0007 %    hObj : event component handle
0008 % [OUT]
0009 %    none
0010 %
0011 % Copyright (C) 2011, ATR All Rights Reserved.
0012 % License : New BSD License(see VBMEG_LICENSE.txt)
0013 
0014 %
0015 % --- Previous check
0016 %
0017 if ~exist('fig', 'var') || isempty(fig) || ~ishandle(fig)
0018     error('invalid figure handle.');
0019 end
0020 if ~exist('hObj', 'var'), error('hObj is a required parameter.'); end
0021 
0022 %
0023 % --- Main Procedure
0024 %
0025 global vbmeg_inst;
0026 define = vbmeg_inst.const;
0027 
0028 % load data(@see pa_brain_create)
0029 data = guidata(fig);
0030 H = data.H;
0031 
0032 switch( hObj )
0033     % set value from slider to editbox
0034     case H.rmax_slider
0035         val = get(H.rmax_slider, 'Value'); % [mm]
0036         set(H.rmax_edit, 'String', int2str(val));
0037     case H.reduce_ratio_slider
0038         val = get(H.reduce_ratio_slider, 'Value'); % [mm]
0039         set(H.reduce_ratio_edit, 'String', num2str(val));
0040     case H.nstep_slider
0041         val = get(H.nstep_slider, 'Value');
0042         set(H.nstep_edit, 'String', int2str(val));
0043     case H.display_slider
0044         val = get(H.display_slider, 'Value');
0045         set(H.display_edit, 'String', int2str(val));
0046     % set value from editbox to slider
0047     case H.rmax_edit
0048         val = str2num(get(H.rmax_edit, 'String'));
0049         set(H.rmax_slider, 'Value', val);
0050     case H.reduce_ratio_edit
0051         val = str2num(get(H.reduce_ratio_edit, 'String'));
0052         set(H.reduce_ratio_slider, 'Value', val);
0053     case H.nstep_edit
0054         val = str2num(get(H.nstep_edit, 'String'));
0055         set(H.nstep_slider, 'Value', val);
0056     case H.display_edit
0057         val = str2num(get(H.display_edit, 'String'));
0058         set(H.display_slider, 'Value', val);
0059     % button action
0060     case H.ok_push
0061         brain_parm = pa_brain_parm_gui_get_parm(fig);
0062         pa_brain_merge_parm(data.parent_fig, brain_parm);
0063         pa_brain_parm_gui_close(fig);
0064     case H.cancel_push
0065         button = questdlg('Close Now?', 'brain_parm',...
0066                           'Yes', 'No',... % choice button type
0067                           'No');          % default choice
0068         if strcmp(button, 'Yes')
0069             pa_brain_parm_gui_close(fig);
0070         end
0071 end