www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@xregtools/@MBrowser/MBrowser.m

    function objH=MBrowser
% Instantiate a Model Browser object
%
%  obj=MBrowser;

%  Copyright 2000-2004 The MathWorks, Inc. and Ford Global Technologies, Inc.



% Created 1/12/2000

% create a blank new object
objH= xregtools.MBrowser;
% Create Listeners
mbc = classhandle(objH);
p = mbc.findprop('GUILocked');
List.lockL= handle.listener(objH, p, 'PropertyPostSet', {@i_setlocktime});
List.GetLockL= handle.listener(objH, p, 'PropertyPreGet', {@i_checklock});
objH.Listeners=List;
return



function i_setlocktime(srcobj, evt)
obj= evt.AffectedObject;
val= evt.NewValue;

if val
   % update time
   obj.GUILockTime=now;   
end
return



function i_checklock(srcobj, evt)
obj= evt.AffectedObject;

if obj.GUILocked
   if (now-obj.GUILockTime)>7e-4    % about 1 minute
      obj.GUILocked=false;
   end
end
return