dirmov.m

来自「有关matlab r2007的实用教程」· M 代码 · 共 14 行

function dirmov(direction);
switch direction
   case  'start'
     set(gcbf,'WindowButtonMotionFcn','dirmov move');
     set(gcbf,'WinowButtonUpFcn','dirmov stop')
   case  'move'
     c_p=get(gca,'currentpoint');
     line(c_p(:,1),c_p(:,2),'Marker','*','clipping','on',...
         'erasemode','background')
   case  'stop'
     set(gcbf,'WindowButtonMotionFcn');
     set(gcbf,'WindowButtonUpFcn')
end