%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