[ARX函数]：如何在UCS下获得当前鼠标位置的座标

XDSoft

下面代码可以获得鼠标位置的UCS下的座标，显示的和ACAD状态栏内的相同，有兴趣可以验证。

用这个函数替换...\ObjectARX\SAMPLES\MFCSAMPS目录下的PRETRANSLATE程序中的filterMouse() 函数，编译后，加载，然后用命令WMOUSE 执行。

2. 
   
3. BOOL filterMouse(MSG *pMsg)
   
4. {
   
5.    if( pMsg->message == WM_MOUSEMOVE )
   
6.    {
   
7.                 acedDwgPoint cpt;
   
8.                 ads_point ptDCS, ptWCS, norm;
   
9.                 AcGePoint3d  origin;
   
10.                 AcGeVector3d e0, e1, e2;
    
11.                 AcGeMatrix3d  matUcs2Wcs, matWcs2Ucs;
    
12. 
    
13.                 // 1: 获得显示座标系下的鼠标位置座标
    
14.                 CPoint cPnt (pMsg->lParam) ;
    
15.                 acedCoordFromPixelToWorld (cPnt, cpt) ;
    
16.                 ads_point_set ( cpt, ptDCS );         
    
17.                 //ads_printf ( "\nMouse in Ucs %f, %f, %f",  ptDCS[X], ptDCS[Y],
    
18. ptDCS[Z] );
    
19.                 //return FALSE;
    
20.                 // 2: 转换鼠标座标从显示座标系到UCS
    
21.                 //
    
22.                 // 使用acdbEcs2Ucs 函数，参数是VIEWDIR 系统变量作为NOMAL向量
    
23.                 // (Sure we have to transform the VIEWDIR value from UCS to WCS
    
24.                 //
    
25.                 struct resbuf rbview;
    
26.                 ads_getvar( "viewdir", &rbview );
    
27.                 ads_point_set( rbview.resval.rpoint, norm );
    
28. 
    
29.                 // If the view direction is 0, 0, 1, then
    
30. acedCoordFromPixelToWorld()
    
31.                 // needs special handling -> we only have to translate the the
    
32. point
    
33.                 // by the distance the origin of the current UCS was moved
    
34.                 double tol = 1e-10;
    
35.                 if ((fabs(norm[X]) < tol) && (fabs(norm[Y]) < tol) &&
    
36. ((fabs(norm[Z]) - 1.0) < tol)) {
    
37.                         AcGePoint3d acadPt;
    
38.                         acadPt.x = cpt[0];
    
39.                         acadPt.y = cpt[1];
    
40.                         acadPt.z = cpt[2];
    
41. 
    
42.                         acdbUcsMatrix ( matUcs2Wcs );                 
    
43.                         matUcs2Wcs.invert();
    
44.                         matUcs2Wcs.getCoordSystem( origin, e0, e1, e2);
    
45. 
    
46.                         acadPt += origin.asVector();
    
47.                         ads_printf ( "\nMouse in Ucs %f, %f, %f",  acadPt[X],
    
48. acadPt[Y], acadPt[Z] );
    
49.                         return FALSE;
    
50.                 }
    
51.                 //转换 VIEWDIR  到 WCS
    
52.                 acdbUcs2Wcs ( norm, norm, Adesk::kTrue );
    
53.                 // 转换鼠标座标从DCS 到 WCS
    
54.                 acdbEcs2Wcs( ptDCS, ptWCS, norm, Adesk::kTrue );
    
55. 
    
56.                 // 3: 获得UCS下鼠标位置的座标
    
57.                 //
    
58.                 // For this we have to project the WCS coordinates to the UCS
    
59. plane using
    
60.                 // VIEWDIR 作投影方向.
    
61.                 //
    
62.                 // 获得 UCS->WCS 转换矩阵
    
63.                 acdbUcsMatrix ( matUcs2Wcs );                 
    
64.                 matUcs2Wcs.getCoordSystem( origin, e0, e1, e2);
    
65.                 // 创建一个当前UCS下的平面
    
66.                 //
    
67.                 AcGePlane thePlane ( origin, e0, e1);
    
68. 
    
69.                 AcGePoint3d  pntMouseInWCS( ptWCS[X], ptWCS[Y], ptWCS[Z] );
    
70.                 AcGeVector3d vecViewdir( norm [X], norm [Y], norm [Z] );
    
71.                 // 投影转换
    
72.                 AcGePoint3d resPnt = pntMouseInWCS.project (thePlane, vecViewdir
    
73. );
    
74.                 // 转换点的座标到UCS.
    
75.                 matWcs2Ucs = matUcs2Wcs.inverse();
    
76.                 resPnt.transformBy ( matWcs2Ucs );
    
77.                 //
    
78.                 //查看ACAD状态行验证
    
79.                 ads_printf ( "\nMouse in Ucs %f, %f, %f",  resPnt[X], resPnt[Y],
    
80. resPnt[Z] );
    
81.         }
    
82.         return FALSE; // continue
    
83. }
    

