www.gusucode.com > mbclayouts 工具箱 matlab 源码程序 > mbclayouts/@xregtoolbarlayout/repack.m
function obj = repack(obj) % Synopsis % function obj = repack(obj) % % Description % This function reapplies the packing command to the objects in question % Copyright 2000-2010 The MathWorks, Inc. and Ford Global Technologies, Inc. cdata=get(obj.xregcontainer,'containerdata'); h = cdata.elements; pos= cdata.innerposition; tbHT=obj.tb.DesiredHeight; sw=obj.rtP.info.SpacerW; pnlpos = [pos(1) pos(2)+pos(4)-tbHT-2 pos(3) tbHT+2]; set(obj.panel,'Position',pnlpos); if sw vis=get(obj.panel,'Visible'); set(obj.spacer,'Visible',vis,'Position',[pos(1) pos(2)+pos(4)-tbHT-2-sw pos(3) sw]); else set(obj.spacer,'Visible','off'); end % pass on sizes to subobjects % this object only supports one contained object. Any others are ignored if ~isempty(h) set(h{1},'Position',pos-[0 0 0 tbHT+2+sw]); end