figure的响应回调函数

原文地址：http://blog.sina.com.cn/s/blog_6163bdeb0100n8r7.html

figure有一些回调函数，可以增加figure对象的用户交互性。如CreateFcn、DeleteFcn、CloseRequestFcn、ResizeFcn等，顾名思义，他们分别是在figure对象在创建、删除、关闭请求、改变大小时的回调函数，如果有相应功能要求，可以相应添加响应函数。

还有一些更常用的，如ButtonDownFcn、KeyPressFcn、KeyReleaseFcn是响应在figure对象上（没有在UI子对象上）鼠标响应、按键响应，还有响应前面加Window的函数，如

他们是响应在UI子对象上的按键、鼠标响应。

对于鼠标响应：

其设置回调函数如下

h = figure;

set(h,'windowbuttondownfcn',{@btndown_fcn,a,b});

 

function btndown_fcn(h,evt,a,b)

cp = get(haxes,'CurrentPoint');
xinit = cp(1,1);

yinit = cp(1,2);

…

end

注意的地方：

btndown_fcn为鼠标单击响应回调函数，后面的a、b为额外传递给函数的参数，而回调函数默认应该有两个参数，h表示触发鼠标点击的figure，evt为一个事件结构；

 

回调函数内部常常用如上的语句，这是得到子坐标系对象中鼠标点击点的位置坐标cp，常为2*3的矩阵，第一列为x、y、z坐标值，第二列在二维坐标系中常常和第一列一样，对于当前坐标系可以直接使用语句

cp = get(gca,'CurrentPoint');

得到坐标点的值，否则还要利用其他方法传过来坐标系的句柄；

 

对于鼠标类型，可以通过figure的SelectionType属性得到，如下的方式

get(h,'SelectionType')

共有4种类型，分别为normal、extend、alternate和open，分别代表的意义为

normal---单击鼠标左键

extend---按住shift的同时单击鼠标左键，或左右键同时按

alternate---按住ctrl的同时单击鼠标左键，或单击右键

open---双击

上面是microsoft windows系统的意义，对X-windows略有不同，

另外，对于uicontrol控件，有如下说明

 

另两个鼠标响应同理。

 

以help中的example为例

function window_motion_test
figure('WindowButtonDownFcn',@wbdcb)
ah = axes('DrawMode','fast');
axis ([1 10 1 10])
title('Click and drag')
  function wbdcb(src,evnt) % 单击鼠标响应回调函数
     if strcmp(get(src,'SelectionType'),'normal') % 通过比较得到何种鼠标响应
        set(src,'pointer','circle')
        cp = get(ah,'CurrentPoint'); % 得到点击点的坐标
        xinit = cp(1,1);yinit = cp(1,2);
        hl = line('XData',xinit,'YData',yinit,...
        'Marker','p','color','b');
        set(src,'WindowButtonMotionFcn',@wbmcb) % 鼠标移动响应回调函数
        set(src,'WindowButtonUpFcn',@wbucb) % 鼠标抬起响应回调函数
     end
 
        function wbmcb(src,evnt) % 在有些系统中，当figure对象被创建的时候，会触发鼠标移动响应
           cp = get(ah,'CurrentPoint');
           xdat = [xinit,cp(1,1)];
           ydat = [yinit,cp(1,2)];
           set(hl,'XData',xdat,'YData',ydat);

           drawnow % 注意如果在鼠标按下和移动响应函数中，调用了drawnow的语句或包含它的函数，而

                   % 且figure的Interruptible属性又设为off的话，鼠标抬起响应将不会发生，如果不想

                   % 这样，可以改变Interruptible为on
        end
  
        function wbucb(src,evnt)
           if strcmp(get(src,'SelectionType'),'alt')
              set(src,'Pointer','arrow')
              set(src,'WindowButtonMotionFcn','')
              set(src,'WindowButtonUpFcn','') % 可以设置鼠标响应为直接的语句，如

                                              % set(src,'WindowButtonUpFcn','clc;x=1';')
           else
              return
           end
        end
  end
end

上面的响应函数书写形式是很好的形式，因为这样可以避免变量的传递，如wbmcb函数中可以直接设置hl，避免了向回调函数传递参数或使用全局变量，当然，如果要传递数据过多时，使用全局变量或使用figure的UserData还是不错的选择。

 

上面程序的效果为单击鼠标，移动鼠标产生点、线，单击鼠标右键结束连线，如下