<br /> BOOL filterMouse(MSG *pMsg)<br /> {<br />    if( pMsg->message == WM_MOUSEMOVE )<br />    {<br />                 acedDwgPoint cpt;<br />                 ads_point ptDCS, ptWCS, norm;<br />                 AcGePoint3d  origin;<br />                 AcGeVector3d e0, e1, e2;<br />                 AcGeMatrix3d  matUcs2Wcs, matWcs2Ucs;<br /> <br />                 // 1: 获得显示座标系下的鼠标位置座标<br />                 CPoint cPnt (pMsg->lParam) ;<br />                 acedCoordFromPixelToWorld (cPnt, cpt) ;<br />                 ads_point_set ( cpt, ptDCS );         <br />                 //ads_printf ( "\nMouse in Ucs %f, %f, %f",  ptDCS[X], ptDCS[Y],<br /> ptDCS[Z] );<br />                 //return FALSE;<br />                 // 2: 转换鼠标座标从显示座标系到UCS<br />                 //<br />                 // 使用acdbEcs2Ucs 函数，参数是VIEWDIR 系统变量作为NOMAL向量<br />                 // (Sure we have to transform the VIEWDIR value from UCS to WCS<br />                 // <br />                 struct resbuf rbview;<br />                 ads_getvar( "viewdir", &rbview );<br />                 ads_point_set( rbview.resval.rpoint, norm );<br /> <br />                 // If the view direction is 0, 0, 1, then<br /> acedCoordFromPixelToWorld()<br />                 // needs special handling -> we only have to translate the the<br /> point<br />                 // by the distance the origin of the current UCS was moved<br />                 double tol = 1e-10;<br />                 if ((fabs(norm[X]) < tol) && (fabs(norm[Y]) < tol) &&<br /> ((fabs(norm[Z]) - 1.0) < tol)) {<br />                         AcGePoint3d acadPt;<br />                         acadPt.x = cpt[0];<br />                         acadPt.y = cpt[1];<br />                         acadPt.z = cpt[2];<br /> <br />                         acdbUcsMatrix ( matUcs2Wcs );                 <br />                         matUcs2Wcs.invert();<br />                         matUcs2Wcs.getCoordSystem( origin, e0, e1, e2);<br /> <br />                         acadPt += origin.asVector();<br />                         ads_printf ( "\nMouse in Ucs %f, %f, %f",  acadPt[X],<br /> acadPt[Y], acadPt[Z] );<br />                         return FALSE;<br />                 }<br />                 //转换 VIEWDIR  到 WCS<br />                 acdbUcs2Wcs ( norm, norm, Adesk::kTrue );<br />                 // 转换鼠标座标从DCS 到 WCS<br />                 acdbEcs2Wcs( ptDCS, ptWCS, norm, Adesk::kTrue );<br /> <br />                 // 3: 获得UCS下鼠标位置的座标<br />                 //<br />                 // For this we have to project the WCS coordinates to the UCS<br /> plane using <br />                 // VIEWDIR 作投影方向.<br />                 //<br />                 // 获得 UCS->WCS 转换矩阵<br />                 acdbUcsMatrix ( matUcs2Wcs );                 <br />                 matUcs2Wcs.getCoordSystem( origin, e0, e1, e2);<br />                 // 创建一个当前UCS下的平面<br />                 //<br />                 AcGePlane thePlane ( origin, e0, e1);<br /> <br />                 AcGePoint3d  pntMouseInWCS( ptWCS[X], ptWCS[Y], ptWCS[Z] );<br />                 AcGeVector3d vecViewdir( norm [X], norm [Y], norm [Z] );<br />                 // 投影转换<br />                 AcGePoint3d resPnt = pntMouseInWCS.project (thePlane, vecViewdir<br /> );<br />                 // 转换点的座标到UCS.<br />                 matWcs2Ucs = matUcs2Wcs.inverse();<br />                 resPnt.transformBy ( matWcs2Ucs );<br />                 //<br />                 //查看ACAD状态行验证<br />                 ads_printf ( "\nMouse in Ucs %f, %f, %f",  resPnt[X], resPnt[Y],<br /> resPnt[Z] );<br />         }<br />         return FALSE; // continue<br /> }<br />

注意：这个函数不能工作在图纸空间，由于acedCoordFromPixelToWorld()全局函数不能在图纸空间内工作。

风中的沙粒

我的编译环境 98 vc6 cad14,编译可以通过,连接会有问题.

风中的沙粒

rxtemplt.obj : error LNK2001: unresolved external symbol "__declspec(dllimport) public: __thiscall AcGePoint2d::AcGePoint2d(double,double)" (__imp_??0AcGePoint2d@@QAE@NN@Z)

XDSoft

最初由 风中的沙粒 发布
[B]rxtemplt.obj : error LNK2001: unresolved external symbol "__declspec(dllimport) public: __thiscall AcGePoint2d::AcGePoint2d(double,double)" (__imp_??0AcGePoint2d@@QAE@NN@Z) [/B]

几何库libacge.lib你加入到PROJECT的LINK里面了吗？

                               
登录/注册后可看大图