06.08.2013 Views

内容简介作者简介 - 科学与工程计算系

内容简介作者简介 - 科学与工程计算系

内容简介作者简介 - 科学与工程计算系

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

set(hpush,'callback','exm1053_1(''set'')'); % <br />

set(gcf,'UserData',[hedit,hpop,hlist]); % <br />

case 'set' % <br />

H=get(gcf,'UserData'); % <br />

ct=get(H(1),'string'); % <br />

vpop=get(H(2),'value'); % <br />

vlist=get(H(3),'value'); % <br />

if ~isempty(ct)<br />

eval(ct')<br />

popstr={'spring','summer','autumn','winter'};<br />

liststr={'grid on','box on','hidden off','axis off'};<br />

invstr={'grid off','box off','hidden on','axis on'};<br />

colormap(eval(popstr{vpop}))<br />

vv=zeros(1,4);vv(vlist)=1;<br />

for k=1:4<br />

if vv(k);eval(liststr{k});else eval(invstr{k});end<br />

end<br />

end % <br />

end<br />

(2)<br />

【例 10.5.3-2】目标:利用 M 函数文件创建与例 10.4.3.3-1 相同的用户界面。本例演示:如<br />

何依靠 'Tag'属性 与 findobj 指令的配合使用获取回调操作所必须的控件图柄,保证回调动作<br />

正确执行。<br />

(1)<br />

(2)<br />

'Tag','H_edit',...<br />

(3)<br />

'Tag','H_popup',...<br />

(4)<br />

'Tag','H_list',...<br />

(5)<br />

(6)<br />

H(1)=findobj(gcf,'Tag','H_edit');<br />

H(2)=findobj(gcf,'Tag','H_popup');<br />

H(3)=findobj(gcf,'Tag','H_list');<br />

(7)<br />

function exm10053_2(flag)<br />

(8)<br />

(9)<br />

10.6 图形用户界面设计工具<br />

17

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!