setopt.m

一个简单的计算器,用MATLAB开发

%当点菜单“设置”时，就调用这个文件
function set = setopt()

%function set = setopt(presize,flag,path) 不足道这个为什么不行
h0 = figure('Color',[0.925490196078431 0.913725490196078 0.847058823529412], ...
	'Position',[373 342 252 103], ...
   'Tag','setmain',...
   'resize','off',...
   'menubar','none',...
   'numbertitle','off',...
   'windowstyle','modal',...
   'name','高级设置');
h1 = uicontrol('Units','points', ...
	'BackgroundColor',[0.925490196078431 0.913725490196078 0.847058823529412], ...
	'ListboxTop',0, ...
	'Position',[8.25 35.25 51.75 10.5], ...
	'String','背景音乐', ...
   'Style','checkbox',...
   'value',1,...
   'Tag','Checkbox1',...
   'callback','check(get(gcbo,''value''),findobj(''tag'',''editpath''),findobj(''tag'',''btnbrowse''))');
h1 = uicontrol('Units','points', ...
	'BackgroundColor',[0.925490196078431 0.913725490196078 0.847058823529412], ...
	'ListboxTop',0, ...
	'Position',[9 60 38.25 10.5], ...
	'String','精度设置', ...
	'Style','text', ...
	'Tag','StaticText1');
h1 = uicontrol('Units','points', ...
	'ListboxTop',0, ...
	'Position',[61.5 60 119.25 13.5], ...
	'String',{'short','long','short e','long e','short g','long g','hex','bank','rat','loose','compact'}, ...
	'Style','popupmenu', ...
	'Tag','list', ...
   'Value',1,...
   'backgroundcolor',[1 1 1]);
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[50.25 6 44.25 18.75], ...
   'String','确定',...
   'Tag','Pushbutton1',... 不足道这个为什么不行
   'callback','setok(findobj(''tag'',''setmain''),findobj(''tag'',''list''));');
 %'callback','set(1)=setok(presize,findobj(''tag'',''setmain''),findobj(''tag'',''list''));');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[101.25 6 44.25 18.75], ...
	'String','取消','callback','delete(findobj(''tag'',''setmain''))',...
	'Tag','Pushbutton1');
h1 = uicontrol('Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[61.5 30.75 101.25 18.75], ...
	'Style','edit', ...
	'Tag','editpath','string','music.wav');
h1 = uicontrol('Units','points', ...
	'ListboxTop',0, ...
	'Position',[164.25 31.5 15.75 16.5], ...
	'String','...', ...
   'Tag','btnbrowse','callback','set(2)=browse(findobj(''tag'',''editpath''));');

% 不足道这个为什么不行
%if flag==1 
%   set(findobj('tag','btnbrowse'),'enable','on');
%else
%   set(findobj('tag','btnbrowse'),'enable','off');
%end
%
%if nargout > 0, fig = h0; end