[每日一码] 裁剪命令xclip只能用于块插入，外部块参考；换种方法，可以实现对所有实体集的裁剪

admin

1. /*
2. 本程序的步骤及方法 备忘录:
3.   1 多边形选择实体("CP")
4.   2 建立匿名块，将以上选择集，克隆到匿名块中
5.   3 在与块定义重合的位置，插入块引用
6.   4 以多边形的点集，组成裁剪平面,给块引用加与裁剪相关的扩展词典,
7.     实现与命令xclip相同的对块引用的裁剪
8.   5 沿裁剪边界，绘制边界多义线，以便可以对边界修改为双点划线等
9.   6 点取放大图移出点及放大倍数,将以上裁剪后的块引用及边界多义线，进行平移，放大变换。
10.     这样，就完成了局部放大图的操作。
11.   注:xclip仅对块引用及外部参考进行裁剪操作。本程序克服了这一限制，可以对任何实体集进行裁剪操作
12. */
13. //代替命令:xclip,生成局部放大图
14. void all采用clip()
15. {
16.         acutPrintf("\n----裁剪，生成局部放大图:");
17.         //1 设置xclip不画边界线
18.         acedCommand(RTSTR,"setvar",
19.                 RTSTR,"xclipframe",
20.                 RTSTR,"0",
21.                 0);
22.         //正交，让点取线为水平或垂直
23.         acedCommand(RTSTR,"setvar",
24.                 RTSTR,"orthomode",
25.                 RTSTR,"1",
26.                 0);
28.         //2 取边界点
29.     //pt0:块的定义点，及引用的插入点
30.     ads采用point pt0;
31.         ads采用point pt1,pt2;
32.     AcGePoint2dArray pts;
33.         acutPrintf("\n点选区域点:");
34.     if (acedGetPoint(NULL,采用T("\n第1点:"),pt1)!=RTNORM)
35.         {
36.                 acutPrintf("\n用户取消!");
37.             //取消正交
38.             acedCommand(RTSTR,"setvar",
39.                 RTSTR,"orthomode",
40.                 RTSTR,"0",
41.                 0);
42.         //
43.         return;
44.         }
45.         ads采用point采用set(pt1,pt0);//pt0=pt1
46.     pts.append(asPnt2d(pt1));
47.         int es0;
48.     while ((es0=acedGetPoint(pt1,采用T("\n下一点<回车,结束取点>:"),pt2))==RTNORM)
49.     {
50.                 //画临时线,作为标志
51.         acedGrDraw(pt1,pt2,1,1);
52.         pts.append(asPnt2d(pt2));
53.         ads采用point采用set(pt2,pt1);//pt1=pt2
54.     }
55.         if(es0==RTCAN)
56.         {
57.                 acutPrintf("\n用户取消!");
58.                 //取消正交
59.                 acedCommand(RTSTR,"setvar",
60.                         RTSTR,"orthomode",
61.                         RTSTR,"0",
62.                         0);
63.                 return;
64.         }
65.         //取消正交
66.         acedCommand(RTSTR,"setvar",
67.                 RTSTR,"orthomode",
68.                 RTSTR,"0",
69.                 0);
70.     //起点与终点重合时，仅记作起点
71.         if(pts[0].isEqualTo(pts[pts.logicalLength()-1])==Adesk::kTrue)
72.         {
73.        pts.removeLast();
74.         }
75.     //为斜线两点时，作为矩形选择框。但水平或垂直时除外
76.     if (pts.length() == 2)
77.     {
78.                 if((fabs(pts[0].x-pts[1].x)<0.0001)||(fabs(pts[0].y-pts[1].y)<0.0001))
79.                 {
80.                     acutPrintf("\n边界不能仅为单个水平或垂直线!");
81.                         return;
82.                 }
83.                 else
84.                 {
85.                         AcGePoint2d p1(pts[1].x, pts[0].y);
86.                         AcGePoint2d p3(pts[0].x, pts[1].y);
87.                         pts.insertAt(1, p1);
88.                         pts.insertAt(3, p3);
89.                 }
90.         }
91.     //多边形不能少于3点
92.         if(pts.length() < 3)
93.         {
94.                 acutPrintf("\n边界点数太少!");
95.                 return;
96.         }
97.         //最后线设置为平行或垂直
98.         if(fabs(pts[0][0]-pts[pts.logicalLength()-1][0])<fabs(pts[0][0]-pts[pts.logicalLength()-1][0]))
99.         {
100.        pts[pts.logicalLength()-1][0]=pts[0][0];
101.         }
102.     else
103.         {
104.        pts[pts.logicalLength()-1][1]=pts[0][1];
105.         }
106.         //闭合起点与终点，画临时直线
107.     acedGrDraw(asDblArray(pts[0]),asDblArray(pts[pts.logicalLength()-1]),1,1);
109.         //3 多边形交叉选择实体:CP
110.         //3.1 建立多边形点链表
111.         ads采用name ss={0L,0L};
112.     struct resbuf *pointList=NULL;
113.     struct resbuf *nextNode=NULL;
114.     for(int i=0;i<pts.logicalLength();i++)
115.         {
116.                 //点表
117.         struct resbuf *newNode=acutNewRb(RTPOINT);
118.         ads采用point采用set(asDblArray(pts[i]),newNode->resval.rpoint);//(from,to)
119.                 if(pointList==NULL)
120.                 {
121.            pointList=newNode;
122.            nextNode=newNode;
123.                 }
124.                 else
125.                 {
126.            nextNode->rbnext=newNode;
127.            nextNode=newNode;
128.                 }  
129.         }
130.         //3.2 多边形选择:"CP"
131.         if(acedSSGet("CP",pointList,NULL,NULL,ss)!=RTNORM)
132.         {
133.                 acutRelRb(pointList);
134.                 acutPrintf("\n错误退出!");
135.                 return;
136.         }
137.     acutRelRb(pointList);
139.         //4 输入插入点，放大倍数
140.         AcGePoint3d insPt;
141.     if (acedGetPoint(pt1,采用T("\n输入放大图的插入点:"),asDblArray(insPt))!=RTNORM)
142.         {
143.                 acutPrintf("\n用户取消!");
144.                 acedSSFree(ss);
145.         return;
146.         }
147.         double scl=1;
148.         acedInitGet(RSG采用NOZERO+RSG采用NONEG,NULL);//非0，非负
149.     if ((es0=acedGetReal(采用T("\n输入放大倍数<1>:"),&scl))!=RTNORM)
150.         {
151.                 if(es0==RTNONE)
152.                 {
153.                         scl=1.0;
154.                 }
155.                 else
156.                 {
157.                    acutPrintf("\n用户取消!");
158.                    acedSSFree(ss);
159.            return;
160.                 }
161.         }
162.     acedRedraw(NULL,0);
164.         //5 并生成匿名块定义，并将选择的实体，拷贝到匿名块定义中
165.         //5.1 生成匿名块定义
166.         AcDbBlockTable* pBT=NULL;
167.     acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBT,AcDb::kForWrite);
168.         AcDbBlockTableRecord* pBTRec=new AcDbBlockTableRecord();
169.         AcDbObjectId myBTRecId;
170.     pBT->add(myBTRecId,pBTRec);
171.         pBT->close();
172.         pBTRec->setOrigin(asPnt3d(pt0));
173.     pBTRec->setName("*U");//匿名
174.     //5.2 将选择的实体，克隆到块定义中
175.     long nLen;
176.         acedSSLength(ss,&nLen);
177.         AcDbObjectIdArray m采用objId采用arr;
178.         for(i=0;i<nLen;i++)
179.         {
180.                 ads采用name ent;
181.                 acedSSName(ss,i,ent);
182.                 AcDbObjectId objId;
183.                 acdbGetObjectId(objId,ent);
184.         m采用objId采用arr.append(objId);
186.         }
187.         acedSSFree(ss);
188.     pBTRec->close();
189.         AcDbIdMapping idMap;
190.     if(acdbHostApplicationServices()->workingDatabase()->deepCloneObjects(m采用objId采用arr,myBTRecId,idMap)!=Acad::eOk)
191.         {
192.                 acutPrintf("\n将选择的实体克隆到块定义中，失败!");
193.                 return;
194.         }
196.         //6 在选择的实体相同处,插入块引用
197.         //6.1  设置插入点，旋转角度，比例等等  
198.         AcDbBlockReference *pMyRef =new AcDbBlockReference() ;  
199.         pMyRef->setBlockTableRecord (myBTRecId) ;  
200.         pMyRef->setScaleFactors(AcGeScale3d(1,1,1));
201.         pMyRef->setPosition(asPnt3d(pt0)) ;  
202.         pMyRef->setRotation (0.0) ;  
203.         //6.2 将块引用，加入模型空间块表记录  
204.         AcDbBlockTable *pBlockTable=NULL ;  
205.         acdbHostApplicationServices()->workingDatabase()->getBlockTable (pBlockTable, AcDb::kForRead) ;  
206.         AcDbBlockTableRecord *pBlockTableRecord ;  
207.         pBlockTable->getAt (ACDB采用MODEL采用SPACE, pBlockTableRecord,AcDb::kForWrite) ;  
208.         pBlockTable->close () ;  
209.         AcDbObjectId myRefId;
210.         pBlockTableRecord->appendAcDbEntity(myRefId,pMyRef);
211.     pMyRef->close();
213.         //7 用以上的选择框，建立多义线,作为外框线，并进行与块引用相同的移动，放大变换
214.         AcDbPolyline* pPLine=new AcDbPolyline();
215.     for(i=0;i<pts.logicalLength();i++)
216.         {
217.        pPLine->addVertexAt(i,pts[i]);
218.         }
219.         pPLine->setClosed(Adesk::kTrue);
220.     AcGeMatrix3d matPLine;
221.         matPLine.setTranslation(insPt-asPnt3d(pt0));//平移
222.     pPLine->transformBy(matPLine);
223.     matPLine.setToScaling(scl,insPt);//放大
224.     pPLine->transformBy(matPLine);
225.         AcDbObjectId plineId;
226.         pBlockTableRecord->appendAcDbEntity(plineId,pPLine);
227.     pPLine->close();
228.         pBlockTableRecord->close();
230.         //8 对以上块引用，加裁剪处理(与xclip命令相同的功能)
231.     AcDbObjectPointer<AcDbBlockReference> pRef(myRefId,AcDb::kForRead);
232.     if (pRef.openStatus()!=Acad::eOk)
233.     {
234.         acutPrintf(采用T("Not an xref!\n"));
235.         return;
236.     }
237.     //从WCS转换为ECS
238.     AcGeMatrix3d mat(pMyRef->blockTransform());
239.     mat.invert();
240.     AcGePoint2dArray ecsPts;
241.         for(i=0;i<pts.logicalLength();i++)
242.         {
243.                 AcGePoint3d pt(AcGePoint3d(pts[i].x,pts[i].y,0));
244.         //pt.transformBy(mat);
245.         ecsPts.append(AcGePoint2d(pt.x,pt.y));
246.         }
247.         //求其它参数
248.     AcDbDatabase* pDb = acdbHostApplicationServices()->workingDatabase();
249.     AcGeVector3d normal;
250.     double elev;
251.     if (pDb->tilemode())//=1,模型空间
252.     {
253.         normal = pDb->ucsxdir().crossProduct(pDb->ucsydir());
254.         elev = pDb->elevation();
255.     }
256.     else //=0,图纸空间
257.     {
258.         normal = pDb->pucsxdir().crossProduct(pDb->pucsydir());
259.         elev = pDb->pelevation();
260.     }
261.     normal.normalize();
262.         //升级打开方式:写
263.     Acad::ErrorStatus es = pRef.object()->upgradeOpen();
264.     if (es !=Acad::eOk)
265.         {
266.                 acutPrintf("\n写打开失败!");
267.         return;
268.         }
269.     //建立过滤对象
270.     AcDbSpatialFilter* pFilter = new AcDbSpatialFilter;
271.         //设置
272.         /*
273.     if (pFilter->setDefinition(ecsPts,normal,elev,
274.         ACDB采用INFINITE采用XCLIP采用DEPTH,-ACDB采用INFINITE采用XCLIP采用DEPTH,true)!=Acad::eOk)
275.     {
276.         delete pFilter;
277.         return;
278.     }
279.         */
280.     if (pFilter->setDefinition( ecsPts,AcGeVector3d(0,0,1),0.0,
281.         ACDB采用INFINITE采用XCLIP采用DEPTH,
282.         -ACDB采用INFINITE采用XCLIP采用DEPTH,true)!=Acad::eOk)
283.    {
284.         delete pFilter;
285.                 acutPrintf("\n退出!");
286.         return;
287.     }
288.     // 加扩展管理
289.     //add it to the extension dictionary of the block reference
290.     //the AcDbIndexFilterManger class provides convenient utility functions
291.     if (AcDbIndexFilterManager::addFilter(pRef.object(),pFilter)!=Acad::eOk)
292.         {
293.         delete pFilter;
294.                 acutPrintf("\n退出!");
296.                 return;
297.         }
298.     else
299.     {
300.         acutPrintf(采用T("Filter has been succesfully added!\n"));
301.         pFilter->close();
302.     }
304.         //9 裁剪块引用,从原点平移，放大转换
305.     pRef->setScaleFactors(AcGeScale3d(scl,scl,scl));
306.         pRef->setPosition(insPt) ;         
307.     acutPrintf("\n裁剪，生成局部放大图，成功!");
308. }

复制代码