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