中華民國萬萬歲

 
%scrip17_1.m  事件處理範例


figure('Position',[80 80 270 150],'Menubar','none');
h_close=uicontrol('String','close');
h_white=uicontrol('String','white','Position',[20 80 60 20]);
h_red=uicontrol('String','red','Position',[20 110 60 20]);
h_blue=uicontrol('String','blue','Position',[20 50 60 20]);
h_txt=uicontrol('Style','text','Position',[100 20 150 110]);


cmd1='set(h_txt,''BackgroundColor'',''white'')'; %10~12 set callback content
cmd2='set(h_txt,''BackgroundColor'',''red'')';
cmd3='set(h_txt,''BackgroundColor'',''blue'')';


%set(h_close,'Callback','close');         %直接關掉選單
set(h_close,'Callback','close_check');    % 配合close_check副程式。
set(h_white,'Callback',cmd1);             % 14~18 set ui callback
set(h_blue,'callback',cmd3);
set(h_red,'callback',cmd2);


並配合副程式 close_check.m

%close_check.m  , 關閉_事件處理副程式
result=questdlg('是否關閉?','Window closing','Yes','No','No');
if strcmp(result,'Yes') %
    close 
end