t3.m

来自「matlab在图形处理方面的简单应用 matlab简单程序设计」· M 代码 · 共 12 行

screen=get(0,'ScreenSize');
W=screen(3);H=screen(4);
bk=figure('color',[0.3,0.2,0.5],'position',[0.2*H,0.2*H,0.6*W,0.5*H],'name','菜单',...
   'numbertitle','off','menubar','none','color',[0.2,0.2,0.2]);
hfile=uimenu(gcf,'Label','&File');
hhelp=uimenu(gcf,'Label','&Help');
ht=uicontrol(bk,'style','text','units','normalized','position',[0.3,0.45,0.4,0.1],'horizontal','center','back',[1,1,1]);
uimenu(hfile,'Label','&New','Call','set(ht,''string'',''New Item'');','Enable','on');
uimenu(hfile,'Label','&Open','Call','set(ht,''string'',''Open Item'');','Enable','on');
hgon=uimenu(hfile,'Label','&Save','Call','set(ht,''string'',''Save Item'');','Enable','off');
uimenu(hfile,'Label','&Exit','Call','close(gcf);');
uimenu(hhelp,'Label','&About','Call',['set(ht,''string'',''Help Item'');','set(hgon,''Enable'',''on'');'],'Enable','on');