www.gusucode.com > mbcguitools 工具箱 matlab 源码程序 > mbcguitools/@xreglistctrl/append.m
function obj= append(obj,new) %APPEND Append new controls to the list % % APPEND(OBJ, NEWCTRL) appends NEWCTRL to those already in place. % Copyright 2000-2013 The MathWorks, Inc. and Ford Global Technologies, Inc. sh = obj.slider; ud = get(sh,'UserData'); controls = ud.controls; if iscell(new) ud.controls = [controls, new(:)']; uic = get(obj,'UIContextMenu'); for i = 1:length(ud.controls) set(ud.controls{i}, 'Parent', obj.frame); try set(ud.controls{i},'Callback', {@i_cellcb, obj, i},... 'UIContextMenu',uic); end end end set(sh,'UserData',ud); obj = redraw(obj,'cell'); function i_cellcb(src, evt, obj, idx) callback(obj, idx);