www.gusucode.com > mbcguitools 工具箱 matlab 源码程序 > mbcguitools/@xregGui/@RunTimePointer/RunTimePointer.m

    function obj=RunTimePointer(data);
% RunTimePointer
%
%   Simple handle object for storing data as a reference.
%

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



% Created 13/3/2001


obj=xregGui.RunTimePointer;


% attach a listener to the info field for firing a change event

obj.L_info=handle.listener(obj,findprop(classhandle(obj),'info'),'PropertyPostSet',{@i_firechange});

if nargin == 1
	obj.info = data;
end

return



function i_firechange(srcobj,evt)
send(evt.AffectedObject,'DataChanged');
return