function tmouse2(action)
A=imread('e:\a.jpg');
imshow(A);
global Xall Yall N InitialX InitialY FigHandle
% TMOUSE 本例展示如何以Handle Graphics来设定滑鼠事件(Mouse
% Events)的反应指令(Callbacks)
if nargin == 0, action = 'start'; end
switch(action)
% 开启图形视窗
case 'start',
% 设定滑鼠按钮被按下时的反应指令为「tmouse down」
set(gcf, 'WindowButtonDownFcn', 'MouseDraw down');
FigHandle = figure('WindowButtonDownFcn','MouseDraw down');
% 滑鼠按钮被按下时的反应指令
case 'down',
if strcmp(get(FigHandle, 'SelectionType'), 'normal')
set(FigHandle,'pointer','hand');
CurPiont = get(gca, 'CurrentPoint');
InitialX = CurPiont(1,1);
InitialY = CurPiont(1,2);
% 设定滑鼠移动时的反应指令为「tmouse move」
set(gcf, &#