send graphics object back to the screen. [USAGE] gobject_bring_to_back(<parent_h>, <handle>); [IN] parent_h : figure or axes handle handle : graphics object handle(s) [OUT] none Copyright (C) 2011, ATR All Rights Reserved. License : New BSD License(see VBMEG_LICENSE.txt)
0001 function vb_gobject_send_to_back(parent_h, handle) 0002 % send graphics object back to the screen. 0003 % [USAGE] 0004 % gobject_bring_to_back(<parent_h>, <handle>); 0005 % [IN] 0006 % parent_h : figure or axes handle 0007 % handle : graphics object handle(s) 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('parent_h', 'var'), error('parent_h is a required parameter.'); end 0018 if ~exist('handle', 'var') 0019 error('handle is a required parameter.'); 0020 end 0021 0022 % 0023 % --- Main Procedure 0024 % 0025 h = get(parent_h, 'Children'); 0026 del_ix = []; 0027 for k=1:length(handle) 0028 ix = find(h == handle(k)); 0029 if ~isempty(ix) 0030 del_ix = [del_ix;ix]; 0031 end 0032 end 0033 0034 h(del_ix) = []; 0035 new_h = [h; handle]; 0036 set(parent_h, 'Children', new_h);