[每日一码] 如何定义透明的命令，允许在屏幕四个方向分别PAN半个屏幕

admin

1. 问题： 如何定义透明的命令，允许在屏幕四个方向分别PAN半个屏幕
2. 解决方案：
3. The following code defines a transparent pan command for each of the four main
4. compass directions:
5. #include "rxregsvc.h"
6. #include "aced.h"
7. #include "dbsymtb.h"
8. #include "adscodes.h"
9. // Required for AutoCAD 2000
10. #include "migrtion.h"
11. // Deal with renaming of function in ObjectARX 2000
12. #define acdbSetCurrentView acedSetCurrentView
14. void panleft();
15. void panright();
16. void panup();
17. void pandown();
19. void
20. initApp()
21. {
22.    acedRegCmds->addCommand( "PANNER", // Group name
23.             "panl",                    // Global function name
24.             "panl",                    // Local function name
25.             ACRX采用CMD采用TRANSPARENT,              // Type
26.             &panleft );                           // Function pointer
27.    acedRegCmds->addCommand( "PANNER", // Group name
28.             "panr",                                // Global function name
29.             "panr",                                // Local function name
30.             ACRX采用CMD采用TRANSPARENT,              // Type
31.             &panright );                         // Function pointer
32.    acedRegCmds->addCommand( "PANNER", // Group name
33.             "panu",                               // Global function name
34.             "panu",                               // Local function name
35.             ACRX采用CMD采用TRANSPARENT,              // Type
36.             &panup );                            // Function pointer
37.    acedRegCmds->addCommand( "PANNER", // Group name
38.             "pand",                               // Global function name
39.             "pand",                               // Local function name
40.             ACRX采用CMD采用TRANSPARENT,              // Type
41.             &pandown );                       // Function pointer
42. }
44. void
45. unloadApp()
46. {
47.    acedRegCmds->removeGroup( "PANNER" );
48. }
50. extern "C" AcRx::AppRetCode acrxEntryPoint( AcRx::AppMsgCode msg, void *p )
51. {
52.    switch (msg)
53.    {
54.    case AcRx::kInitAppMsg:
55.             acrxRegisterAppMDIAware(p);
56.             acrxUnlockApplication(p); // try to allow unloading
57.             initApp();
58.             break;
59.    case AcRx::kUnloadAppMsg:
60.             unloadApp();
61.             break;
62.    default:
63.             break;
65.    }
66.    return AcRx::kRetOK;
67. }
69. void
70. getCurrentView( AcDbViewTableRecord &view )
71. {
72.             struct resbuf var;
73.             struct resbuf WCS, UCS, DCS;
74.             WCS.restype = RTSHORT;
75.             WCS.resval.rint = 0;
76.             UCS.restype = RTSHORT;
77.             UCS.resval.rint = 1;
78.             DCS.restype = RTSHORT;
79.             DCS.resval.rint = 2;
81.             ads采用getvar("VIEWMODE", &var);
82.             view.setPerspectiveEnabled(var.resval.rint & 1);
83.    view.setFrontClipEnabled(var.resval.rint & 2 ? true : false);
84.             view.setBackClipEnabled(var.resval.rint & 4 ? true : false);
85.             view.setFrontClipAtEye(!(var.resval.rint & 16));
87.             ads采用getvar("BACKZ", &var);
88.             view.setBackClipDistance(var.resval.rreal);
90.             ads采用getvar("VIEWCTR", &var);
91.             ads采用trans(var.resval.rpoint, &UCS, &DCS, NULL, var.resval.rpoint);
92.             view.setCenterPoint(AcGePoint2d(var.resval.rpoint[X],
93. var.resval.rpoint[Y]));
95.             ads采用getvar("FRONTZ", &var);
96.             view.setFrontClipDistance(var.resval.rreal);
98.             ads采用getvar("LENSLENGTH", &var);
99.             view.setLensLength(var.resval.rreal);
101.             ads采用getvar("TARGET", &var);
102.             ads采用trans(var.resval.rpoint, &UCS, &WCS, NULL, var.resval.rpoint);
103.             view.setTarget(AcGePoint3d(var.resval.rpoint[X], var.resval.rpoint[Y],
104. var.resval.rpoint[Z]));
106.             ads采用getvar("VIEWDIR", &var);
107.             ads采用trans(var.resval.rpoint, &UCS, &WCS, TRUE, var.resval.rpoint);
108.             view.setViewDirection(AcGeVector3d(var.resval.rpoint[X],
109. var.resval.rpoint[Y], var.resval.rpoint[Z]));
111.             ads采用getvar("VIEWSIZE", &var);           
112.             view.setHeight(var.resval.rreal);
113.    double tst = view.width();
114. }
116. void
117. panleft()
118. {
119.    AcDbViewTableRecord view;
120.    getCurrentView( view );
121.    AcGePoint2d viewCen = view.centerPoint();
122.    viewCen[X] = viewCen[X] - ( view.width() / 2 );
123.    view.setCenterPoint( viewCen );
124.    acdbSetCurrentView( &view, NULL );
125. }
127. void
128. panright()
129. {
130.    AcDbViewTableRecord view;
131.    getCurrentView( view );
132.    AcGePoint2d viewCen = view.centerPoint();
133.    viewCen[X] = viewCen[X] + ( view.width() / 2 );
134.    view.setCenterPoint( viewCen );
135.    acdbSetCurrentView( &view, NULL );
136. }
140. 下面是pandown()和panup()的定义函数
144. void
145. pandown()
146. {
147.    AcDbViewTableRecord view;
148.    getCurrentView( view );
149.    AcGePoint2d viewCen = view.centerPoint();
150.    viewCen[Y] = viewCen[Y] - ( view.height() / 2 );
151.    view.setCenterPoint( viewCen );
152.    acdbSetCurrentView( &view, NULL );
153. }
155. void
156. panup()
157. {
158.    AcDbViewTableRecord view;
159.    getCurrentView( view );
160.    AcGePoint2d viewCen = view.centerPoint();
161.    viewCen[Y] = viewCen[Y] + ( view.height() / 2 );
162.    view.setCenterPoint( viewCen );
163.    acdbSetCurrentView( &view, NULL );
164. }

复制代码