动脑子试了没有???
- function tttt
- clear all
- clc
- global hAxes1 hAxes2
- figure;
- set(gcf,'numbertitle','off',...
- 'name','在多轴间切换绘图示意',...
- 'units','normalized',...
- 'position',[.1,.15,.75,.5],...
- 'menubar','none',...
- 'defaultuicontrolfontsize',15,...
- 'defaultuicontrolfontname','隶书');
- hAxes1=axes('units','normalized',...
- 'position',[.1,.6,.7,.35]);
- hAxes2=axes('units','normalized',...
- 'position',[.1,.15,.7,.35]);
- set(gcf,'currentaxes',hAxes1);
- hPop=uicontrol(gcf,'style','popupmenu',...
- 'units','normalized',...
- 'position',[.83,.8,.15,.12],...
- 'string','图一|图二');
- i=get(hPop,'value');
- set(hPop,'callback',[...
- 'i=get(gcbo,''value'');',...
- 'ChangeAxes(i)']);
- hMenu=uimenu(gcf,'label','画图',...
- 'callback','peaks');
- uicontrol(gcf,'style','push',...
- 'units','normalized',...
- 'position',[.83,.6,.15,.1],...
- 'string','清空',...
- 'callback',[...
- 'cla reset,',...
- 'hAx=get(gcf,''currentaxes'');',...
- 'grid off,',...
- 'H1=get(hAx,''title'');',...
- 'delete(H1);',...
- 'H2=get(hAx,''xlabel'');',...
- 'delete(H2);',...
- 'H3=get(hAx,''ylabel'');',...
- 'delete(H3);',...
- 'set(hAx,''xtick'',[],''xticklabel'',[]),',...
- 'set(hAx,''ytick'',[],''yticklabel'',[]),',...
- 'set(hAx,''ztick'',[],''zticklabel'',[])',...
- ]);
复制代码- function ChangeAxes(i)
- global hAxes1 hAxes2
- if i==1
- set(gcf,'currentaxes',hAxes1);
- else
- set(gcf,'currentaxes',hAxes2);
- end
复制代码
存成两个M文件,放在同一个文件夹下,运行第一个,图形如下:
[ 本帖最后由 bainhome 于 2006-8-22 01:14 编辑 ] |