[原创]：一个捕捉鼠标坐标的小程序

bainhome

其中windowbuttonmotionfcn部分内容参考Genial的思路

1. function GetMousePointer
   
2. global handles
   
3. clc
   
4. close all
   
5. hMainFig=figure('name','鼠标捕捉点坐标','number','off','menubar','none',...
   
6.     'units','normalized','tag','hMainFig');
   
7. set(hMainFig,'units','normalized','position',[.2,.2,.6,.6]);
   
8. set(hMainFig,'defaultuicontrolfontname','隶书');
   
9. set(hMainFig,'defaultuicontrolfontsize',13);
   
10. set(hMainFig,'defaultuicontrolunits','normalized');
    
11. hAxes=axes('position',[.15,.2,.8,.7]);
    
12. ezplot('sin(x)');  
    
13. set(hMainFig,'pointer','cross');  
    
14. set(hMainFig,'WindowButtonMotionFcn',@ShowPointData);  
    
15. hText11=uicontrol(hMainFig,'style','text','position',[.05,.05,.1,.1],'string','x:');
    
16. hText12=uicontrol(hMainFig,'style','text','position',[.15,.05,.25,.1],'tag','hText12');
    
17. hText21=uicontrol(hMainFig,'style','text','position',[.45,.05,.1,.1],'string','y:');
    
18. hText22=uicontrol(hMainFig,'style','text','position',[.55,.05,.25,.1],'tag','hText22');
    
19. handles=guihandles(hMainFig);
    
20. guidata(hMainFig,handles);
    
21. set(hMainFig,'windowButtonDownFcn',@WritePointData)
    
22. 
    
23. function WritePointData(hObject, eventdata, handles)  
    
24. global handles
    
25. p=get(gca,'currentpoint');  
    
26. set(handles.hText12,'string',num2str(p(1)))
    
27. set(handles.hText22,'string',num2str(p(3)))
    
28. 
    
29. function ShowPointData(hObject, eventdata, handles)  
    
30. p=get(gca,'currentpoint');  
    
31. if(isempty(findobj('tag','htext')))  
    
32.    ht=text('tag','htext','string',sprintf('(%g, %g)', p(1), p(3)),'position',[p(1),p(3)]);  
    
33. else  
    
34.    ht = findobj('tag','htext');  
    
35.    set(ht,'string',sprintf('(%g, %g)', p(1), p(3)),'position',[p(1)+.1,p(3)+.1]);  
    
36. end

复制代码

[ 本帖最后由 bainhome 于 2006-9-3 22:27 编辑 ]

eight

原帖由 bainhome 于 2006-9-3 22:08 发表
其中windowbuttonmotionfcn部分内容参考Genial的思路
function GetMousePointer
global handles
clc
close all
hMainFig=figure('name','鼠标捕捉点坐标','number','off','menubar','none',...
    'units ...

一个字，强。不过那个对焦能否与显示的坐标分开一些？因为横坐标是负数时，好像看不到那个“-”

bainhome

修改了，以前见bzzz写过一个smth圆图的GUI，里面有类似鼠标选点的功能，自己没写过。今天正好得空儿，独立做了一个，难度不大，了解*Fcn用法即可。印象比较深的是*Fcn调用的是一个“类”型的函数，这一点也许才是最有价值的...

toes

很好用

jimin

好强呀！赞一个！！

realhappy

不错啊，谢谢楼主。

netboy004

好用，赞一个～

jeremygr

值得好好学习

wangyongq246

　　佩服，我得努力，我也要能做出这样的程序！！！！！！

q214468952

我可看不懂了

leoplough

我也看不懂。最近刚好要做一个史密斯圆图，可以把这功能用上了，谢谢。

gdayang

佩服了，学习ing

gagmeng

楼主,高手啊,认真学习!!!

tcwbest

.这个程序怎么用啊？什么作用啊？

eight

原帖由 tcwbest 于 2008-1-30 04:14 发表
.这个程序怎么用啊？什么作用啊？

运行程序，然后在生成的窗口中单击一下便知