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

【例 10.4.3.3-1】目标:制作一个能绘制任意图形的交互界面。它包括:可编辑文本框、弹
出框、列表框。本例的关键内容是:如何使编辑框允许输入多行指令。
[exm100433_1.m]
clf reset %
set(gcf,'unit','normalized','position',[0.1,0.4,0.85,0.35]);
set(gcf,'defaultuicontrolunits','normalized');
set(gcf,'defaultuicontrolfontsize',11);
set(gcf,'defaultuicontrolfontname','隶书');
set(gcf,'defaultuicontrolhorizontal','left');
set(gcf,'menubar','none');
str='通过多行指令绘图的交互界面';
set(gcf,'name',str,'numbertitle','off');
h_axes=axes('position',[0.05,0.15,0.45,0.70],'visible','off');
uicontrol(gcf,'Style','text',...
'position',[0.52,0.87,0.26,0.1],...
'String','绘图指令输入框');
hedit=uicontrol(gcf,'Style','edit',... %
'position',[0.52,0.05,0.26,0.8],...
'Max',2); %
hpop=uicontrol(gcf,'style','popup',... %
'position',[0.8,0.73,0.18,0.12],...
'string','spring|summer|autumn|winter');%
hlist=uicontrol(gcf,'Style','list',... %
'position',[0.8,0.23,0.18,0.37],...
'string','Grid on|Box on|Hidden off|Axis off',...%
'Max',2); %
hpush=uicontrol(gcf,'Style','push',... %
'position',[0.8,0.05,0.18,0.15],'string','Apply');
set(hedit,'callback','calledit(hedit,hpop,hlist)'); %
set(hpop,'callback','calledit(hedit,hpop,hlist)'); %
set(hpush,'callback','calledit(hedit,hpop,hlist)'); %
[calledit.m]
function calledit(hedit,hpop,hlist)
ct=get(hedit,'string'); %
vpop=get(hpop,'value'); %
vlist=get(hlist,'value'); %
if ~isempty(ct) %
eval(ct') %
popstr={'spring','summer','autumn','winter'}; %
liststr={'grid on','box on','hidden off','axis off'};%
invstr={'grid off','box off','hidden on','axis on'};%
colormap(eval(popstr{vpop})) %
vv=zeros(1,4);vv(vlist)=1;
for k=1:4
if vv(k);eval(liststr{k});else eval(invstr{k});end
end
end
14