?? curmenu.m
字號:
%
% CURMENU is the m-file which display the result when the
% cursor is used to pick a point.
% Author: Ole Barup Sorensen, Rapid Data Ltd
% Copyright (c) 1989-94 by Rapid Data Ltd
% Revision 10:34 07/02/94
okflag=figflag('Cursor values',0);
if okflag==0,
xp=15; yp=65;
Sx=280;
Sy=190;
Mainfig=gcf;
Fig6=figure('Numbertitle','off','Name','Cursor values','Menubar','none',...
'Units','normal','Position',[(200)/Scx (200)/Scy (280)/Scx (170)/Scy],'Nextplot',...
'new','Resize','off','Color',[0.5 0.5 0.5],'Visible','off');
Han_b2(2)=uicontrol(Fig6,'Style','frame','Position',[(xp-5)/Sx (yp-5)/Sy (250)/Sx (70)/Sy]);
Han_b2(3)=uicontrol(Fig6,'Style','text','Position',[(xp-5)/Sx (yp+65)/Sy (200)/Sx (20)/Sy],'String',...
'Cursor values:');
Han_b2(4)=uicontrol(Fig6,'Style','text','Position',[(xp)/Sx (yp+40)/Sy (235)/Sx (20)/Sy],'String',...
' ');
Han_b2(5)=uicontrol(Fig6,'Style','text','Position',[(xp)/Sx (yp+20)/Sy (235)/Sx (20)/Sy],'String',...
' ');
Han_b2(6)=uicontrol(Fig6,'Style','text','Position',[(xp)/Sx (yp)/Sy (235)/Sx (20)/Sy],'String',...
' ');
set(Han_b2(3:6),'HorizontalAlignment','left');
Han_b2(7)=uicontrol(Fig6,'Style','push','String','Done','Position',...
[(xp-5)/Sx (yp-50)/Sy (60)/Sx (20)/Sy],'Callback',['close(Fig6); clear Fig6 Han_b2;']);
Han_b2(1)=uicontrol(Fig6,'Style','push','String','New point','Position',...
[(xp+65)/Sx (yp-50)/Sy (80)/Sx (20)/Sy],'Callback','set(0,''Currentfigure'',Mainfig);cursor;');
set(0,'Currentfigure',Mainfig);
cursor
end
clear okflag
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -