mousefrm.m
上传用户:haiyisale
上传日期:2013-01-09
资源大小:3246k
文件大小:1k
- function mousefrm(h,forme)
- %MOUSEFRM Change mouse aspect.
- % MOUSEFRM(H,F)
- % H = vector of handles (figures or root).
- % F = string for pointer aspect : 'arrow', 'watch', ....
- % MOUSEFRM(H) is equivalent to MOUSEFRM(H,'arrow').
- % MOUSEFRM is equivalent to MOUSEFRM(0,'arrow').
- % M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 01-May-96.
- % Last Revision: 01-Jun-1998.
- % Copyright 1995-2002 The MathWorks, Inc.
- % $Revision: 1.12 $
- if nargin==0 , forme = 'arrow'; h = 0;
- elseif nargin==1 , forme = 'arrow';
- end
- allfig = wfindobj('figure');
- if any(h)
- hind = wcommon(h,allfig);
- h = h(hind);
- else
- h = allfig;
- end
- set(h,'Pointer',forme);