?? guiexample.m
字號(hào):
function guiexample
set(0,'Units','pixels');
Ssize = get(0,'ScreenSize'); % 獲得屏幕的大小
H.gui = dialog('WindowStyle','normal',... % 設(shè)置對(duì)話框
'Resize','on',...
'Name','GUI_Example',...
'Units','pixels',...
'Position',[(Ssize(3)-500)/2 (Ssize(4)-400)/2 500 400]);
H.axes = axes('Parent',H.gui,... % 設(shè)置坐標(biāo)軸
'Units','pixels',...
'Position',[30 30 380 340]);
H.Button = uicontrol('Style','pushbutton',... % 目標(biāo)按鈕
'Parent',H.gui,...
'Units','pixels',...
'Position',[100 100 100 60]);
DefPos = get(H.Button ,'Position'); % 目標(biāo)按鈕的默認(rèn)位置
set(H.Button,'UserData',DefPos) % 保存目標(biāo)按鈕的默認(rèn)位置
set(H.Button,'String',strcat(num2str(DefPos(1)),',',num2str(DefPos(2)))) % 顯示目標(biāo)按鈕的位置坐標(biāo)
H.Hslider = uicontrol('Style','slider',... % 水平slider
'Parent',H.gui,...
'Units','pixels',...
'Position',[30 375 360 20],...
'Min',30,'Max',370,...
'Value',DefPos(1),...
'Callback',{@local_Hslider,H});
H.Vslider = uicontrol('Style','slider',... % 豎直slider
'Parent',H.gui,...
'Units','pixels',...
'Position',[415 30 20 330],...
'Min',30,'Max',330,...
'Value',DefPos(2),...
'Callback',{@local_Vslider,H});
H.Default = uicontrol('Style','pushbutton',... % 默認(rèn)按鈕,恢復(fù)目標(biāo)按鈕的位置
'Parent',H.gui,...
'Units','pixels',...
'Position',[440 200 60 30],...
'String','默認(rèn)',...
'Callback',{@local_Default,H});
Hm = uimenu('Parent',H.gui,'Label','File'); %菜單
uimenu('Parent',Hm,...
'Label','Default',...
'Callback',{@local_Default,H}); % 調(diào)用默認(rèn)按鈕
uimenu('Parent',Hm,...
'Label','Close',...
'Callback','close(gcbf)'); %關(guān)閉圖形
function local_Hslider(cbo,eventdata,h) % 改變目標(biāo)按鈕的水平位置
SliderValue = get(cbo,'Value');
pos = get(h.Button,'Position');
set(h.Button,'Position',[SliderValue pos(2:4)])
set(h.Button,'String',strcat(num2str(SliderValue),',',num2str(pos(2)))) % 顯示目標(biāo)按鈕的位置坐標(biāo)
%--------------------------------------------------------
function local_Vslider(cbo,eventdata,h) % 改變目標(biāo)按鈕的豎直位置
SliderValue = get(cbo,'Value');
pos = get(h.Button,'Position');
set(h.Button,'Position',[pos(1) SliderValue pos(3:4)])
set(h.Button,'String',strcat(num2str(pos(1)),',',num2str(SliderValue))) % 顯示目標(biāo)按鈕的位置坐標(biāo)
%--------------------------------------------------------
function local_Default(cbo,eventdata,h) % 恢復(fù)目標(biāo)按鈕的默認(rèn)位置
defpos = get(h.Button,'UserData');
set(h.Button,'Position',defpos)
set(h.Hslider,'Value',defpos(1))
set(h.Vslider,'Value',defpos(2))
set(h.Button,'String',strcat(num2str(defpos(1)),',',num2str(defpos(2)))) % 顯示目標(biāo)按鈕的位置坐標(biāo)
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -