Object_Arx实用函数收集汇总

Love-Lisp

[ 本帖最后由 Love-Lisp 于 2013-9-12 09:55 编辑 ]\n\n搜集的一些Object_Arx实用函数，初学者学习arx代码的好范例！

1. //添加Hatch
   
2. AcDbObjectId CreateHatch(
   
3. AcDbObjectId dbOId,
   
4. char cLayer[],
   
5. char cPattern[] = "SOLID",
   
6. int nColor = 256,
   
7. double dAngle = 0.0,
   
8. double dScale = 1.0,
   
9. AcDbDatabase * pDbDatab = acdbHostApplicationServices()->workingDatabase())
   
10. {
    
11. AcCmColor CmC;
    
12. AcDbObjectId DbOId;
    
13. AcDbObjectIdArray DbOIdA(0, 2);
    
14. AcDbBlockTable * pDbBT;
    
15. AcDbBlockTableRecord * pDbBTR;
    
16. AcGeVector3d normal(0.0, 0.0, 1.0);
    
17. 
    
18. DbOIdA.append(dbOId);
    
19. 
    
20. AcDbHatch* pDbHat = new AcDbHatch();
    
21. 
    
22. pDbHat->setDatabaseDefaults();
    
23. 
    
24. pDbHat->setAssociative(Adesk::kTrue); // BUG: doesn't do squat! have to set the reactor yourself to get associativity!
    
25. 
    
26. pDbHat->appendLoop(AcDbHatch::kExternal, DbOIdA);
    
27. 
    
28. pDbHat->setPatternScale(dScale);
    
29. 
    
30. pDbHat->setPatternAngle(dAngle);
    
31. 
    
32. pDbHat->setPattern(AcDbHatch::kPreDefined, cPattern);
    
33. 
    
34. pDbHat->setNormal(normal);
    
35. 
    
36. pDbHat->evaluateHatch(); // crucial call or nothing gets displayed!
    
37. 
    
38. pDbDatab->getSymbolTable(pDbBT, AcDb::kForRead);
    
39. 
    
40. pDbBT->getAt(ACDB_MODEL_SPACE, pDbBTR, AcDb::kForWrite);
    
41. 
    
42. pDbBTR->appendAcDbEntity(DbOId, pDbHat);
    
43. 
    
44. pDbHat->setLayer(cLayer);
    
45. 
    
46. CmC.setColorIndex(nColor);
    
47. 
    
48. ((AcDbEntity *)pDbHat)->setColor(CmC);
    
49. 
    
50. pDbBT->close();
    
51. 
    
52. pDbBTR->close();
    
53. 
    
54. pDbHat->close();
    
55. 
    
56. return DbOId;
    
57. 
    
58. }
    
59. 
    
60. //************************************************************************
    
61. //函数名称:drawDonutAtPoint
    
62. //函数类型:void
    
63. //返回值:
    
64. //功能描述:
    
65. //函数作者:Darcy
    
66. //创建日期:2003-x-x
    
67. //参数列表:
    
68. //变量名:nPt 变量类型:const AcGePoint2d& 变量说明:中点
    
69. //变量名:nRadius 变量类型:const double 变量说明:半径
    
70. //************************************************************************
    
71. void drawDonutAtPoint(const AcGePoint2d& nPt,const double nRadius)
    
72. {
    
73. AcGePoint2d pt;
    
74. AcDbPolyline * pPline = new AcDbPolyline(2);
    
75. 
    
76. pt = nPt;
    
77. 
    
78. pt.x -= nRadius;
    
79. 
    
80. pPline->addVertexAt( 0 , pt , 1.0 , nRadius*2.0 , nRadius*2.0);
    
81. 
    
82. pt.x += nRadius * 2.0;
    
83. 
    
84. pPline->addVertexAt( 1 , pt , 1.0 , nRadius*2.0 , nRadius*2.0);
    
85. 
    
86. pPline->setClosed(Adesk::kTrue);
    
87. 
    
88. //添加到当前数据库：
    
89. addToCurrentSpaceAndClose(pPline);
    
90. 
    
91. }
    
92. 
    
93. 我也跟几贴，得点爱心币，互相交流
    
94. //得到指定层上的所有实体
    
95. Acad::ErrorStatus CDrawFunction::getAllEntity(AcDbDatabase *pDb,AcDbObjectIdArray& IdArr,
    
96. const AcArray& layerNameArr)
    
97. {
    
98. Acad::ErrorStatus es=Acad::eOk;
    
99. ASSERT(pDb);
    
100. if(pDb==NULL)
     
101. return Acad::eInvalidInput;
     
102. AcDbBlockTable *pBlkTable=NULL;
     
103. if((es=pDb->getBlockTable(pBlkTable,AcDb::kForRead))!=Acad::eOk)//打开块表
     
104. {
     
105. acedAlert("打开块表失败");
     
106. return es;
     
107. }
     
108. AcDbBlockTableRecord *pBlkTableRecord=NULL;
     
109. if((es=pBlkTable->getAt(ACDB_MODEL_SPACE,pBlkTableRecord,AcDb::kForRead))!=Acad::eOk)//打开块表记录
     
110. {
     
111. acedAlert("打开块表记录失败");
     
112. pBlkTable->close();
     
113. return es;
     
114. }
     
115. pBlkTable->close();//关闭块表
     
116. 
     
117. AcDbBlockTableRecordIterator *pIterator=NULL; //创建叠代器
     
118. if((es=pBlkTableRecord->newIterator(pIterator))!=Acad::eOk)
     
119. {
     
120. pBlkTableRecord->close();
     
121. return es;
     
122. }
     
123. 
     
124. CAcModuleResourceOverride resoverride;
     
125. CProgressDlg progress;
     
126. progress.Create();
     
127. progress.SetPos(0);
     
128. progress.SetWindowText("正在检测图形中所有实体...");
     
129. 
     
130. for(pIterator->start();!pIterator->done();pIterator->step())//遍历整个数据库
     
131. {
     
132. AcDbEntity *entity=NULL;
     
133. es=pIterator->getEntity(entity,AcDb::kForRead); //打开实体
     
134. 
     
135. if(es==Acad::eLockViolation)
     
136. {
     
137. acedAlert("内存锁定");
     
138. }
     
139. else if(es==Acad::eWasOpenForWrite)
     
140. {
     
141. acedAlert("实体以写方式打开");
     
142. }
     
143. else if(es==Acad::eWasOpenForRead)
     
144. {
     
145. acedAlert("实体以读方式打开");
     
146. }
     
147. else
     
148. {
     
149. if(layerNameArr.contains(entity->layer()))
     
150. IdArr.append(entity->objectId());
     
151. entity->close();
     
152. }
     
153. progress.StepIt();
     
154. }
     
155. delete pIterator;pIterator=NULL;
     
156. pBlkTableRecord->close();
     
157. acutPrintf("eend");
     
158. return es;
     
159. }
     
160. 
     
161. //得到指定层上指定颜色的所有实体
     
162. Acad::ErrorStatus CDrawFunction::getAllEntity(AcDbDatabase *pDb,AcDbObjectIdArray& IdArr,
     
163. const AcArray& layerNameArr,Adesk::UInt16 colorIndex)
     
164. {
     
165. Acad::ErrorStatus es=Acad::eOk;
     
166. ASSERT(pDb);
     
167. if(pDb==NULL)
     
168. return Acad::eInvalidInput;
     
169. AcDbBlockTable *pBlkTable=NULL;
     
170. if((es=pDb->getBlockTable(pBlkTable,AcDb::kForRead))!=Acad::eOk)//打开块表
     
171. {
     
172. acedAlert("打开块表失败");
     
173. return es;
     
174. }
     
175. AcDbBlockTableRecord *pBlkTableRecord=NULL;
     
176. if((es=pBlkTable->getAt(ACDB_MODEL_SPACE,pBlkTableRecord,AcDb::kForRead))!=Acad::eOk)//打开块表记录
     
177. {
     
178. acedAlert("打开块表记录失败");
     
179. pBlkTable->close();
     
180. return es;
     
181. }
     
182. pBlkTable->close();//关闭块表
     
183. 
     
184. AcDbBlockTableRecordIterator *pIterator=NULL; //创建叠代器
     
185. if((es=pBlkTableRecord->newIterator(pIterator))!=Acad::eOk)
     
186. {
     
187. pBlkTableRecord->close();
     
188. return es;
     
189. }
     
190. 
     
191. CAcModuleResourceOverride resoverride;
     
192. CProgressDlg progress;
     
193. progress.Create();
     
194. progress.SetPos(0);
     
195. progress.SetWindowText("正在检测图形中所有实体...");
     
196. 
     
197. for(pIterator->start();!pIterator->done();pIterator->step())//遍历整个数据库
     
198. {
     
199. AcDbEntity *entity=NULL;
     
200. if((es=pIterator->getEntity(entity,AcDb::kForRead))!=Acad::eOk)//打开实体
     
201. {
     
202. delete pIterator;pIterator=NULL;
     
203. pBlkTableRecord->close();
     
204. return es;
     
205. }
     
206. if(layerNameArr.contains(entity->layer())&&entity->colorIndex()==colorIndex)
     
207. IdArr.append(entity->objectId());
     
208. entity->close();
     
209. progress.StepIt();
     
210. }
     
211. delete pIterator;pIterator=NULL;
     
212. pBlkTableRecord->close();
     
213. return es;
     
214. }
     
215. 
     
216. //得到图形中所有的层
     
217. Acad::ErrorStatus CDrawFunction::getAllLayerName(AcDbDatabase *pDb,CStringArray& layerArray)
     
218. {
     
219. Acad::ErrorStatus es=Acad::eOk;
     
220. if(pDb==NULL)
     
221. return Acad::eInvalidInput;
     
222. layerArray.RemoveAll();
     
223. AcDbLayerTable *pLayerTable=NULL;
     
224. if((es=pDb->getSymbolTable(pLayerTable,AcDb::kForRead))!=Acad::eOk)
     
225. {
     
226. pLayerTable->close();
     
227. return es;
     
228. }
     
229. //创建一个层表迭代器
     
230. AcDbLayerTableIterator *pLayerTableIterator;
     
231. pLayerTable->newIterator(pLayerTableIterator);
     
232. pLayerTable->close();
     
233. 
     
234. char *pLayerName=NULL;
     
235. CString name;
     
236. for(int i=0;!pLayerTableIterator->done();pLayerTableIterator->step(),i++)
     
237. {
     
238. AcDbLayerTableRecord *pLayerTableRecord=NULL;
     
239. pLayerTableIterator->getRecord(pLayerTableRecord,AcDb::kForRead);
     
240. pLayerTableRecord->getName(pLayerName);
     
241. name.Format("%s",pLayerName);
     
242. pLayerTableRecord->close();
     
243. layerArray.Add(name);
     
244. 
     
245. }
     
246. 
     
247. if(pLayerName) acutDelString(pLayerName);
     
248. delete pLayerTableIterator;pLayerTableIterator=NULL;
     
249. return es;
     
250. }
     
251. 
     
252. 
     
253. //*************根据线形名得到线型ID********************//
     
254. //******************************************************//
     
255. BOOL CDrawFunction::getLinetypeIdFromString(const char* str, AcDbObjectId& id)
     
256. {
     
257. //----查找安装目录----//
     
258. CString AcadInstallPath;
     
259. FindAcadInstallPath(AcadInstallPath);
     
260. CString File=AcadInstallPath+"\\linetype\\user.lin";
     
261. //-----查找完毕--------//
     
262. ASSERT(str!=NULL);
     
263. AcDbLinetypeTable *pLinetypeTable;
     
264. acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);
     
265. Acad::ErrorStatus mess;
     
266. mess=pLinetypeTable->getAt(str,id);
     
267. if(mess==Acad::eKeyNotFound||mess==Acad::ePermanentlyErased)
     
268. {
     
269. pLinetypeTable->close();
     
270. Acad::ErrorStatus error;
     
271. 
     
272. error=acdbLoadLineTypeFile(str,File.GetBuffer(0),acdbHostApplicationServices()->workingDatabase());
     
273. if(error==Acad::eNullObjectPointer)
     
274. {
     
275. AcDbLinetypeTable *pLinetypeTable;
     
276. acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);
     
277. pLinetypeTable->getAt("CONTINUOUS", id);
     
278. pLinetypeTable->close();
     
279. return FALSE;
     
280. }
     
281. else if(error==Acad::eFileSystemErr)
     
282. {
     
283. AfxMessageBox("the specified file cannot be opened");
     
284. return FALSE;
     
285. }
     
286. else if(error==Acad::eUndefinedLineType)
     
287. {
     
288. AcDbLinetypeTable *pLinetypeTable;
     
289. acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);
     
290. AfxMessageBox("the linetype name specified by ltname is not found in the file");
     
291. pLinetypeTable->getAt("CONTINUOUS", id);
     
292. pLinetypeTable->close();
     
293. return TRUE;
     
294. }
     
295. AcDbLinetypeTable *pLinetypeTable;
     
296. acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);
     
297. pLinetypeTable->getAt(str,id);
     
298. pLinetypeTable->close();
     
299. return TRUE;
     
300. }
     
301. pLinetypeTable->close();
     
302. return TRUE;
     
303. }
     
304. 
     
305. 
     
306. 
     
307. void CDrawFunction::FindAcadInstallPath(CString &AcadInstallPath)
     
308. {
     
309. //查找样式目录安装路径
     
310. TCHAR AcadPath[255];
     
311. HKEY hKey;
     
312. if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,TEXT("SOFTWARE\\线路处开发组\\RDS2002\\1.00"),0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
     
313. {
     
314. ::AfxMessageBox("注册路径不对");
     
315. return ;
     
316. }
     
317. DWORD dwDataType=REG_SZ;
     
318. DWORD dwLength=255;
     
319. LONG lRet=RegQueryValueEx(hKey,TEXT("path"),NULL,NULL,(LPBYTE)AcadPath,&dwLength);
     
320. RegCloseKey(hKey);
     
321. if(lRet!=ERROR_SUCCESS)
     
322. {
     
323. acutPrintf("Read failed\n");
     
324. return ;
     
325. }
     
326. //-----查找完毕--------//
     
327. AcadInstallPath.Format("%s",AcadPath);
     
328. }
     
329. 
     
330. AcDbObjectId CDrawFunction::createTextStyle(CString fontName,CString bigFontName,CString textStyleName)
     
331. {
     
332. AcGiTextStyle *TextStyle=new AcGiTextStyle
     
333. (fontName,
     
334. bigFontName,
     
335. 0,
     
336. 0.67,
     
337. 0,
     
338. 0,
     
339. Adesk::kFalse,
     
340. Adesk::kFalse,
     
341. Adesk::kFalse,
     
342. Adesk::kFalse,
     
343. Adesk::kFalse,
     
344. textStyleName); //字体名
     
345. AcDbObjectId textStyleId;
     
346. toAcDbTextStyle(*TextStyle,textStyleId);
     
347. return textStyleId;
     
348. }
     
349. 
     
350. 
     
351. 
     
352. //*******************wuweifan2002.12.12*************************//
     
353. //********************插入多行文本***************************//
     
354. //************************************************************//
     
355. AcDbObjectId CDrawFunction::createMutiText(AcGePoint3d BasePoint,AcDb::TextHorzMode hMode,AcDb::TextVertMode vMode,CString Text,double texthight,double widthfactor,double angle,int color,CString smallFontName,CString bigFontName,CString layerName)
     
356. {
     
357. ASSERT(Text!=NULL);
     
358. AcDbMText *pMText=new AcDbMText();
     
359. if(pMText==NULL)
     
360. throw Acad::eOutOfMemory;
     
361. AcDbObjectId TextStyleId;
     
362. TextStyleId=createTextStyle(smallFontName,bigFontName,"xianlu");
     
363. pMText->setTextStyle(TextStyleId);
     
364. pMText->setContents(Text.GetBuffer(Text.GetLength()));
     
365. pMText->setTextHeight(texthight);
     
366. pMText->setRotation(angle);
     
367. pMText->setLineSpacingFactor(0.8);
     
368. pMText->setColorIndex(color);
     
369. if(layerName!="")
     
370. pMText->setLayer(layerName.GetBuffer(0));
     
371. AcDbObjectId MTextId;
     
372. addToModelSpace(MTextId, pMText);
     
373. pMText->close();
     
374. return MTextId;
     
375. }
     
376. 
     
377. //********************插入单行文本***************************//
     
378. //************************************************************//
     
379. AcDbObjectId CDrawFunction::createtextAll(AcGePoint3d pt,char *text,AcDb::TextHorzMode hMode,AcDb::TextVertMode vMode,double hight,double widthFactor,double rotation,int color,CString smallFontName,CString bigFontName,CString layerName)
     
380. {
     
381. ASSERT(text!=NULL);
     
382. AcDbText *pText=NULL;
     
383. pText=new AcDbText;
     
384. if(pText==NULL)
     
385. throw Acad::eOutOfMemory;
     
386. AcDbObjectId textId;
     
387. textId=createTextStyle(smallFontName,bigFontName,"xianlu");
     
388. pText->setTextStyle(textId);
     
389. pText->setTextString(text);
     
390. pText->setHeight(hight);
     
391. pText->setColorIndex(color);
     
392. pText->setRotation(rotation);
     
393. pText->setWidthFactor(widthFactor);
     
394. pText->setPosition(pt);
     
395. if(layerName!="")
     
396. pText->setLayer(layerName.GetBuffer(0));
     
397. addToModelSpace(textId, pText);
     
398. pText->close();
     
399. return textId;
     
400. }
     
401. 
     
402. //设置尺寸文本样式
     
403. void CDrawFunction::setDimTextStyle(AcDbObjectId dimId,AcDbObjectId textStyleId,
     
404. int colorIndex,double textHeight,double textScator,
     
405. double textGap,bool align)
     
406. {
     
407. AcDbDimension *dimText;
     
408. acdbOpenObject(dimText,dimId,AcDb::kForWrite);
     
409. dimText->setDimtxsty(textStyleId); //文本字体DIMTXSTY
     
410. AcCmColor color;
     
411. color.setColorIndex(colorIndex);
     
412. dimText->setDimclrt(color);//文本颜色DIMCLRT
     
413. dimText->setDimtxt(textHeight); //文本高度DIMTXT
     
414. dimText->setDimtfac(textScator);//文本高宽比DIMTFAC
     
415. dimText->setDimgap(textGap);//文本距尺寸距离DIMGAP
     
416. dimText->setDimtoh(align);//文本标注DIMTOH
     
417. dimText->close();
     
418. }
     
419. 
     
420. //设置尺寸延伸线类型
     
421. Acad::ErrorStatus CDrawFunction::setextensionlineStyle(AcDbObjectId dimId,int colorIndex,double length,
     
422. double offLength,bool v1,bool v2)
     
423. {
     
424. Acad::ErrorStatus es=Acad::eOk;
     
425. AcDbDimension *dimText=NULL;
     
426. if((es=acdbOpenObject(dimText,dimId,AcDb::kForWrite))!=Acad::eOk)
     
427. return es;
     
428. AcCmColor color;
     
429. if((es=color.setColorIndex(colorIndex))!=Acad::eOk)
     
430. {
     
431. dimText->close();return es;
     
432. }
     
433. dimText->setDimclre(color);//设置颜色DIMCLRE
     
434. dimText->setDimexe(length);//设置超出长度DIMEXE
     
435. dimText->setDimexo(offLength);//尺寸偏离长度DIMEXO
     
436. dimText->setDimse1(v1);//是否注第一条线DIMSE1
     
437. dimText->setDimse2(v2);//是否注第二条线DIMSE2
     
438. dimText->close();
     
439. return es;
     
440. }
     
441. //绘制对齐尺寸线
     
442. AcDbObjectId CDrawFunction::drawDimension(AcGePoint3d xLine1Point,AcGePoint3d xLine2Point,
     
443. double fwj,int direction,double distance,CString dimText,CString m_cLayerName)
     
444. {
     
445. 
     
446. AcDbAlignedDimension *dimension=new AcDbAlignedDimension;
     
447. AcGePoint3d dimLinePoint;
     
448. // CCalcuMethod *calcu=new CCalcuMethod();
     
449. // calcu->calEndZbSelf(xLine2Point,distance*direction,fwj,dimLinePoint);
     
450. // delete calcu;calcu=NULL;
     
451. dimension->setXLine1Point(xLine1Point);
     
452. dimension->setDimLinePoint(dimLinePoint);
     
453. dimension->setXLine2Point(xLine2Point);
     
454. dimension->setDimensionText(dimText.GetBuffer(0));
     
455. dimension->setLayer(m_cLayerName.GetBuffer(0));
     
456. AcDbObjectId dimId;
     
457. addToModelSpace(dimId,dimension);
     
458. dimension->close();
     
459. return dimId;
     
460. }
     
461. 
     
462. Acad::ErrorStatus CDrawFunction::createLine(AcDbObjectId &lineId,AcGePoint3d startPt,AcGePoint3d endPt,int color,CString Layer,char *linetype)
     
463. {
     
464. Acad::ErrorStatus es=Acad::eOk;
     
465. ASSERT(linetype!=NULL);
     
466. AcDbLine *pLine = new AcDbLine(startPt, endPt);
     
467. if((es=pLine->setColorIndex(color))!=Acad::eOk)
     
468. {
     
469. pLine->close();return es;
     
470. }
     
471. if(Layer!="")
     
472. {
     
473. if(pLine->setLayer(Layer)==Acad::eKeyNotFound \
     
474. ||pLine->setLayer(Layer)==Acad::eDeletedEntry )
     
475. {
     
476. createNewLayer(Layer);
     
477. if((es=pLine->setLayer(Layer.GetBuffer(0)))!=Acad::eOk)
     
478. {
     
479. pLine->close();return es;
     
480. }
     
481. }
     
482. }
     
483. if(linetype!=NULL)
     
484. {
     
485. AcDbObjectId lineTypeId;
     
486. if(getLinetypeIdFromString(linetype,lineTypeId))
     
487. {
     
488. if((es=pLine->setLinetype(lineTypeId))!=Acad::eOk)
     
489. {
     
490. pLine->close();return es;
     
491. }
     
492. if((es=pLine->setLinetypeScale(1))!=Acad::eOk)
     
493. {
     
494. pLine->close();return es;
     
495. }
     
496. }
     
497. }
     
498. es=addToModelSpace(lineId,pLine);
     
499. return es;
     
500. }
     
501. 
     
502. Acad::ErrorStatus CDrawFunction::createCircle(AcDbObjectId& circleId,AcGePoint3d center,double radius,int color,CString layer)
     
503. {
     
504. Acad::ErrorStatus es=Acad::eOk;
     
505. AcGeVector3d normal(0,0,1);
     
506. AcDbCircle *circle=new AcDbCircle(center,normal,radius);
     
507. if((es=circle->setColorIndex(color))!=Acad::eOk)
     
508. {
     
509. circle->close();return es;
     
510. }
     
511. if(layer!="")
     
512. {
     
513. if(circle->setLayer(layer)==Acad::eKeyNotFound \
     
514. ||circle->setLayer(layer)==Acad::eDeletedEntry )
     
515. {
     
516. createNewLayer(layer);
     
517. if((es=circle->setLayer(layer.GetBuffer(0)))!=Acad::eOk)
     
518. {
     
519. circle->close();return es;
     
520. }
     
521. }
     
522. }
     
523. es=addToModelSpace(circleId,circle);
     
524. return es;
     
525. }
     
526. 
     
527. 
     
528. Acad::ErrorStatus CDrawFunction::DrawPolyline(AcDbObjectId& polylineId, AcGePoint3dArray ptArr, int Color, double Width,bool IsClose,CString Layer,char *linetype)
     
529. {
     
530. Acad::ErrorStatus es=Acad::eOk;
     
531. AcDb2dPolyline *pNewPline;
     
532. if(IsClose)pNewPline=new AcDb2dPolyline(AcDb::k2dSimplePoly,ptArr,0,Adesk::kTrue,Width,Width);
     
533. else pNewPline=new AcDb2dPolyline(AcDb::k2dSimplePoly,ptArr,0,Adesk::kFalse,Width,Width);
     
534. if((es=pNewPline->setColorIndex(Color))!=Acad::eOk)
     
535. {
     
536. pNewPline->close();return es;
     
537. }
     
538. if(Layer!="")
     
539. {
     
540. if(pNewPline->setLayer(Layer)==Acad::eKeyNotFound \
     
541. ||pNewPline->setLayer(Layer)==Acad::eDeletedEntry )
     
542. {
     
543. createNewLayer(Layer);
     
544. if((es=pNewPline->setLayer(Layer))!=Acad::eOk)
     
545. {
     
546. pNewPline->close();return es;
     
547. }
     
548. }
     
549. }
     
550. if(linetype!=NULL)
     
551. {
     
552. AcDbObjectId lineTypeId;
     
553. if(getLinetypeIdFromString(linetype,lineTypeId))
     
554. {
     
555. if((es=pNewPline->setLinetype(lineTypeId))!=Acad::eOk)
     
556. {
     
557. pNewPline->close();return es;
     
558. }
     
559. if((es=pNewPline->setLinetypeScale(1))!=Acad::eOk)
     
560. {
     
561. pNewPline->close();return es;
     
562. }
     
563. }
     
564. }
     
565. if(!pNewPline->isLinetypeGenerationOn())
     
566. {
     
567. if((es=pNewPline->setLinetypeGenerationOn())!=Acad::eOk)
     
568. {
     
569. pNewPline->close();return es;
     
570. }
     
571. }
     
572. es=addToModelSpace(polylineId,pNewPline);
     
573. return es;
     
574. }
     
575. 
     
576. Acad::ErrorStatus CDrawFunction::DrawSplinePolyline(AcDbObjectId& polylineId, AcGePoint3dArray ptArr, int Color, double Width,bool IsClose,CString Layer,char *linetype)
     
577. {
     
578. Acad::ErrorStatus es=Acad::eOk;
     
579. AcDb2dPolyline *pNewPline;
     
580. if(IsClose)pNewPline=new AcDb2dPolyline(AcDb::k2dQuadSplinePoly,ptArr,0,Adesk::kTrue,Width,Width);
     
581. else pNewPline=new AcDb2dPolyline(AcDb::k2dQuadSplinePoly,ptArr,0,Adesk::kFalse,Width,Width);
     
582. if((es=pNewPline->setColorIndex(Color))!=Acad::eOk)
     
583. {
     
584. pNewPline->close();return es;
     
585. }
     
586. if(Layer!="")
     
587. {
     
588. if(pNewPline->setLayer(Layer)==Acad::eKeyNotFound \
     
589. ||pNewPline->setLayer(Layer)==Acad::eDeletedEntry )
     
590. {
     
591. createNewLayer(Layer);
     
592. if((es=pNewPline->setLayer(Layer))!=Acad::eOk)
     
593. {
     
594. pNewPline->close();return es;
     
595. }
     
596. }
     
597. }
     
598. if(linetype!=NULL)
     
599. {
     
600. AcDbObjectId lineTypeId;
     
601. if(getLinetypeIdFromString(linetype,lineTypeId))
     
602. {
     
603. if((es=pNewPline->setLinetype(lineTypeId))!=Acad::eOk)
     
604. {
     
605. pNewPline->close();return es;
     
606. }
     
607. if((es=pNewPline->setLinetypeScale(1))!=Acad::eOk)
     
608. {
     
609. pNewPline->close();return es;
     
610. }
     
611. }
     
612. }
     
613. if(!pNewPline->isLinetypeGenerationOn())
     
614. {
     
615. if((es=pNewPline->setLinetypeGenerationOn())!=Acad::eOk)
     
616. {
     
617. pNewPline->close();return es;
     
618. }
     
619. }
     
620. es=addToModelSpace(polylineId,pNewPline);
     
621. return es;
     
622. }
     
623. 
     
624. 
     
625. //得到文本边界
     
626. void CDrawFunction::getTextBoundary(AcDbObjectId objectId,double offset,AcDbObjectId &textBoundaryId)
     
627. {
     
628. AcDbExtents Ext;
     
629. AcDbEntity *pEnt;
     
630. acdbOpenObject(pEnt,objectId,AcDb::kForWrite);
     
631. if(pEnt->isKindOf(AcDbText::desc()))
     
632. {
     
633. AcDbText *pText=AcDbText::cast(pEnt);
     
634. AcGePoint3d basePoint;
     
635. basePoint=pText->position();
     
636. double rotateAngle=pText->rotation();
     
637. pText->setRotation(0);
     
638. pText->getGeomExtents(Ext);
     
639. AcGePoint3d minPt,maxPt;
     
640. minPt=Ext.minPoint();
     
641. maxPt=Ext.maxPoint();
     
642. AcGePoint3dArray pointArray;
     
643. AcGePoint3d point1,point2,point3,point4;
     
644. point1.x=minPt.x-offset;point1.y=minPt.y-offset;point1.z=0;
     
645. pointArray.append(point1);
     
646. point2.x=maxPt.x+offset;point2.y=minPt.y-offset;point2.z=0;
     
647. pointArray.append(point2);
     
648. point3.x=maxPt.x+offset;point3.y=maxPt.y+offset;point3.z=0;
     
649. pointArray.append(point3);
     
650. point4.x=minPt.x-offset;point4.y=maxPt.y+offset;point4.z=0;
     
651. pointArray.append(point4);
     
652. DrawPolyline(textBoundaryId,pointArray,1,0,TRUE,"0","CONTINUOUS");
     
653. AcGeMatrix3d matrix;
     
654. AcGeVector3d axis;
     
655. ident_init(matrix);
     
656. axis.set(0,0,1);
     
657. matrix=matrix.rotation(rotateAngle,axis,basePoint); //旋转矩阵
     
658. AcDbEntity *BounEnt;
     
659. acdbOpenObject(BounEnt,textBoundaryId,AcDb::kForWrite);
     
660. BounEnt->transformBy(matrix);
     
661. BounEnt->close();
     
662. pText->setRotation(rotateAngle);
     
663. }
     
664. else if(pEnt->isKindOf(AcDbMText::desc()))
     
665. {
     
666. AcDbMText *pMtext=AcDbMText::cast(pEnt);
     
667. AcGePoint3d basePoint;
     
668. basePoint=pMtext->location();
     
669. double rotateAngle=pMtext->rotation();
     
670. pMtext->setRotation(0);
     
671. AcGePoint3dArray pointArray;
     
672. double width=pMtext->actualWidth();
     
673. double height=pMtext->actualHeight();
     
674. AcGePoint3d point1,point2,point3,point4;
     
675. point1.x=basePoint.x-offset;point1.y=basePoint.y+offset;point1.z=0;
     
676. pointArray.append(point1);
     
677. point2.x=basePoint.x+width+offset;point2.y=basePoint.y+offset;point2.z=0;
     
678. pointArray.append(point2);
     
679. point3.x=basePoint.x+width+offset;point3.y=basePoint.y-height-offset;point3.z=0;
     
680. pointArray.append(point3);
     
681. point4.x=basePoint.x-offset;point4.y=basePoint.y-height-offset;point4.z=0;
     
682. pointArray.append(point4);
     
683. DrawPolyline(textBoundaryId,pointArray,1,0,TRUE,"0","CONTINUOUS");
     
684. AcGeMatrix3d matrix;
     
685. AcGeVector3d axis;
     
686. ident_init(matrix);
     
687. axis.set(0,0,1);
     
688. matrix=matrix.rotation(rotateAngle,axis,basePoint); //旋转矩阵
     
689. AcDbEntity *BounEnt;
     
690. acdbOpenObject(BounEnt,textBoundaryId,AcDb::kForWrite);
     
691. BounEnt->transformBy(matrix);
     
692. BounEnt->close();
     
693. pMtext->setRotation(rotateAngle);
     
694. }
     
695. pEnt->close();
     
696. return;
     
697. }
     
698. 
     
699. 
     
700. AcDbObjectId CDrawFunction::createNewLayer(CString LayerName)
     
701. {
     
702. AcDbLayerTable *LayerTable;
     
703. acdbHostApplicationServices()->workingDatabase()->getSymbolTable(LayerTable,AcDb::kForWrite);
     
704. AcDbObjectId LayerId;
     
705. if(!LayerTable->has(LayerName))
     
706. {
     
707. AcDbLayerTableRecord *LayerTableRecord=new AcDbLayerTableRecord;
     
708. LayerTableRecord->setName(LayerName);
     
709. LayerTable->add(LayerId,LayerTableRecord);
     
710. LayerTableRecord->close();
     
711. }
     
712. else
     
713. {
     
714. LayerTable->getAt(LayerName,LayerId,FALSE);
     
715. }
     
716. LayerTable->close();
     
717. return LayerId;
     
718. }
     
719. 
     
720. bool CDrawFunction::insertBlock(AcDbObjectId &newEntId,CString BlockName,double fwj,AcGePoint3d basePoint,double scalex,
     
721. CString Text1,CString Text2,CString Text3,
     
722. int text1color,int text2color,int text3color,
     
723. double text1height,double text2height,double text3height,
     
724. double text1scator,double text2scator,double text3scator,
     
725. CString littleFont,CString bigFont,CString layerName,double dx,double dy) //每块可有三个属性定义
     
726. {
     
727. AcDbObjectId blockId;
     
728. double x,y;
     
729. x=basePoint[X];
     
730. y=basePoint[Y];
     
731. bool a=AcDbSymbolUtilities::hasBlock(BlockName.GetBuffer(BlockName.GetLength()),acdbHostApplicationServices()->workingDatabase());
     
732. if(!a)return FALSE;
     
733. AcDbSymbolUtilities::getBlockId(blockId,BlockName.GetBuffer(BlockName.GetLength()),acdbHostApplicationServices()->workingDatabase());
     
734. AcDbBlockReference *pBlkRef = new AcDbBlockReference;
     
735. // pBlkRef->treatAsAcDbBlockRefForExplode();///////////
     
736. pBlkRef->setBlockTableRecord(blockId);
     
737. pBlkRef->setLayer(layerName);//设置层/////////////////////////////
     
738. struct resbuf to, from;
     
739. from.restype = RTSHORT;
     
740. from.resval.rint = 1; // UCS
     
741. to.restype = RTSHORT;
     
742. to.resval.rint = 0; // WCS
     
743. AcGeVector3d normal(0, 0, 1);
     
744. acedTrans(&(normal.x), &from, &to, Adesk::kTrue,&(normal.x));
     
745. AcGeScale3d scale(scalex,scalex,scalex);
     
746. pBlkRef->setScaleFactors(scale);
     
747. AcGePoint3d insertPoint;
     
748. insertPoint=basePoint;
     
749. pBlkRef->setPosition(basePoint);
     
750. pBlkRef->setRotation(fwj);
     
751. pBlkRef->setNormal(normal);
     
752. pBlkRef->setColorIndex(text1color);//按文本颜色设置改变颜色
     
753. pBlkRef->setLayer(layerName);
     
754. AcDbBlockTable *pBlockTable;
     
755. acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable,AcDb::kForWrite);
     
756. AcDbBlockTableRecord *pBlockTableRecord;
     
757. pBlockTable->getAt(ACDB_MODEL_SPACE, pBlockTableRecord,AcDb::kForWrite);
     
758. pBlockTableRecord->appendAcDbEntity(newEntId, pBlkRef);
     
759. pBlockTable->close();
     
760. pBlockTableRecord->close();
     
761. 
     
762. acdbOpenObject(pBlockTableRecord, blockId, AcDb::kForRead);
     
763. AcDbBlockTableRecordIterator *pIterator;
     
764. pBlockTableRecord->newIterator(pIterator);
     
765. AcDbEntity *pEnt;
     
766. AcDbAttributeDefinition *pAttdef;
     
767. for (pIterator->start(); !pIterator->done();pIterator->step())
     
768. {
     
769. pIterator->getEntity(pEnt, AcDb::kForWrite);
     
770. //pEnt->setColorIndex(text1color);//按文本颜色设置改变颜色
     
771. //pEnt->setLayer(layerName);//设置层
     
772. if(pEnt->isKindOf(AcDbAttributeDefinition::desc()))
     
773. {
     
774. pAttdef = AcDbAttributeDefinition::cast(pEnt);
     
775. if (pAttdef != NULL && !pAttdef->isConstant())
     
776. {
     
777. AcDbAttribute *pAtt = new AcDbAttribute();
     
778. pAtt->setPropertiesFrom(pAttdef);
     
779. pAtt->setInvisible(pAttdef->isInvisible());
     
780. AcGePoint3d alignpoint;
     
781. alignpoint=pAttdef->alignmentPoint();
     
782. alignpoint+=pBlkRef->position().asVector();
     
783. AcDbObjectId TextStyleId;
     
784. TextStyleId=createTextStyle(littleFont,bigFont,"xianlu");
     
785. pAtt->setTextStyle(TextStyleId);
     
786. pAtt->setHeight(pAttdef->height());
     
787. pAtt->setTag("Tag");
     
788. pAtt->setFieldLength(25);
     
789. pAtt->setLayer(layerName);
     
790. char *pStr = pAttdef->tag();
     
791. pAtt->setTag(pStr);
     
792. free(pStr);
     
793. pAtt->setFieldLength(pAttdef->fieldLength());
     
794. if(strcmp(pAtt->tag(),"标注1")==0)
     
795. {
     
796. AcGePoint3d gg(dx/scalex,0,0);
     
797. alignpoint=alignpoint+gg.asVector();
     
798. AcGeVector3d vet(0,0,1);
     
799. alignpoint=alignpoint.scaleBy(scalex,insertPoint);
     
800. alignpoint=alignpoint.rotateBy(fwj,vet,insertPoint);
     
801. pAtt->setTextString(Text1.GetBuffer(Text2.GetLength()));
     
802. pAtt->setRotation(PI/2+fwj);
     
803. pAtt->setHorizontalMode(AcDb::kTextCenter);
     
804. pAtt->setVerticalMode(AcDb::kTextBottom);
     
805. pAtt->setAlignmentPoint(alignpoint);
     
806. pAtt->setColorIndex(text1color);
     
807. pAtt->setHeight(text1height*scalex);
     
808. pAtt->setWidthFactor(text1scator);
     
809. }
     
810. if(strcmp(pAtt->tag(),"标注2")==0)
     
811. {
     
812. AcGePoint3d gg(dx/scalex,0,0);
     
813. alignpoint=alignpoint-gg.asVector();
     
814. AcGeVector3d vet(0,0,1);
     
815. alignpoint=alignpoint.scaleBy(scalex,insertPoint);
     
816. alignpoint=alignpoint.rotateBy(fwj,vet,insertPoint);
     
817. pAtt->setTextString(Text2.GetBuffer(Text2.GetLength()));
     
818. pAtt->setRotation(PI/2+fwj);
     
819. pAtt->setHorizontalMode(AcDb::kTextCenter);
     
820. pAtt->setVerticalMode(AcDb::kTextBottom);
     
821. pAtt->setAlignmentPoint(alignpoint);
     
822. pAtt->setColorIndex(text2color);
     
823. pAtt->setHeight(text2height*scalex);
     
824. pAtt->setWidthFactor(text2scator);
     
825. }
     
826. if(strcmp(pAtt->tag(),"标注3")==0)
     
827. {
     
828. AcGePoint3d gg(0,dy/scalex,0);
     
829. alignpoint=alignpoint+gg.asVector();
     
830. AcGeVector3d vet(0,0,1);
     
831. alignpoint=alignpoint.scaleBy(scalex,insertPoint);
     
832. alignpoint=alignpoint.rotateBy(fwj,vet,insertPoint);
     
833. pAtt->setTextString(Text3.GetBuffer(Text3.GetLength()));
     
834. pAtt->setRotation(fwj);
     
835. pAtt->setHorizontalMode(AcDb::kTextCenter);
     
836. pAtt->setVerticalMode(AcDb::kTextBottom);
     
837. pAtt->setAlignmentPoint(alignpoint);
     
838. pAtt->setColorIndex(text3color);
     
839. pAtt->setHeight(text3height*scalex);
     
840. pAtt->setWidthFactor(text3scator);
     
841. }
     
842. AcDbObjectId attId;
     
843. pBlkRef->appendAttribute(attId, pAtt);
     
844. pAtt->close();
     
845. }
     
846. }
     
847. // pEnt->setColorIndex(text1color);//按文本颜色设置改变颜色
     
848. pEnt->close();
     
849. }
     
850. delete pIterator;
     
851. pBlockTableRecord->close();
     
852. pBlkRef->close();
     
853. return TRUE;
     
854. }
     
855. 
     
856. 
     
857. //遍历多义线顶点坐标
     
858. Acad::ErrorStatus CDrawFunction::IteratorPolyline(AcDbObjectId polylineID,AcGePoint3dArray& pointArray)
     
859. {
     
860. Acad::ErrorStatus es=Acad::eOk;
     
861. AcDbObject* pObject=NULL;
     
862. AcDbPolyline *pline=NULL;
     
863. if((es=acdbOpenObject(pObject,polylineID,AcDb::kForRead))!=Acad::eOk)
     
864. return es;
     
865. if(!pObject->isKindOf(AcDbPolyline::desc()))
     
866. {
     
867. pObject->close();
     
868. return Acad::eInvalidInput;
     
869. }
     
870. pline=AcDbPolyline::cast(pObject);
     
871. int num=pline->numVerts();
     
872. for (int i=0; i< num; i++)
     
873. {
     
874. AcGePoint3d temPt;
     
875. if((es=pline->getPointAt(i, temPt))!=Acad::eOk)
     
876. {
     
877. pObject->close();
     
878. return Acad::eInvalidInput;
     
879. }
     
880. pointArray.append(temPt);
     
881. }
     
882. pObject->close();
     
883. return es;
     
884. }
     
885. 
     
886. 
     
887. Acad::ErrorStatus CDrawFunction::createGroup(CString groupname,AcDbObjectIdArray IdArray)
     
888. {
     
889. Acad::ErrorStatus es=Acad::eOk;
     
890. AcDbDictionary *pGroupDict=NULL;
     
891. AcDbGroup *pGroup=NULL;
     
892. if((es=acdbHostApplicationServices()->workingDatabase()->getGroupDictionary(pGroupDict,AcDb::kForWrite))!=Acad::eOk)
     
893. {
     
894. return es;
     
895. }
     
896. AcDbObjectId groupId;
     
897. es=pGroupDict->getAt(groupname,groupId);
     
898. if(es==Acad::eInvalidKey)
     
899. {
     
900. acutPrintf("\n输入的词典名无效!");
     
901. pGroupDict->close();
     
902. return es;
     
903. }
     
904. else if(es==Acad::eKeyNotFound)
     
905. {
     
906. pGroup=new AcDbGroup("GroupDiscription");
     
907. if((es=pGroupDict->setAt(groupname,pGroup,groupId))!=Acad::eOk)
     
908. {
     
909. pGroup->close();pGroupDict->close();return es;
     
910. }
     
911. }
     
912. else if(es==Acad::eOk )
     
913. {
     
914. if((es=acdbOpenObject(pGroup,groupId,AcDb::kForWrite))!=Acad::eOk)
     
915. {
     
916. pGroupDict->close();return es;
     
917. }
     
918. }
     
919. for(int i=0;i<IDARRAY.LENGTH();I++)
     
920. pGroup->append(IdArray[i]);
     
921. pGroup->setSelectable(FALSE);
     
922. pGroupDict->close();
     
923. pGroup->close();
     
924. return es;
     
925. }
     
926. 
     
927. double CDrawFunction::getTextLength(AcDbObjectId textId)
     
928. {
     
929. Acad::ErrorStatus es=Acad::eOk;
     
930. AcDbEntity *pEnt=NULL;
     
931. if((es=acdbOpenObject(pEnt,textId,AcDb::kForRead))!=Acad::eOk)
     
932. return -1;
     
933. AcDbExtents Ext;
     
934. pEnt->getGeomExtents(Ext);
     
935. pEnt->close();
     
936. AcGePoint3d minPt,maxPt;
     
937. minPt=Ext.minPoint();
     
938. maxPt=Ext.maxPoint();
     
939. return acutDistance(asDblArray(minPt),asDblArray(maxPt));
     
940. }
     
941. 
     
942. 
     
943. 
     
944. void CDrawFunction::highlightEdge(const AcDbObjectId& objId,const int marker)
     
945. {
     
946. char dummy[133];
     
947. AcDbEntity *pEnt;
     
948. acdbOpenObject(pEnt,objId,AcDb::kForRead);
     
949. AcGePoint3d pickpnt;
     
950. AcGeMatrix3d xform;
     
951. int numIds;
     
952. AcDbFullSubentPath *subentIds;
     
953. pEnt->getSubentPathsAtGsMarker(AcDb::kEdgeSubentType,marker,pickpnt,xform,numIds,subentIds);
     
954. if(numIds>0)
     
955. {
     
956. pEnt->highlight(subentIds[0]);
     
957. ads_getstring(0,"\npressto continue...",dummy);
     
958. pEnt->unhighlight(subentIds[0]);
     
959. 
     
960. }
     
961. delete []subentIds;
     
962. pEnt->close();
     
963. }
     
964. 
     
965. 
     
966. Acad::ErrorStatus CDrawFunction::readXrecord(CString dictName,CString xrecordName,CString &message)
     
967. {
     
968. AcDbDictionary *pDict=NULL;
     
969. pDict=openDictionaryForRead(dictName,acdbHostApplicationServices()->workingDatabase());
     
970. if(pDict)
     
971. {
     
972. AcDbXrecord *pXrec;
     
973. pDict->getAt(xrecordName, (AcDbObject*&) pXrec,AcDb::kForRead);
     
974. pDict->close();
     
975. struct resbuf *pRbList;
     
976. pXrec->rbChain(&pRbList);
     
977. pXrec->close();
     
978. message=pRbList->resval.rstring;
     
979. acutRelRb(pRbList);
     
980. return Acad::eOk;
     
981. }
     
982. else
     
983. {
     
984. return Acad::eInvalidInput;
     
985. }
     
986. }
     
987. 
     
988. 
     
989. //**********************扩展记录操作(2002.12.12)***************//
     
990. //****************打开扩展记录为写******************************//
     
991. //**************************************************************//
     
992. AcDbDictionary* CDrawFunction::openDictionaryForWrite(LPCTSTR dictName,
     
993. bool createIfNotFound,AcDbDictionary* parentDict)
     
994. {
     
995. ASSERT(dictName != NULL);
     
996. ASSERT(parentDict != NULL);
     
997. ASSERT(parentDict->isWriteEnabled());
     
998. AcDbDictionary* dict = NULL;
     
999. AcDbObject* obj;
     
1000. Acad::ErrorStatus es;
      
1001. es = parentDict->getAt(dictName, obj, AcDb::kForWrite);
      
1002. if (es == Acad::eOk)
      
1003. {
      
1004. dict = AcDbDictionary::cast(obj);
      
1005. }
      
1006. else if (es == Acad::eKeyNotFound)
      
1007. {
      
1008. if (createIfNotFound)
      
1009. {
      
1010. dict = new AcDbDictionary;
      
1011. AcDbObjectId dictId;
      
1012. es = parentDict->setAt(dictName, dict, dictId);
      
1013. if (es != Acad::eOk)
      
1014. {
      
1015. delete dict;dict = NULL;
      
1016. }
      
1017. }
      
1018. }
      
1019. return dict;
      
1020. }
      
1021. 
      
1022. 
      
1023. 
      
1024. /******************************************************************************/
      
1025. /* 関数名 : SetOSMODE */
      
1026. /* 機能 : 設置OSMODE */
      
1027. /* 入力引数 : int OSMODE値 */
      
1028. /* 出力引数 : 無 */
      
1029. /* 返り値 : 無 */
      
1030. /* 備考 : 無 */
      
1031. /******************************************************************************/
      
1032. void SetOSMODE(int nOSMODE)
      
1033. {
      
1034. struct resbuf rebNewOSMODE;
      
1035. rebNewOSMODE.restype = RTSHORT;
      
1036. rebNewOSMODE.resval.rint = nOSMODE;
      
1037. /*設置系統變量OSNAP的値。*/
      
1038. acedSetVar("OSMODE",&rebNewOSMODE);
      
1039. }
      
1040. 
      
1041. /******************************************************************************/
      
1042. /* 関数名 : GetCrossPoint */
      
1043. /* 機能 : 得到交叉點的位置和交點坐標。 */
      
1044. /* 入力引数 : AcGePoint3dArray Polyline的點列。 */
      
1045. /* AcGePoint3d 選擇点。 */
      
1046. /* double PickBox的長度。 */
      
1047. /* Adesk::Boolean 閉合屬性。 */
      
1048. /* 出力引数 : int 交叉點的位置（前）。 */
      
1049. /* int 交叉點的位置（後）。 */
      
1050. /* AcGePoint3d 交點坐標 */
      
1051. /* 返り値 : TRUE 正常。 */
      
1052. /* FALSE 異常。 */
      
1053. /* 備考 : 無 */
      
1054. /******************************************************************************/
      
1055. BOOL GetCrossPoint(AcGePoint3dArray gePoi3dA, AcGePoint3d gePoi3d, double dPickLen, int & iCrsID1,
      
1056. int & iCrsID2, AcGePoint3d & gePoi3dCrs, Adesk::Boolean bIsClosed = Adesk::kTrue)
      
1057. {
      
1058. ads_point spt1, spt2, spt3, spt4;
      
1059. AcGePoint3d GePoi3dStart, GePoi3dNext;
      
1060. int iReturn, iNum;
      
1061. 
      
1062. iNum = gePoi3dA.length();
      
1063. if (iNum < 2) {
      
1064. return FALSE;
      
1065. }
      
1066. 
      
1067. /*得到交叉點的位置*/
      
1068. for (int i = 0; i < iNum; i++) {
      
1069. iCrsID1 = i;
      
1070. 
      
1071. //得到前一個點
      
1072. asPnt3d(spt3) = gePoi3dA[iCrsID1];
      
1073. 
      
1074. //得到後一個點
      
1075. if (i == iNum - 1) {
      
1076. //實體是否是閉合。
      
1077. if (!bIsClosed) {
      
1078. break;
      
1079. }
      
1080. else {
      
1081. iCrsID2 = 0;
      
1082. }
      
1083. }
      
1084. else {
      
1085. iCrsID2 = i + 1;
      
1086. }
      
1087. asPnt3d(spt4) = gePoi3dA[iCrsID2];
      
1088. 
      
1089. spt3[Z] = 0;
      
1090. spt4[Z] = 0;
      
1091. 
      
1092. /*X方向是否有交叉點。*/
      
1093. spt1[X] = gePoi3d.x + (dPickLen / 2); spt2[X] = gePoi3d.x - (dPickLen / 2);
      
1094. spt1[Y] = gePoi3d.y; spt2[Y] = gePoi3d.y;
      
1095. spt1[Z] = 0; spt2[Z] = 0;
      
1096. iReturn = acdbInters(spt1, spt2, spt3, spt4, 1, asDblArray(gePoi3dCrs));
      
1097. if (iReturn == RTNORM) {
      
1098. return TRUE;
      
1099. }
      
1100. 
      
1101. /*Y方向是否有交叉點。*/
      
1102. spt1[X] = gePoi3d.x; spt2[X] = gePoi3d.x;
      
1103. spt1[Y] = gePoi3d.y + (dPickLen / 2); spt2[Y] = gePoi3d.y - (dPickLen / 2);
      
1104. spt1[Z] = 0; spt2[Z] = 0;
      
1105. iReturn = acdbInters(spt1, spt2, spt3, spt4, 1, asDblArray(gePoi3dCrs));
      
1106. if (iReturn == RTNORM) {
      
1107. return TRUE;
      
1108. }
      
1109. }
      
1110. return FALSE;
      
1111. }
      
1112. 
      
1113. 
      
1114. 前阵困扰我的问题解决了，现在共享给大家：
      
1115. //************************************************************************
      
1116. //函数名称:getPointAtDistInGeCurve
      
1117. //函数类型:Acad::ErrorStatus
      
1118. //返回值:
      
1119. //功能描述:返回曲线上距起点某距离值处的点。
      
1120. //函数作者:Darcy
      
1121. //创建日期:2003-XX-XX
      
1122. //参数列表:
      
1123. //变量名:pGeCurve 变量类型:const AcGeCurve3d * 变量说明:
      
1124. //变量名:dist 变量类型:double 变量说明:
      
1125. //变量名:point 变量类型:AcGePoint3d& 变量说明:
      
1126. //备 注:
      
1127. //************************************************************************
      
1128. Acad::ErrorStatus getPointAtDistInGeCurve(const AcGeCurve3d * pGeCurve,double dist,AcGePoint3d& point)
      
1129. {
      
1130. Acad::ErrorStatus es = Acad::eOk;
      
1131. 
      
1132. if ( pGeCurve != NULL )
      
1133. {
      
1134. AcGePoint3d spt;
      
1135. double pa=0.,datumParam=0.;
      
1136. //距离从起点起算！
      
1137. Adesk::Boolean posParamDir=Adesk::kTrue;
      
1138. 
      
1139. pGeCurve->hasStartPoint(spt);
      
1140. 
      
1141. datumParam = pGeCurve->paramOf(spt);;
      
1142. 
      
1143. pa = pGeCurve->paramAtLength(
      
1144. datumParam,
      
1145. dist,
      
1146. posParamDir
      
1147. );
      
1148. 
      
1149. point=pGeCurve->evalPoint(pa);
      
1150. }
      
1151. else
      
1152. es = Acad::eInvalidInput;
      
1153. 
      
1154. return es;
      
1155. }
      
1156. 
      
1157. 
      
1158. 
      
1159. bool
      
1160. IsAtLine(CAD_POINT StartPt,CAD_POINT EndPt,CAD_POINT thePt)
      
1161. /* 判断某点是否在直线上
      
1162. StartPt 直线起点
      
1163. EndPt 直线终点
      
1164. thePt 所判断点
      
1165. 返回：TRUE__在直线上 FALSE__不在直线上
      
1166. */
      
1167. {
      
1168. //为保证计算精度，首先对点的坐标数据降级
      
1169. CAD_VECTOR vec(StartPt.x,StartPt.y,StartPt.z);
      
1170. StartPt=StartPt-vec;
      
1171. EndPt=EndPt-vec;
      
1172. thePt=thePt-vec;
      
1173. 
      
1174. // 直线方程系数
      
1175. double A,B,C;
      
1176. A = EndPt.y - StartPt.y;
      
1177. B = StartPt.x - EndPt.x;
      
1178. C = -1.0*(A*StartPt.x+B*StartPt.y);
      
1179. 
      
1180. if(StartPt.x==EndPt.x)
      
1181. {
      
1182. if(thePt.y>max(StartPt.y,EndPt.y) || thePt.y<MIN(STARTPT.Y,ENDPT.Y))
      
1183. return FALSE;
      
1184. }
      
1185. else if(StartPt.y==EndPt.y)
      
1186. {
      
1187. if(thePt.x>max(StartPt.x,EndPt.x) || thePt.x<MIN(STARTPT.X,ENDPT.X))
      
1188. return FALSE;
      
1189. }
      
1190. else
      
1191. {
      
1192. if( thePt.x>max(StartPt.x,EndPt.x) || thePt.x
      
1193. thePt.y>max(StartPt.y,EndPt.y) || thePt.y
      
1194. return FALSE;
      
1195. }
      
1196. 
      
1197. if(fabs(A*thePt.x+B*thePt.y+C)>1.0E-6)
      
1198. {
      
1199. return FALSE;
      
1200. }
      
1201. 
      
1202. return TRUE;
      
1203. }
      
1204. 
      
1205. /*****************************************************/
      
1206. BOOL
      
1207. IsAtArc(CAD_POINT firstPt,CAD_POINT secondPt,
      
1208. double radius,double direct,int More,CAD_POINT thePt)
      
1209. /* 判断某点是否在圆弧上
      
1210. firstPt 圆弧起点
      
1211. secondPt 圆弧终点
      
1212. radius 半径
      
1213. direct 偏向( >=0__左偏 <0__右偏 )
      
1214. More (More<0__小圆弧,More>0__大圆弧)
      
1215. thePt 判断点
      
1216. 返回：TRUE__在圆弧上 FALSE__不在圆弧上
      
1217. */
      
1218. {
      
1219. CAD_POINT centerPt,sectionPt;
      
1220. CAD_POINT startPt,endPt;
      
1221. double startAngle,endAngle,chordAngle,vertAngle;
      
1222. double intLine,chordLine;
      
1223. /* centerPt 圆弧圆心
      
1224. sectionPt 弦线中心点
      
1225. startAngle 圆弧起点切线角度（弧度）
      
1226. endAngle 圆弧终点切线角度（弧度）
      
1227. chordAngle 弦线角度（弧度）
      
1228. vertAngle 与弦线垂直的垂线角度（弧度）
      
1229. intLine 弦线中心至圆心距离
      
1230. chordLine 弦线长度
      
1231. */
      
1232. sectionPt.x = (firstPt.x + secondPt.x)/2;
      
1233. sectionPt.y = (firstPt.y + secondPt.y)/2;
      
1234. 
      
1235. chordLine = sqrt( pow( (secondPt.x-firstPt.x),2 ) + pow( (secondPt.y-firstPt.y),2 ) );
      
1236. intLine = sqrt((radius*radius-chordLine*chordLine/4) );
      
1237. 
      
1238. chordAngle = ads_angle(asDblArray(firstPt),asDblArray(secondPt)); //弦线的角度
      
1239. 
      
1240. if(direct>=0)//左偏
      
1241. {
      
1242. startPt=firstPt;
      
1243. endPt=secondPt;
      
1244. vertAngle=chordAngle+Pai/2;
      
1245. }
      
1246. else if(direct<0)//右偏
      
1247. {
      
1248. startPt=secondPt;
      
1249. endPt=firstPt;
      
1250. vertAngle=chordAngle-Pai/2;
      
1251. }
      
1252. 
      
1253. if(More<=0)//小圆弧
      
1254. {
      
1255. centerPt.x=sectionPt.x+intLine*cos(vertAngle);
      
1256. centerPt.y=sectionPt.y+intLine*sin(vertAngle);
      
1257. }
      
1258. else//大圆弧
      
1259. {
      
1260. centerPt.x=sectionPt.x-intLine*cos(vertAngle);
      
1261. centerPt.y=sectionPt.y-intLine*sin(vertAngle);
      
1262. }
      
1263. 
      
1264. if(fabs(centerPt.distanceTo(thePt)-radius)>1.0E-8)
      
1265. return FALSE;
      
1266. startAngle = ads_angle(asDblArray(centerPt),asDblArray(startPt));
      
1267. endAngle = ads_angle(asDblArray(centerPt),asDblArray(endPt));
      
1268. 
      
1269. AcDbArc *pArc=new AcDbArc(centerPt,radius,startAngle,endAngle);
      
1270. AcDbLine *pLine=new AcDbLine(centerPt,thePt);
      
1271. AcGePoint3dArray Points;
      
1272. pLine->intersectWith(pArc,AcDb::kOnBothOperands,Points);
      
1273. if(Points.isEmpty()) return FALSE;
      
1274. 
      
1275. return TRUE;
      
1276. }
      
1277. 
      
1278. 
      
1279. 有时候，你需要这样调用Autocad命令
      
1280. void SendCommandToAutoCad(CString cmd)
      
1281. {
      
1282. COPYDATASTRUCT cmdMsg;
      
1283. cmdMsg.dwData = (DWORD)1;
      
1284. cmdMsg.cbData = (DWORD)_tcslen(cmd) + 1;
      
1285. cmdMsg.lpData = cmd.GetBuffer(cmd.GetLength()+1) ;
      
1286. SendMessage(acedGetAcadFrame()->m_hWnd, WM_COPYDATA, NULL, (LPARAM)&cmdMsg);
      
1287. }
      
1288. 
      
1289. 
      
1290. 向AcDbObject添加扩展数据Xdata
      
1291. 代码:
      
1292. 
      
1293. void affixXdata(char *appName, char *xData, AcDbObject *pObj)
      
1294. {
      
1295.   //向AcDbObject添加扩展数据Xdata
      
1296.   struct resbuf *pRb, *pTemp;
      
1297. 
      
1298.   acdbRegApp(appName);
      
1299.   pRb = acutNewRb(AcDb::kDxfRegAppName);
      
1300.   pTemp = pRb;
      
1301.   pTemp->resval.rstring = new char[strlen(appName)+1];
      
1302.   strcpy(pTemp->resval.rstring, appName);
      
1303. 
      
1304.   pTemp->rbnext = acutNewRb(AcDb::kDxfXdAsciiString);
      
1305.   pTemp = pTemp->rbnext;
      
1306.   pTemp->resval.rstring = new char[strlen(xData)+1];
      
1307.   strcpy(pTemp->resval.rstring, xData);
      
1308. 
      
1309.   pObj->setXData(pRb);
      
1310.   acutRelRb(pRb);
      
1311. }
      
1312. 
      
1313. 
      
1314. //添加扩展数据
      
1315. //实体添加扩展数据(字符串)
      
1316. bool AddXData(CString appName, AcDbObjectId entId,CString data)
      
1317. {
      
1318. //open entity for read
      
1319. AcDbEntity*pEnt;
      
1320. Acad::ErrorStatus es=acdbOpenAcDbEntity(pEnt,entId,AcDb::kForRead);
      
1321. if(es!=Acad::eOk)
      
1322. {
      
1323. ads_printf("error in open entity\n");
      
1324. return false;
      
1325. }
      
1326. //get XData buffer
      
1327. struct resbuf*pRb,*pTemp;
      
1328. pRb=pEnt->xData(appName);
      
1329. if(pRb!=NULL)//have XData
      
1330. {
      
1331. //pTemp移到表尾
      
1332. pTemp=pRb;
      
1333. for(pTemp=pRb;pTemp->rbnext!=NULL;pTemp=pTemp->rbnext){;}
      
1334. }
      
1335. else//NOT have XData
      
1336. {
      
1337. //create new xData
      
1338. ads_regapp(appName);
      
1339. pRb=ads_newrb(AcDb::kDxfRegAppName);
      
1340. pRb->resval.rstring=(char*)malloc(appName.GetLength()+1);
      
1341. strcpy(pRb->resval.rstring,appName);
      
1342. pTemp=pRb;
      
1343. }
      
1344. //fill xData string
      
1345. pTemp->rbnext=ads_newrb(AcDb::kDxfXdAsciiString);
      
1346. pTemp=pTemp->rbnext;
      
1347. pTemp->resval.rstring=(char*)malloc(data.GetLength()+1);
      
1348. strcpy(pTemp->resval.rstring,data);
      
1349. //add xData
      
1350. es=pEnt->upgradeOpen();
      
1351. if(es!=Acad::eOk)
      
1352. {
      
1353. ads_printf("\nError occur in updateOpen.");
      
1354. pEnt->close();
      
1355. ads_relrb(pRb);
      
1356. return false;
      
1357. }
      
1358. es=pEnt->setXData(pRb);
      
1359. if(es!=Acad::eOk)
      
1360. {
      
1361. ads_printf("\nError occur in setXData.");
      
1362. pEnt->close();
      
1363. ads_relrb(pRb);
      
1364. return false;
      
1365. }
      
1366. //
      
1367. pEnt->close();
      
1368. ads_relrb(pRb);
      
1369. return true;
      
1370. }
      
1371. 
      
1372. 
      
1373. //发命令前加按了两个ESCAPE
      
1374. void SendCommand(char *cmd)
      
1375. {
      
1376. HWND wnd;
      
1377. char cp[3];
      
1378. 
      
1379. wnd = adsw_acadMainWnd();
      
1380. if(!wnd) return;
      
1381. 
      
1382. COPYDATASTRUCT cmddata;
      
1383. cp[0] = VK_ESCAPE;
      
1384. cp[1] = VK_ESCAPE;
      
1385. cp[2] = NULL;
      
1386. cmddata.dwData = (DWORD)1;
      
1387. cmddata.cbData = (DWORD)strlen(cp)+1;
      
1388. cmddata.lpData = cp;
      
1389. SendMessage(wnd,WM_COPYDATA,(WPARAM)cp,(LPARAM)&cmddata);
      
1390. 
      
1391. cmddata.dwData = (DWORD)1;
      
1392. cmddata.cbData = (DWORD)strlen(cmd)+1;
      
1393. cmddata.lpData = cmd;
      
1394. SendMessage(wnd,WM_COPYDATA,(WPARAM)wnd,(LPARAM)&cmddata);
      
1395. }
      
1396. 
      
1397. //函数功能：根据用户指定的两点，自动创建破断线
      
1398. void CAD_EXTBreakLine()
      
1399. {
      
1400. acutPrintf("指定两点,自动创建折线破断线\n");
      
1401. 
      
1402. ads_point StartPoint,EndPoint;
      
1403. if(acedGetPoint(NULL,"\n请指定破断线的起点:",StartPoint)!=RTNORM) return;
      
1404. if(acedGetPoint(StartPoint,"\n请指定破断线的终点:",EndPoint)!=RTNORM) return;
      
1405. AcGePoint3d Start,End;
      
1406. End = AcGePoint3d(EndPoint[X],EndPoint[Y],0);
      
1407. Start = AcGePoint3d(StartPoint[X],StartPoint[Y],0);
      
1408. float Length = Start.distanceTo(End);
      
1409. 
      
1410. AcGeVector3d Normal = End-Start;
      
1411. Normal = Normal.normal(AcGeContext::gTol);
      
1412. 
      
1413. AcGePoint3d Point1(Start-Length*Normal*0.15);
      
1414. AcGePoint3d Point2(Start+Length*Normal*0.45);
      
1415. AcGePoint3d Point5(End-Length*Normal*0.45);
      
1416. AcGePoint3d Point6(End+Length*Normal*0.15);
      
1417. 
      
1418. AcGeVector3d Normal2(-Normal.y,Normal.x,0);
      
1419. AcGePoint3d Point3(Start+Length*Normal*0.5+Length*Normal2*0.10);
      
1420. AcGePoint3d Point4(Start+Length*Normal*0.5-Length*Normal2*0.10);
      
1421. 
      
1422. AcGePoint3dArray vertices;
      
1423. vertices.append(Point1);
      
1424. vertices.append(Point2);
      
1425. vertices.append(Point3);
      
1426. vertices.append(Point4);
      
1427. vertices.append(Point5);
      
1428. vertices.append(Point6);
      
1429. AddNewLayer("COMMANTARY");
      
1430. AcDb2dPolyline* pBreakLine = new AcDb2dPolyline(AcDb::k2dSimplePoly,vertices,0,Adesk::kTrue,0,0,NULL);
      
1431. pBreakLine->setLayer("COMMANTARY",TRUE);
      
1432. 
      
1433. AcGeMatrix3d mat;
      
1434. acdbUcsMatrix(mat,acdbHostApplicationServices()->workingDatabase());
      
1435. pBreakLine->transformBy(mat);
      
1436. 
      
1437. pBreakLine->makeOpen();
      
1438. AddEntityToDb(pBreakLine);
      
1439. 
      
1440. }
      
1441. 
      
1442. //******************生成回转体**********************
      
1443. /* pt -- 旋转基点
      
1444. ver -- 旋转轴
      
1445. angle -- 旋转角度(角度制)
      
1446. 注意： 旋转轴不能垂直于面域平面、不能穿过面域*/
      
1447. //**************************************************
      
1448. void CreatRevolve(AcDbObjectId entid,
      
1449. AcGeVector3d normal,
      
1450. AcGePoint3d pt,
      
1451. AcGeVector3d ver,
      
1452. double angle)
      
1453. {
      
1454. Acad::ErrorStatus es;
      
1455. AcDbCurve *curve;
      
1456. AcDbObjectId tm;
      
1457. if (acdbOpenObject(curve,entid,AcDb::kForWrite)!=Acad::eOk)
      
1458. {
      
1459. acutPrintf("打开实体失败！");
      
1460. return ;
      
1461. }
      
1462. AcDbVoidPtrArray lines,regions1;
      
1463. lines.append((void*)curve);
      
1464. curve->close();
      
1465. es = AcDbRegion::createFromCurves(lines,regions1);
      
1466. if(es != Acad::eOk)
      
1467. {
      
1468. acutPrintf("获得面域失败！");
      
1469. return ;
      
1470. }
      
1471. angle = angle*PI/180;
      
1472. AcDbRegion *pregion1=AcDbRegion::cast((AcRxObject*)regions1[0]);
      
1473. AcDb3dSolid *p3dobj = new AcDb3dSolid;
      
1474. es = p3dobj->revolve(pregion1,pt,ver,angle);
      
1475. if (es != Acad::eOk)
      
1476. {
      
1477. acutPrintf("建立回转体失败!请检查回转轴和基准点是否正确!");
      
1478. }
      
1479. pBlockTableRecord->appendAcDbEntity(tm,p3dobj);
      
1480. p3dobj->close();
      
1481. delete pregion1;
      
1482. }
      
1483. 
      
1484. //复制对象
      
1485. void cloneSameOwnerObjects()
      
1486. {
      
1487. // Step 1: Obtain the set of objects to be cloned.
      
1488. ads_name sset;
      
1489. 
      
1490. if (acedSSGet(NULL, NULL, NULL, NULL, sset) != RTNORM) {
      
1491. acutPrintf("\nNothing selected");
      
1492. return;
      
1493. }
      
1494. 
      
1495. // Step 2: Add obtained object IDs to list of objects
      
1496. // to be cloned.
      
1497. long length;
      
1498. acedSSLength(sset, &length);
      
1499. AcDbObjectIdArray objList;
      
1500. AcDbObjectId ownerId = AcDbObjectId::kNull;
      
1501. 
      
1502. for (int i = 0; i < length; i++) {
      
1503. ads_name ent;
      
1504. acedSSName(sset, i, ent);
      
1505. AcDbObjectId objId;
      
1506. acdbGetObjectId(objId, ent);
      
1507. 
      
1508. // Check to be sure this has the same owner as the first
      
1509. // object.
      
1510. //
      
1511. AcDbObject *pObj;
      
1512. acdbOpenObject(pObj, objId, AcDb::kForRead);
      
1513. 
      
1514. if (pObj->ownerId() == ownerId)
      
1515. objList.append(objId);
      
1516. else if (i == 0) {
      
1517. ownerId = pObj->ownerId();
      
1518. objList.append(objId);
      
1519. }
      
1520. pObj->close();
      
1521. }
      
1522. 
      
1523. acedSSFree(sset);
      
1524. 
      
1525. // Step 3: Get the object ID of the desired owner for
      
1526. // the cloned objects. We'll use model space for
      
1527. // this example.
      
1528. //
      
1529. AcDbBlockTable *pBlockTable;
      
1530. acdbHostApplicationServices()->workingDatabase()
      
1531. ->getSymbolTable(pBlockTable, AcDb::kForRead);
      
1532. 
      
1533. AcDbObjectId modelSpaceId;
      
1534. pBlockTable->getAt(ACDB_MODEL_SPACE, modelSpaceId);
      
1535. pBlockTable->close();
      
1536. 
      
1537. // Step 4: Create a new ID map.
      
1538. //
      
1539. AcDbIdMapping idMap;
      
1540. 
      
1541. // Step 5: Call deepCloneObjects().
      
1542. //
      
1543. acdbHostApplicationServices()->workingDatabase()
      
1544. ->deepCloneObjects(objList, modelSpaceId, idMap);
      
1545. 
      
1546. // Now we can go through the ID map and do whatever we'd
      
1547. // like to the original and/or clone objects.
      
1548. //
      
1549. // For this example, we'll print out the object IDs of
      
1550. // the new objects resulting from the cloning process.
      
1551. //
      
1552. AcDbIdMappingIter iter(idMap);
      
1553. for (iter.start(); !iter.done(); iter.next()) {
      
1554. AcDbIdPair idPair;
      
1555. iter.getMap(idPair);
      
1556. if (!idPair.isCloned())
      
1557. continue;
      
1558. acutPrintf("\nObjectId is: %Ld",
      
1559. 
      
1560. idPair.value().asOldId());
      
1561. }
      
1562. 
      
1563. }
      
1564. 
      
1565. 
      
1566. 
      
1567. 线和面求交,线和三角形交.
      
1568. 
      
1569. bool InterSection(XRay& ray,XPlan& plan,XPoint& point,float & t)
      
1570. {
      
1571. t = 0;
      
1572. 
      
1573. /***
      
1574. 
      
1575. -D - P0 * N(A,B,C)
      
1576. t = --------------------
      
1577. d * N(A,B,C)
      
1578. 
      
1579. 其中D 为平面方程中的D,
      
1580. P0为射线的起点。而 d 为射线的方向
      
1581. 
      
1582. **/
      
1583. t= -(plan.D + ray.m_Point.x * plan.A + ray.m_Point.y * plan.B + ray.m_Point.z * plan.C);
      
1584. float t2 = (ray.m_Dir.x * plan.A + ray.m_Dir.y * plan.B + ray.m_Dir.z * plan.C) ;
      
1585. 
      
1586. if(t2 == 0.00)
      
1587. return false;
      
1588. 
      
1589. t /= t2;
      
1590. 
      
1591. 
      
1592. //求出交点
      
1593. point = ray.m_Point + ray.m_Dir * t;
      
1594. 
      
1595. if( t < 0)
      
1596. return false;
      
1597. 
      
1598. return true;
      
1599. }
      
1600. 
      
1601. 
      
1602. bool InterSection(XRay& ray,XTriangle& tri,XPoint& point,float & t)
      
1603. {
      
1604. 
      
1605. XVector3D v1 = tri.m_points[1] - tri.m_points[0];
      
1606. XVector3D v2 = tri.m_points[2] - tri.m_points[0];
      
1607. 
      
1608. XVector3D n = v1.cp(v2);
      
1609. /**********************************************************************
      
1610. ray = p0 + D * t
      
1611. Tri : p1 - p3
      
1612. 
      
1613. (P2-P1) X (P3-P1) = N
      
1614. 
      
1615. N * (P - P1) = 0 ===>
      
1616. N * (P0 + D * t - P1) = 0
      
1617. 
      
1618. ==>
      
1619. 
      
1620. N * (P0 - P1) + N * D * t = 0;
      
1621. (P1-P0) * N
      
1622. t = ----------------------
      
1623. D * N
      
1624. ******************************************************************/
      
1625. t = n.dp(tri.m_points[0] - ray.m_Point);
      
1626. t /= (ray.m_Dir.dp(n));
      
1627. if( t < 0)
      
1628. return false;
      
1629. 
      
1630. //求出交点
      
1631. point = ray.m_Point + ray.m_Dir * t;
      
1632. 
      
1633. //判断点是不是在三角内部
      
1634. v1 = point - tri.m_points[0];
      
1635. v2 = point - tri.m_points[1];
      
1636. XVector3D v3 = point - tri.m_points[2];
      
1637. 
      
1638. n = v1.cp(v2);
      
1639. XVector3D n1 = v2.cp(v3);
      
1640. 
      
1641. if(n.isZero())
      
1642. return true;
      
1643. if(n1.isZero())
      
1644. return true;
      
1645. 
      
1646. if( n.x * n1.x <= 0 )
      
1647. return false;
      
1648. if( n.y * n1.y <= 0 )
      
1649. return false;
      
1650. if( n.z * n1.z <= 0 )
      
1651. return false;
      
1652. 
      
1653. return true;
      
1654. }
      
1655. 
      
1656. 
      
1657. //命名对象词典中无所需生成的词典（dictName）时生成词典，当DdictName存在时直接返回
      
1658. void createDictionary(char *dictName)
      
1659. {
      
1660. AcDbDictionary *pNameDict;
      
1661. acdbHostApplicationServices()->workingDatabase()->
      
1662. getNamedObjectsDictionary(pNameDict, AcDb::kForWrite);
      
1663. 
      
1664. 
      
1665. AcDbDictionary *pDict;
      
1666. if (pNameDict->getAt(dictName, (AcDbObject*&) pDict,
      
1667. AcDb::kForWrite) == Acad::eKeyNotFound)
      
1668. {
      
1669. pDict = new AcDbDictionary;
      
1670. AcDbObjectId DictId;
      
1671. pNameDict->setAt(dictName, pDict, DictId);
      
1672. }
      
1673. pNameDict->close();
      
1674. pDict->close();
      
1675. }
      
1676. 
      
1677. //将自定义对象pObj加入词典dictName，对象名为objectName。词典dictName不存在时，调用creatDictionary()生成。
      
1678. void addObjectToDict(AcDbObject *pObj,char *objectName,char *dictName)
      
1679. {
      
1680. createDictionary(dictName);
      
1681. 
      
1682. AcDbDictionary *pNamedobj;
      
1683. acdbHostApplicationServices()->workingDatabase()
      
1684. ->getNamedObjectsDictionary(pNamedobj, AcDb::kForRead);
      
1685. 
      
1686. Acad::ErrorStatus es;
      
1687. AcDbDictionary *pDict;
      
1688. es=pNamedobj->getAt(dictName, (AcDbObject*&)pDict,
      
1689. AcDb::kForWrite);
      
1690. 
      
1691. pNamedobj->close();
      
1692. 
      
1693. if (es==Acad::eOk) //使用if(pDict)不能起到判断的作用。
      
1694. {
      
1695. // add new objects to the dictionary,
      
1696. // then close them.
      
1697. AcDbObjectId rId1;
      
1698. pDict->setAt(objectName, pObj, rId1);
      
1699. pDict->close(); //不能放在该处{}之外，即未能正常获取，就无所谓关闭，否则出错。
      
1700. }
      
1701. // pDict->close();
      
1702. 
      
1703. }
      
1704. 
      
1705. //根据CAD两点坐标及对应的大地坐标（经纬距）计算两坐标系的夹角angle及比例转换系数K
      
1706. //计算大地坐标系原点在CAD世界坐标系中的原点坐标earthorg
      
1707. //函数return夹角，其单位为弧度
      
1708. float EonAndXoyAngle(ads_point cadPt1,ads_point cadPt2,ads_point earthPt1,ads_point earthPt2,double &k,ads_point &earthOrg)
      
1709. {
      
1710. float angle;
      
1711. double n,e,x,y;
      
1712. float ax,ae;
      
1713. 
      
1714. 
      
1715. n=(earthPt2[Y]-earthPt1[Y]);
      
1716. e=(earthPt2[X]-earthPt1[X]);
      
1717. x=(cadPt2[X]-cadPt1[X]);
      
1718. y=(cadPt2[Y]-cadPt1[Y]);
      
1719. 
      
1720. k=sqrt((n*n+e*e)/(x*x+y*y));
      
1721. 
      
1722. ax=atan2(y,x); //线段与X轴的夹角
      
1723. ae=atan2(n,e); //线段与E轴的夹角
      
1724. 
      
1725. angle=(ax-ae);
      
1726. 
      
1727. earthOrg[X]=cadPt1[X]-(cos(angle)*earthPt1[X]-sin(angle)*earthPt1[Y])/k;
      
1728. earthOrg[Y]=cadPt1[Y]-(cos(angle)*earthPt1[Y]+sin(angle)*earthPt1[X])/k;
      
1729. return angle;
      
1730. }
      
1731. //将CAD坐标转换为大地坐标
      
1732. void xyToEn(ads_point cadPt,ads_point& earthPt,ads_point earthOrg,float angle, double k)
      
1733. {
      
1734. earthPt[X]=k*(cos(angle)*(cadPt[X]-earthOrg[X])+sin(angle)*(cadPt[Y]-earthOrg[Y]));
      
1735. earthPt[Y]=k*(-sin(angle)*(cadPt[X]-earthOrg[X])+cos(angle)*(cadPt[Y]-earthOrg[Y]));
      
1736. }
      
1737. //将大地坐标转换为CAD坐标
      
1738. void enToXY(ads_point earthPt,ads_point& cadPt,ads_point earthOrg,float angle, double k)
      
1739. {
      
1740. cadPt[X]=earthOrg[X]+(cos(angle)*earthPt[X]-sin(angle)*earthPt[Y])/k;
      
1741. cadPt[Y]=earthOrg[Y]+(cos(angle)*earthPt[Y]+sin(angle)*earthPt[X])/k;
      
1742. }
      
1743. // 判定当前图形中有无给定块名的块表记录，有返回true、同时返回其id，
      
1744. //否则返回flase
      
1745. bool existBlock(char* pBlockName,AcDbObjectId &blockId)
      
1746. {
      
1747. AcDbBlockTable* pBlockTable;
      
1748. 
      
1749. acdbHostApplicationServices()->workingDatabase()
      
1750. ->getSymbolTable(pBlockTable,AcDb::kForRead);
      
1751. if(pBlockTable->has(pBlockName))
      
1752. {
      
1753. pBlockTable->getAt(pBlockName,blockId);
      
1754. pBlockTable->close();
      
1755. return true;
      
1756. }
      
1757. else
      
1758. {
      
1759. pBlockTable->close();
      
1760. return false;
      
1761. }
      
1762. }
      
1763. // 把一图形文件dwg插入当前图形作为一块，并给予块名。若有同名块就不再插入。
      
1764. bool insertDwgToCurDwg(char* pFullPathFile,char* pBlockName,AcDbObjectId &blockId)
      
1765. {
      
1766. AcDbDatabase *pNewDb,*pCurDb;
      
1767. Acad::ErrorStatus es;
      
1768. 
      
1769. if(existBlock(pBlockName,blockId))
      
1770. {
      
1771. return true;
      
1772. }
      
1773. 
      
1774. 
      
1775. pNewDb=new AcDbDatabase(Adesk::kFalse);
      
1776. es=pNewDb->readDwgFile(pFullPathFile, _SH_DENYNO,false);
      
1777. if (es!=Acad::eOk)
      
1778. {
      
1779. acutPrintf("读文件错");
      
1780. delete pNewDb;
      
1781. return false;
      
1782. }
      
1783. 
      
1784. pCurDb =acdbHostApplicationServices()->workingDatabase();
      
1785. if((es=pCurDb->insert(blockId, pBlockName,pNewDb, true))==Acad::eOk)
      
1786. {
      
1787. 
      
1788. delete pNewDb;
      
1789. return true;
      
1790. }
      
1791. else
      
1792. {
      
1793. delete pNewDb;
      
1794. return false;
      
1795. }
      
1796. 
      
1797. }
      
1798. 
      
1799. 
      
1800. AcGePlane
      
1801. CRegionGraph::getUcsPlane(AcDbDatabase* db)
      
1802. {
      
1803. ASSERT(db != NULL);
      
1804. 
      
1805. AcGeMatrix3d m;
      
1806. 
      
1807. if (acdbUcsMatrix(m, db)) {
      
1808. AcGePoint3d origin;
      
1809. AcGeVector3d xDir, yDir, zDir;
      
1810. 
      
1811. m.getCoordSystem(origin, xDir, yDir, zDir);
      
1812. AcGePlane ucsPlane(origin, xDir, yDir);
      
1813. return ucsPlane;
      
1814. }
      
1815. else {
      
1816. ASSERT(0);
      
1817. AcGePlane ucsPlane(AcGePoint3d::kOrigin, AcGeVector3d::kIdentity);
      
1818. return ucsPlane;
      
1819. }
      
1820. }
      
1821. 
      
1822. //*****************************
      
1823. AcGeVector3d
      
1824. CRegionGraph::getUcsXAxis(AcDbDatabase* db)
      
1825. {
      
1826. ASSERT(db != NULL);
      
1827. 
      
1828. AcGeMatrix3d m;
      
1829. 
      
1830. if (acdbUcsMatrix(m, db)) {
      
1831. AcGePoint3d origin;
      
1832. AcGeVector3d xDir, yDir, zDir;
      
1833. 
      
1834. m.getCoordSystem(origin, xDir, yDir, zDir);
      
1835. return xDir;
      
1836. }
      
1837. else {
      
1838. ASSERT(0);
      
1839. return AcGeVector3d::kXAxis;
      
1840. }
      
1841. }
      
1842. 
      
1843. /****************************************************************************
      
1844. **
      
1845. ** CRegionGraph::getUcsYAxis
      
1846. ** returns current UCS Y Axis, even if currently the paperSpace viewport
      
1847. **
      
1848. ** **jma
      
1849. */
      
1850. //*************************************/
      
1851. 
      
1852. AcGeVector3d
      
1853. CRegionGraph::getUcsYAxis(AcDbDatabase* db)
      
1854. {
      
1855. ASSERT(db != NULL);
      
1856. 
      
1857. AcGeMatrix3d m;
      
1858. 
      
1859. if (acdbUcsMatrix(m, db)) {
      
1860. AcGePoint3d origin;
      
1861. AcGeVector3d xDir, yDir, zDir;
      
1862. 
      
1863. m.getCoordSystem(origin, xDir, yDir, zDir);
      
1864. return yDir;
      
1865. }
      
1866. else {
      
1867. ASSERT(0);
      
1868. return AcGeVector3d::kYAxis;
      
1869. }
      
1870. }
      
1871. 
      
1872. /****************************************************************************
      
1873. **
      
1874. ** CRegionGraph::getUcsZAxis
      
1875. **
      
1876. ** **jma
      
1877. **
      
1878. *************************************/
      
1879. 
      
1880. AcGeVector3d
      
1881. CRegionGraph::getUcsZAxis(AcDbDatabase* db)
      
1882. {
      
1883. ASSERT(db != NULL);
      
1884. 
      
1885. AcGeMatrix3d m;
      
1886. 
      
1887. if (acdbUcsMatrix(m, db)) {
      
1888. AcGePoint3d origin;
      
1889. AcGeVector3d xDir, yDir, zDir;
      
1890. 
      
1891. m.getCoordSystem(origin, xDir, yDir, zDir);
      
1892. return zDir;
      
1893. }
      
1894. else {
      
1895. ASSERT(0);
      
1896. return AcGeVector3d::kZAxis;
      
1897. }
      
1898. }
      
1899. 
      
1900. 
      
1901. //指定两点Pnt3d1,Pnt3d2,查询Pnt3d3是否在由前两点组成的线的左边,坐标被投影成二维
      
1902. BOOL CCommonHanlder::QueryPntIsOnLineLeft(AcGePoint3d Pnt3d1,AcGePoint3d Pnt3d2,AcGePoint3d Pnt3d3)
      
1903. {
      
1904. AcGePlane plane;
      
1905. AcGePoint2d Pnt1,Pnt2,Pnt3;
      
1906. Pnt1=Pnt3d1.convert2d(plane);
      
1907. Pnt2=Pnt3d2.convert2d(plane);
      
1908. Pnt3=Pnt3d3.convert2d(plane);
      
1909. AcGeVector2d vec1,vec2;
      
1910. AcGeLineSeg2d lin1,lin2;
      
1911. lin1.set(Pnt2,Pnt1);
      
1912. vec1=lin1.direction();
      
1913. lin2.set(Pnt1,Pnt3);
      
1914. vec2=lin2.direction();
      
1915. if(sin(vec1.angle()-vec2.angle())>0)
      
1916. return FALSE;
      
1917. else
      
1918. return TRUE;
      
1919. }
      
1920. 
      
1921. 
      
1922. /////////////////////创建窗体图层"Window_Layer"/////////////////
      
1923. AcDbObjectId
      
1924. createWindowsLayer()
      
1925. {
      
1926. //打开层表，打开方式为只写///
      
1927. AcDbLayerTable *pLayerTable;
      
1928. acdbHostApplicationServices()->workingDatabase()
      
1929. ->getSymbolTable(pLayerTable,AcDb::kForWrite);
      
1930. //初始化层表记录对象，并设定层表记录的名称“Window_Layer”
      
1931. 
      
1932. AcDbLayerTableRecord *pLayerTableRecord=new AcDbLayerTableRecord;
      
1933. pLayerTableRecord->setName("Window_Layer");
      
1934. 
      
1935. AcCmColor color;
      
1936. color.setColorIndex(1); // set color to red
      
1937. 
      
1938. pLayerTableRecord->setColor(color);
      
1939. //层的其他属性（线型等）都用缺省值////
      
1940. 
      
1941. //将新建的层表记录添加到层表中，并将层表记录的ID保存到pLayerId作为函数的返回值////
      
1942. 
      
1943. AcDbObjectId pLayerId;
      
1944. pLayerTable->add(pLayerId,pLayerTableRecord);
      
1945. //关闭层表和层表记录对象///
      
1946. pLayerTable->close();
      
1947. pLayerTableRecord->close();
      
1948. 
      
1949. return pLayerId;
      
1950. }
      
1951. 
      
1952. 
      
1953. 
      
1954. ///*************在指定点插入指定块*******************\\\
      
1955. void CTestPlate::OnBlockInsert()
      
1956. {
      
1957. // TODO: Add your control notification handler code here
      
1958. acDocManager->lockDocument(curDoc());
      
1959. AcDbObjectId blockId; //要插入的块的Id值
      
1960. AcDbBlockTable *pBlockTable;
      
1961. acdbHostApplicationServices()->workingDatabase()
      
1962. ->getSymbolTable(pBlockTable,AcDb::kForRead);
      
1963. Acad::eOk!=pBlockTable->getAt("ASDK-NO-ATTR",
      
1964. blockId,AcDb::kForRead)//根据块名获得要插入的块的ID值
      
1965. AcDbBlockReference *pBlkRef=new AcDbBlockReference;//插入块实质是插入块的引用
      
1966. pBlkRef->setBlockTableRecord(blockId);//指定所引用的图块表记录的对象ID
      
1967. resbuf to,from;
      
1968. from.restype=RTSHORT;//插入图块要进行用户坐标与世界坐标的转换
      
1969. from.resval.rint=1;//UCS
      
1970. to.restype=RTSHORT;
      
1971. to.resval.rint=0;//WCS
      
1972. AcGeVector3d normal(0.0,0.0,1.0);
      
1973. acedTrans(&(normal.x),&from,&to,Adesk::kTrue,&(normal.x));//转换函数
      
1974. AcGePoint3d basePoint(12,23,0);//指定的插入点(可以根据需要输入)
      
1975. //acedGetPoint(NULL,"\nEnter insertion point:",asDblArray(basePoint));
      
1976. pBlkRef->setPosition(basePoint);
      
1977. pBlkRef->setRotation(0.0);
      
1978. pBlkRef->setNormal(normal);
      
1979. AcDbBlockTableRecord *pBlockTableRecord;
      
1980. pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);
      
1981. pBlockTable->close();
      
1982. AcDbObjectId newEntId;
      
1983. pBlockTableRecord->appendAcDbEntity(newEntId,pBlkRef);
      
1984. pBlockTableRecord->close();
      
1985. pBlkRef->close();
      
1986. acDocManager->lockDocument(curDoc());
      
1987. }
      
1988. 
      
1989. 
      
1990. //點遷多義線中之一直線，獲得線段之位置（圓弧可自行補上）
      
1991. void GetPolyLineSelectLineIndex(AcDbPolyline *Poly,AcGePoint3d SelectPt,int Index)
      
1992. {
      
1993. AcGePoint2d tempPt;
      
1994. double Distance=11111111;
      
1995. tempPt.x=SelectPt.x;
      
1996. tempPt.y=SelectPt.y;
      
1997. AcDbVoidPtrArray entitySet;
      
1998. Poly->explode(entitySet);
      
1999. for(int i=0;i<ENTITYSET.LENGTH();I++)
      
2000. {
      
2001. AcDbEntity *pEnt;
      
2002. pEnt=AcDbPolyline::cast((AcRxObject*)entitySet[i]);
      
2003. if(pEnt->isA()==AcDbLine::desc())
      
2004. {
      
2005. AcDbLine *pLine=AcDbLine::cast(pEnt);
      
2006. AcGePoint2d StPt,EndPt;
      
2007. StPt.x=pLine->startPoint().x;
      
2008. StPt.y=pLine->startPoint().y;
      
2009. EndPt.x=pLine->endPoint().x;
      
2010. EndPt.y=pLine->endPoint().y;
      
2011. pLine->close();
      
2012. AcGeLine2d GeLine(StPt,EndPt);
      
2013. double pama=0;
      
2014. if((GeLine.isOn(tempPt,pama)==Adesk::kTrue)&&pama<=1&&pama>=0)
      
2015. {
      
2016. Index=i;
      
2017. break;
      
2018. }
      
2019. else
      
2020. {
      
2021. if(GeLine.distanceTo(tempPt)<DISTANCE)
      
2022. {
      
2023. AcGeLine2d tempLine;
      
2024. GeLine.getPerpLine(tempPt,tempLine);
      
2025. AcGePoint2d InsertPt;
      
2026. GeLine.intersectWith(tempLine,InsertPt);
      
2027. double pama=0;
      
2028. if((GeLine.isOn(InsertPt,pama)==Adesk::kTrue)&&pama<=1&&pama>=0)
      
2029. {
      
2030. Distance=GeLine.distanceTo(tempPt);
      
2031. Index=i;
      
2032. }
      
2033. }
      
2034. }
      
2035. }
      
2036. pEnt->close();
      
2037. }
      
2038. }
      
2039. 
      
2040. int unionSolid(AcDbObjectId extrudeId,AcDb3dSolid *&pSolid)
      
2041. {
      
2042. //打开切弧实体 pExtrude
      
2043. AcDb3dSolid *pExtrude;
      
2044. if (Acad::eOk!=acdbOpenObject(pExtrude,extrudeId,AcDb::kForWrite)){
      
2045. acutPrintf("\nError: Invalid extrude solid! ");
      
2046. if(pExtrude!=NULL) pExtrude->close();
      
2047. return RTERROR;
      
2048. }
      
2049. if(pExtrude==NULL){
      
2050. acutPrintf("\nError: Invalid extrude solid! ");
      
2051. return RTERROR;
      
2052. }
      
2053. 
      
2054. // 实体
      
2055. if(pSolid==NULL){
      
2056. acutPrintf("\nError: Invalid extrude solid! ");
      
2057. return RTERROR;
      
2058. }
      
2059. //Unit
      
2060. if(Acad::eOk!=pSolid->booleanOper(AcDb::kBoolUnite,pExtrude))
      
2061. {
      
2062. acutPrintf("\nError: substract error!");
      
2063. pExtrude->close();
      
2064. return RTERROR;
      
2065. }
      
2066. pExtrude->close();
      
2067. return RTNORM;
      
2068. }
      
2069. 
      
2070. Acad::ErrorStatus DyZoom(AcGePoint2d CenterPt,double Height,double Width)
      
2071. {
      
2072. Acad::ErrorStatus es;
      
2073. AcDbViewTableRecord *view=new AcDbViewTableRecord();
      
2074. view->setCenterPoint(CenterPt);
      
2075. view->setFrontClipAtEye(false);
      
2076. view->setHeight(Height);
      
2077. view->setWidth(Width);
      
2078. es=acedSetCurrentView(view,NULL);
      
2079. view->close();
      
2080. delete view;
      
2081. view=NULL;
      
2082. return es;
      
2083. }
      
2084. 
      
2085. 创建circle和newlayer（加了错误检查的代码）
      
2086. Acad::ErrorStatus
      
2087. createCircle(AcDbObjectId& circleId)
      
2088. {
      
2089. circleId = AcDbObjectId::kNull;
      
2090. 
      
2091. AcGePoint3d center(9.0,3.0,0.0);
      
2092. AcGeVector3d normal(0.0,0.0,0.1);
      
2093. AcDbCircle*pCirc=new AcDbCircle(center,normal,2.0);
      
2094. 
      
2095. if(pCirc==NULL)
      
2096. return Acad::eOutOfMemory;
      
2097. 
      
2098. AcDbBlockTable*pBlockTable;
      
2099. Acad::ErrorStatus es=
      
2100. acdbHostApplicationServices()->workingDatabase()->
      
2101. getSymbolTable(pBlockTable,AcDb::kForRead);
      
2102. if(es!=Acad::eOk)
      
2103. {
      
2104. delete pCirc;
      
2105. return es;
      
2106. }
      
2107. 
      
2108. AcDbBlockTableRecord*pBlockTableRecord;
      
2109. es=pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);
      
2110. if(es!=Acad::eOk){
      
2111. Acad::ErrorStatus es2=pBlockTable->close();
      
2112. if (es2!=Acad::eOk){
      
2113. acrx_abort("\n应用程序X关闭边失败,错误码为:%d",
      
2114. acadErrorStatusText(es2));
      
2115. }
      
2116. delete pCirc;
      
2117. return es;
      
2118. }
      
2119. 
      
2120. es=pBlockTable->close();
      
2121. if (es!=Acad::eOk)
      
2122. {
      
2123. acrx_abort("\n应用程序X关闭边失败,错误码为:%d",
      
2124. acadErrorStatusText(es));
      
2125. }
      
2126. es=pBlockTableRecord->appendAcDbEntity(circleId,pCirc);
      
2127. if(es!=Acad::eOk){
      
2128. Acad::ErrorStatus es2=pBlockTableRecord->close();
      
2129. if (es2!=Acad::eOk){
      
2130. acrx_abort("\n应用程序X关闭模型空间块表记录失败,错误码为:%s",
      
2131. acadErrorStatusText(es2));
      
2132. }
      
2133. delete pCirc;
      
2134. return es;
      
2135. }
      
2136. 
      
2137. es=pBlockTableRecord->close();
      
2138. if(es!=Acad::eOk)
      
2139. {
      
2140. acrx_abort("\n应用程序X关闭模型空间块表记录失败,错误码为:%d",
      
2141. acadErrorStatusText(es));
      
2142. }
      
2143. 
      
2144. es=pCirc->close();
      
2145. if(es!=Acad::eOk){
      
2146. acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",
      
2147. acadErrorStatusText(es));
      
2148. }
      
2149. return es;
      
2150. }
      
2151. 
      
2152. 
      
2153. Acad::ErrorStatus
      
2154. createNewLayer()
      
2155. {
      
2156. AcDbLayerTableRecord*pLayerTableRecord=new AcDbLayerTableRecord;
      
2157. 
      
2158. if (pLayerTableRecord==NULL)
      
2159. return Acad::eOutOfMemory;
      
2160. 
      
2161. Acad::ErrorStatus es
      
2162. =pLayerTableRecord->setName("ASDK_MYLAYER");
      
2163. if(es!=Acad::eOk)
      
2164. {
      
2165. delete pLayerTableRecord;
      
2166. return es;
      
2167. }
      
2168. 
      
2169. AcDbLayerTable*pLayerTable;
      
2170. es=acdbHostApplicationServices()->workingDataBase()->
      
2171. getSymbolTable(pLayerTable,AcDb::kForWrite);
      
2172. if(es!=Acad::eOk){
      
2173. delete pLayerTableRecord;
      
2174. return es;
      
2175. }
      
2176. //由于先型对象ID的缺省直是0，不是有效的ID，必须将其设置为有效的ID，
      
2177. //即CONTINUOUS线型。其他数据成员都为有效缺省值，因此不须对其进行设置
      
2178. AcDbLinetypeTable*pLinetypeTbl;
      
2179. es=acdbHostApplicationServices()->workingDatabase()->
      
2180. getSymbolTable(pLinetypeTbl,AcDb::kForRead);
      
2181. if (es!=Acad::eOk){
      
2182. delete pLayerTableRecord;
      
2183. es=pLayerTable->close();
      
2184. 
      
2185. if(es!=Acad::eOk){
      
2186. acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",
      
2187. acadErrorStatusText(es));
      
2188. }
      
2189. return es;
      
2190. }
      
2191. 
      
2192. AcDbObjectId ltypeobjId;
      
2193. es=pLinetypeTbl->getAt("CONTINUOUS",ltypeObjId);
      
2194. if (es!=Acad::eOk){
      
2195. delete pLayerTableRecord;
      
2196. es=pLayerTable->close();
      
2197. if (es!=Acad::eOk){
      
2198. acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",acadErrorStatusText(es));
      
2199. }
      
2200. return es;
      
2201. }
      
2202. 
      
2203. pLayerTableRecord->setLinetypeObjectId(ltypeObjId);
      
2204. es=pLayerTable->add(pLayerTableRecord);
      
2205. if (es!=Acad::eOk)
      
2206. {
      
2207. Acad::ErrorStatus es2=pLayerTable->close();
      
2208. if (es2!=Acad::eOk)
      
2209. {
      
2210. 
      
2211. acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",
      
2212. acadErrorStatusText(es2));
      
2213. }
      
2214. delete pLayerTableRecord;
      
2215. return es;
      
2216. }
      
2217. 
      
2218. es=pLayerTable->close();
      
2219. if(es!=Acad::eOk)
      
2220. {
      
2221. acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",
      
2222. acadErrorStatusText(es));
      
2223. }
      
2224. es=pLayerTableRecord->close();
      
2225. if(es!=Acad::eOk)
      
2226. {
      
2227. acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",
      
2228. acadErrorStatusText(es));
      
2229. }
      
2230. return es;
      
2231. }
      
2232. 
      
2233. 
      
2234. Function name: setEntityElevation
      
2235. Parameters: ads_name, double
      
2236. Return value: False or True
      
2237. 
      
2238. According to the Entity name setting the elevation value of text,polyline,2dpolyline,block,hatch which is given
      
2239. BOOL setEntityElevation(ads_name en, double elevation)
      
2240. { AcDbEntity* pEnt;
      
2241. AcDbObjectId eId;
      
2242. 
      
2243. if(acdbGetObjectId(eId, en) != Acad::eOk) return FALSE;
      
2244. if(acdbOpenObject(pEnt,eId,AcDb::kForWrite) != Acad::eOk) return FALSE;
      
2245. if(!pEnt) { acutPrintf("\nFail to open Database!!"); return FALSE; }
      
2246. 
      
2247. if(pEnt->isKindOf(AcDbPolyline::desc())) {
      
2248. ((AcDbPolyline*)pEnt)->setElevation(elevation);
      
2249. pEnt->close(); // Finished with the pEnt header.
      
2250. }
      
2251. else if(pEnt->isKindOf(AcDb2dPolyline::desc())) {
      
2252. ((AcDb2dPolyline*)pEnt)->setElevation(elevation);
      
2253. pEnt->close(); // Finished with the pEnt header.
      
2254. }
      
2255. else if(pEnt->isKindOf(AcDbText::desc())) {
      
2256. AcGePoint3d point3d;
      
2257. point3d = ((AcDbText*)pEnt)->position();
      
2258. point3d[2] = elevation;
      
2259. ((AcDbText*)pEnt)->setPosition(point3d);
      
2260. pEnt->close(); // Finished with the pEnt header.
      
2261. }
      
2262. else if(pEnt->isKindOf(AcDbMText::desc())) {
      
2263. AcGePoint3d point3d;
      
2264. point3d = ((AcDbMText*)pEnt)->location();
      
2265. point3d[2] = elevation;
      
2266. ((AcDbMText*)pEnt)->setLocation(point3d);
      
2267. pEnt->close(); // Finished with the pEnt header.
      
2268. }
      
2269. else if(pEnt->isKindOf(AcDbBlockReference::desc())) {
      
2270. AcGePoint3d point3d;
      
2271. point3d = ((AcDbBlockReference*)pEnt)->position();
      
2272. point3d[2] = elevation;
      
2273. ((AcDbBlockReference*)pEnt)->setPosition(point3d);
      
2274. pEnt->close(); // Finished with the pEnt header.
      
2275. }
      
2276. else if(pEnt->isKindOf(AcDbShape::desc())) {
      
2277. AcGePoint3d point3d;
      
2278. point3d = ((AcDbShape*)pEnt)->position();
      
2279. point3d[2] = elevation;
      
2280. ((AcDbShape*)pEnt)->setPosition(point3d);
      
2281. pEnt->close(); // Finished with the pEnt header.
      
2282. }
      
2283. else if(pEnt->isKindOf(AcDbHatch::desc())) {
      
2284. ((AcDbHatch*)pEnt)->setElevation(elevation);
      
2285. pEnt->close(); // Finished with the pEnt header.
      
2286. }
      
2287. else { pEnt->close(); return FALSE; }
      
2288. return TRUE;
      
2289. 
      
2290. 推荐使用方法二，基本上适用于AutoCAD所有版本（我可是跟踪分析注册表，费了好大一番劲才搞出来的哟）。"W-SCAS2006"为/p参数启动的配置名称。
      
2291. 只要在退出消息里调用这个函数就行，如：在kPreQuitMsg消息里。
      
2292. /*case AcRx::kPreQuitMsg:
      
2293. REStoreDefPro();
      
2294. break;*/
      
2295. 
      
2296. //////////////////////////////////////////////////////////////////////////
      
2297. // 函数名: REStoreDefPro
      
2298. // 输 入: /
      
2299. // 输 出: /
      
2300. // 功能描述: 恢复当前配置文件为AutoCAD默认配置
      
2301. // 全局变量: /
      
2302. // 调用模块:
      
2303. // 作 者: Meng Huang
      
2304. // 日 期: 2006.02.21
      
2305. // 修 改: Meng Huang
      
2306. // 日 期: 2006.02.23
      
2307. // 版 本: 1.1
      
2308. //////////////////////////////////////////////////////////////////////////
      
2309. void REStoreDefPro()
      
2310. {
      
2311. // 方法一：
      
2312. // AcApProfileNameArray arrNameList;
      
2313. // int nProfiles = acProfileManagerPtr()->ProfileListNames(arrNameList);
      
2314. // CString strProName;
      
2315. // Acad::ErrorStatus es;
      
2316. //
      
2317. // for (int i = 0; i < nProfiles; i++)
      
2318. // {
      
2319. // strProName = arrNameList[i];
      
2320. // if (strProName == _T("<<未命名配置>>") ||
      
2321. // strProName == _T("<>"))
      
2322. // {
      
2323. // /*es = */acProfileManagerPtr()->ProfileSetCurrent(strProName);
      
2324. // break;
      
2325. // }
      
2326. // else if (i == nProfiles - 1)
      
2327. // {
      
2328. // /*es = */acProfileManagerPtr()->ProfileCopy(_T("<<未命名配置>>"), _T("W-SCAS2006"), _T("默认配置名称"));
      
2329. // /*es = */acProfileManagerPtr()->ProfileReset(_T("<<未命名配置>>"));
      
2330. // /*es = */acProfileManagerPtr()->ProfileSetCurrent(_T("<<未命名配置>>"));
      
2331. // }
      
2332. // }
      
2333. 
      
2334. // 方法二：
      
2335. HKEY hKey;
      
2336. LONG lRetVal;
      
2337. DWORD unSubKeyNum = 0;
      
2338. DWORD sizeSubKey; // 子键大小
      
2339. TCHAR subKeyName[255]; // 子键名
      
2340. 
      
2341. // 打开HKEY_USERS主键
      
2342. lRetVal = RegOpenKeyEx(HKEY_USERS, _T(""), 0, KEY_READ, &hKey);
      
2343. if (lRetVal != ERROR_SUCCESS)
      
2344. return;
      
2345. 
      
2346. // 查得当前键下的子键项数
      
2347. lRetVal = RegQueryInfoKey(hKey, NULL, NULL, NULL, &unSubKeyNum, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
      
2348. if (lRetVal != ERROR_SUCCESS)
      
2349. {
      
2350. RegCloseKey(hKey);
      
2351. return;
      
2352. }
      
2353. 
      
2354. // 取得含有S-1-5-21-***********,但不包含Classes字符串的子键名
      
2355. CString strTmp;
      
2356. CString strFullSubKey;
      
2357. for (DWORD i = 0; i < unSubKeyNum; i++)
      
2358. {
      
2359. subKeyName[0] = '\0'; // 清空子键
      
2360. sizeSubKey = 255; // 赋缓冲区大小
      
2361. lRetVal = RegEnumKeyEx(hKey, i, subKeyName, &sizeSubKey, NULL, NULL, NULL, NULL);
      
2362. if (lRetVal != ERROR_SUCCESS)
      
2363. {
      
2364. RegCloseKey(hKey);
      
2365. return;
      
2366. }
      
2367. 
      
2368. strTmp = subKeyName;
      
2369. if (strTmp.Find(_T("S-1-5-21-")) != -1 &&
      
2370. strTmp.Find(_T("Classes")) == -1)
      
2371. {
      
2372. strFullSubKey = strTmp;
      
2373. break;
      
2374. }
      
2375. }
      
2376. if (strFullSubKey.IsEmpty()) // 没有找到符合条件的子键
      
2377. {
      
2378. RegCloseKey(hKey);
      
2379. return;
      
2380. }
      
2381. 
      
2382. // 获取和配置文件相对应的的子键字符串
      
2383. char *pchRegProfileKey;
      
2384. acProfileManagerPtr()->ProfileRegistryKey(pchRegProfileKey, _T("W-SCAS2006"));
      
2385. if (pchRegProfileKey == NULL)
      
2386. {
      
2387. RegCloseKey(hKey);
      
2388. return;
      
2389. }
      
2390. else
      
2391. {
      
2392. strTmp = pchRegProfileKey;
      
2393. acutDelString(pchRegProfileKey);
      
2394. int nStart = strTmp.Find('\');
      
2395. int nEnd = strTmp.ReverseFind('\');
      
2396. strTmp = strTmp.Mid(nStart, nEnd - nStart);
      
2397. RegCloseKey(hKey);
      
2398. }
      
2399. 
      
2400. strFullSubKey += strTmp; // 要修改键值的完整子键字符串
      
2401. 
      
2402. // 修改对应的键值(把该键值置空,下次启动CAD如果没指定/p参数则使用<<未命名配置>>,
      
2403. // 如果该配置不在,CAD会自动新一个,并使用它)
      
2404. lRetVal = RegOpenKeyEx(HKEY_USERS, strFullSubKey, 0, KEY_WRITE, &hKey);
      
2405. if (lRetVal != ERROR_SUCCESS)
      
2406. {
      
2407. RegCloseKey(hKey);
      
2408. return;
      
2409. }
      
2410. BYTE uchProFile[1] = {'\0'};
      
2411. RegSetValueEx(hKey, NULL, 0, REG_SZ, uchProFile, 1);
      
2412. RegCloseKey(hKey);
      
2413. }
      
2414. 
      
2415. 
      
2416. //************************************************************************
      
2417. //函数名称:selectEntityInLayer
      
2418. //函数类型:Acad::ErrorStatus
      
2419. //返回值:  正常：Acad::eOk
      
2420. //功能描述:选择指定图层上的所有实体！
      
2421. //函数作者:Darcy
      
2422. //创建日期:200X-XX-XX
      
2423. //参数列表:
      
2424. //变量名:nLayerName     变量类型:const char*           变量说明:(输入)图层名
      
2425. //变量名:nIDs           变量类型:AcDbObjectIdArray&    变量说明:(输出)图层中实体的对象标识符集合
      
2426. //************************************************************************
      
2427. Acad::ErrorStatus selectEntityInLayer(const char* nLayerName,AcDbObjectIdArray& nIDs)
      
2428. {
      
2429.   Acad::ErrorStatus es = Acad::eOk;
      
2430. 
      
2431.   ads_name ents;
      
2432.   struct resbuf *rb;
      
2433.   rb=acutNewRb(AcDb::kDxfLayerName);
      
2434.   rb->restype=8;
      
2435.   rb->resval.rstring=(char*)nLayerName;
      
2436.   rb->rbnext=NULL;
      
2437.   acedSSGet("X",NULL,NULL,rb,ents);
      
2438.   long entNums=0;
      
2439.   acedSSLength(ents,&entNums);
      
2440.   if (entNums == 0)
      
2441.     es = Acad::eInvalidInput;
      
2442.   else
      
2443.   {
      
2444.     for (long a = 0; a < entNums ; a ++)
      
2445.     {
      
2446.       AcDbObjectId  objId;
      
2447.       ads_name      ent;
      
2448.       acedSSName(ents,a,ent);
      
2449.       acdbGetObjectId(objId, ent);
      
2450.       nIDs.append(objId);
      
2451.     }
      
2452.   }
      
2453.   acedSSFree(ents);
      
2454.   acutRelRb(rb);
      
2455. 
      
2456.   return es;
      
2457. }
      
2458. 
      
2459. 
      
2460. //创建字体类型
      
2461. 代码:
      
2462. 
      
2463. void DrawAndEdit::createTextStyle(char *styleName, char *fontName, char *bigFontName, double textSize, double xScale, double obliqueAngle, double trPercent)
      
2464. {
      
2465.   AcDbTextStyleTable *pTextStyleTable;
      
2466. 
      
2467.     acdbHostApplicationServices()->workingDatabase()
      
2468.         ->getSymbolTable(pTextStyleTable, AcDb::kForRead);
      
2469.   AcDbTextStyleTableRecord *pRecord;
      
2470.   pTextStyleTable->getAt(ACDB_MODEL_SPACE,pRecord,
      
2471.     AcDb::kForWrite);
      
2472. 
      
2473.   if (!pTextStyleTable->has(styleName)){
      
2474.     AcDbObjectId recId;
      
2475.         pTextStyleTable->close();
      
2476.     acdbHostApplicationServices()->workingDatabase()
      
2477.       ->getSymbolTable(pTextStyleTable, AcDb::kForWrite);
      
2478.     pRecord = new AcDbTextStyleTableRecord();
      
2479.     pRecord->setName(styleName);
      
2480.     pRecord->setFileName(fontName);
      
2481.     pRecord->setBigFontFileName(bigFontName);
      
2482.     pRecord->setTextSize(textSize);
      
2483.     pRecord->setXScale(xScale);
      
2484.     pRecord->setObliquingAngle(obliqueAngle);
      
2485.     pRecord->setPriorSize(trPercent);
      
2486.     pTextStyleTable->add(recId,pRecord);
      
2487.     pRecord->close();
      
2488.   }
      
2489. 
      
2490.   pTextStyleTable->close();
      
2491. 
      
2492.   return;
      
2493. }
      
2494. 
      
2495. 
      
2496. //生成新组（sGroupName）
      
2497. //追加数组中所有实体到该组中
      
2498. //组名字 ,   Id数组
      
2499. int createGroup(CString sGroupName,
      
2500.                    const AcDbObjectIdArray *idArr)
      
2501. {
      
2502.   AcDbGroup       *pGroup = new AcDbGroup((LPSTR)(LPCTSTR)sGroupName);
      
2503.   AcDbObjectId     groupObjectId;
      
2504.   AcDbDictionary  *pGroupDict = NULL;
      
2505. 
      
2506.   acdbHostApplicationServices()->workingDatabase()
      
2507.         ->getGroupDictionary(pGroupDict, AcDb::kForWrite);
      
2508.   pGroupDict->setAt(sGroupName, pGroup, groupObjectId);
      
2509.   pGroupDict->close();
      
2510.     pGroup->close();
      
2511.     acdbOpenObject(pGroup, groupObjectId, AcDb::kForWrite);
      
2512.   for (int i = 0; i < idArr->length(); i++)
      
2513.   {
      
2514.     groupObjectId = idArr->at(i);
      
2515.     pGroup->append(groupObjectId);   
      
2516.   }
      
2517.   pGroup->close();
      
2518.   return TRUE;
      
2519. }
      
2520. 
      
2521. 
      
2522. AcDbObjectId CreateNewTextStyle()
      
2523. {
      
2524.   AcDbTextStyleTable *pTextStyleTable;
      
2525.   AcDbTextStyleTableRecord *pTextStyleTableRcd
      
2526.   AcDbObjectId textId;
      
2527.   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pTextStyleTable,AcDb::kForWrite);
      
2528. 
      
2529.   if (!pTextStyleTable->has(StyleName)
      
2530.   {
      
2531.     AcDbTextStyleTableRecord *pTSTblRcd= new AcDbTextStyleTableRecord;
      
2532.     pTSTblRcd->setName(StyleName);
      
2533.     pTSTblRcd->setFileName(fontName);
      
2534.     pTSTblRcd->setBigFontFileName(bigfontName);
      
2535.     pTSTblRcd->setTextSize(textSize);
      
2536.     pTSTblRcd->setXScale(xScale);
      
2537.     pTSTblRcd->setObliquingAngle(obliqueAngle);
      
2538.     pTSTblRcd->setPriorSize(trPercent);
      
2539.     pTextStyleTable->add(textId,pTextStyleTableRcd);
      
2540.     pTSTblRcd->close();
      
2541.   }
      
2542.     pTextStyleTable->close();
      
2543.   return textId;
      
2544. 
      
2545. }
      
2546. 
      
2547. void CMyDatabase::rotationGroup(CString strGroupName ,CReiPoint ptRotation,double rotationAngle)
      
2548. {
      
2549.   AcGePoint3d pt;
      
2550.   AcDbDictionary *pGroupDict;
      
2551.   acdbCurDwg()->getGroupDictionary(pGroupDict,AcDb::kForWrite);
      
2552.   AcDbObjectId groupId;
      
2553.   AcDbGroup *pGroup;
      
2554.   pt.x=ptRotation.x;
      
2555.   pt.y=ptRotation.y;
      
2556.   pt.z=ptRotation.z;
      
2557.   if(pGroupDict->getAt(strGroupName,groupId)==Acad::eOk)
      
2558.        acdbOpenObject(pGroup,groupId,AcDb::kForWrite);
      
2559.   else
      
2560.   {
      
2561.     pGroupDict->close();
      
2562.     return;
      
2563.   }
      
2564.   pGroupDict->close();
      
2565.   AcDbGroupIterator* pIter=pGroup->newIterator();
      
2566.   AcDbEntity* pEnt;
      
2567.   AcDbObjectId objId;
      
2568.     pIter=pGroup->newIterator();
      
2569.   for(;!pIter->done();pIter->next())
      
2570.   {
      
2571.     objId=pIter->objectId();
      
2572.     acdbOpenAcDbEntity(pEnt,objId,AcDb::kForWrite);
      
2573.     rotationEntity(pEnt,pt,rotationAngle);
      
2574.     pEnt->close();
      
2575.   }
      
2576.   delete pIter;
      
2577.   pGroup->close();
      
2578. }
      
2579. 
      
2580. //************************************************************************
      
2581. //函数名称:selectEntityInLayer
      
2582. //函数类型:Acad::ErrorStatus
      
2583. //返回值:
      
2584. //功能描述:选择指定层上的实体，得到其对象属性标识符！
      
2585. //函数作者:Darcy
      
2586. //创建日期:200X-XX-XX
      
2587. //参数列表:
      
2588. //变量名:nLayerName      变量类型:CString               变量说明:
      
2589. //变量名:nIDs            变量类型:AcDbObjectIdArray&    变量说明:
      
2590. //变量名:nModelSpace     变量类型:bool                  变量说明:
      
2591. //************************************************************************
      
2592. Acad::ErrorStatus    selectEntityInLayer(
      
2593.                                          CString nLayerName,
      
2594.                                          AcDbObjectIdArray& nIDs,
      
2595.                                          bool nModelSpace
      
2596.                                          )
      
2597. {
      
2598.     Acad::ErrorStatus es=Acad::eOk;
      
2599. 
      
2600.     AcDbBlockTable*        pBlockTable=NULL;
      
2601.     AcDbBlockTableRecord*  pSpaceRecord=NULL;
      
2602.     if (acdbHostApplicationServices()->workingDatabase()==NULL)
      
2603.         return Acad::eNoDatabase;
      
2604.     if ((es = acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable, AcDb::kForRead))==Acad::eOk)
      
2605.     {
      
2606.         char entryName[13];
      
2607.         if (nModelSpace)
      
2608.             strcpy(entryName,ACDB_MODEL_SPACE);
      
2609.         else
      
2610.             strcpy(entryName,ACDB_PAPER_SPACE);
      
2611.         //Get the Model or Paper Space record and open it for read:  
      
2612.         if ((es = pBlockTable->getAt((const char*)entryName, pSpaceRecord, AcDb::kForRead))==Acad::eOk)
      
2613.         {
      
2614.                 AcDbBlockTableRecordIterator* pIter;
      
2615.                 if (pSpaceRecord->newIterator(pIter)==Acad::eOk)
      
2616.                 {
      
2617.                     for (pIter->start();!pIter->done();pIter->step())
      
2618.                     {
      
2619.                         char *name=NULL;
      
2620.                         AcDbEntity* pEntity;
      
2621.                         if (pIter->getEntity(pEntity,AcDb::kForRead)==Acad::eOk)
      
2622.                         {
      
2623.                             name=pEntity->layer();
      
2624.                             if (nLayerName.CompareNoCase(name)==0)
      
2625.                                 nIDs.append(pEntity->objectId());
      
2626. 
      
2627.                             pEntity->close();
      
2628.                             acutDelString(name);
      
2629.                         }
      
2630.                     }
      
2631.                     delete pIter;
      
2632.                 }            
      
2633.                 pSpaceRecord->close();
      
2634.         }   
      
2635.         pBlockTable->close();
      
2636.     }
      
2637. 
      
2638.     return es;
      
2639. }
      
2640. 
      
2641. 功能:   判断两点是否相同(误差在指定范围内)
      
2642. 参数:   p1、p2为欲判定的两点
      
2643. 返回值: 0 -- 不相同；1 -- 相同
      
2644. //=========================================================
      
2645. int Equal_Points (const ads_point p1, const ads_point p2)
      
2646. {
      
2647.     // 指定误差范围
      
2648.     const ads_real Equality_Margin = (ads_real)0.00000001;
      
2649.    
      
2650.     int c ;
      
2651.     for (c = X ; c <= Z ; c++) {
      
2652.         if (fabs(p1[c] - p2[c]) > Equality_Margin) {
      
2653.             return (0) ;
      
2654.         }
      
2655.     }
      
2656.     return (1) ;
      
2657. }
      
2658. BOOL BaseHandle::PointIsInPolygon(AcGePoint3d pt, AcGePoint3dArray ptArr)
      
2659. {
      
2660.     int ptNum,i,interNum;
      
2661.     AcGePoint3d ptA,ptB;
      
2662.     ads_point pt0,pt1,pt2,ptIns,ptX;
      
2663.    
      
2664.     interNum = 0;
      
2665.     pt0[X] = 0.0;
      
2666.     pt0[Y] = 0.0;
      
2667.     pt0[Z] = 0.0;
      
2668.     ptX[X] = pt.x;
      
2669.     ptX[Y] = pt.y;
      
2670.     ptX[Z] = pt.z;
      
2671.     ptNum = ptArr.length();
      
2672.     for (i = 0;i < ptNum - 1;i++){
      
2673.       ptA = ptArr.at(i);
      
2674.       ptB = ptArr.at(i + 1);
      
2675.       pt1[X] = ptA.x;
      
2676.       pt1[Y] = ptA.y;
      
2677.       pt1[Z] = 0.0;
      
2678.       pt2[X] = ptB.x;
      
2679.       pt2[Y] = ptB.y;
      
2680.       pt2[Z] = 0.0;
      
2681.       if (acdbInters(ptX,pt0,pt1,pt2,1,ptIns) == RTNORM){
      
2682.         interNum++;
      
2683.       }
      
2684.     }
      
2685. //上述交点没有判断是否与某一端点重合，如果有interNum-1，有
      
2686. //兴趣的朋友可以修改完成。
      
2687.     if (interNum % 2 == 0){
      
2688.       return false;
      
2689.     }else{
      
2690.       return true;
      
2691.     }
      
2692. }
      
2693. 
      
2694. 
      
2695. //==========================================================
      
2696. 功能：新建一个图层
      
2697. 参数：LayerName -- 图层名，LayerColor -- 颜色名
      
2698. 返回：图层ID
      
2699. //==========================================================
      
2700. AcDbObjectId CreateNewLayer(CString LayerName, AcCmColor LayerColor)
      
2701. {
      
2702.   // 获得当前图形数据库的符号表
      
2703.   AcDbLayerTable *pLayerTable;
      
2704.   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLayerTable,
      
2705.     AcDb::kForWrite);
      
2706.   // 生成新的图层表记录
      
2707.   AcDbLayerTableRecord *pLayerTableRecord = new AcDbLayerTableRecord;
      
2708.   pLayerTableRecord->setName(LayerName);    // 设置图层名
      
2709.   pLayerTableRecord->setColor(LayerColor);  // 设置图层颜色
      
2710.   AcDbObjectId layerId;
      
2711.   pLayerTable->add(layerId,pLayerTableRecord);
      
2712.   // 关闭图层表和图层表记录
      
2713.   pLayerTable->close();
      
2714.   pLayerTableRecord->close();
      
2715.   return layerId;
      
2716. }
      
2717. 
      
2718. //==========================================================
      
2719. 功能：在指定图层上新建一条直线
      
2720. 参数：见注释
      
2721. 返回：直线ID
      
2722. //==========================================================
      
2723. AcDbObjectId CreateLine( double x1,double y1,double z1,  // 起点坐标
      
2724.                      double x2,double y2,double z2,  // 终点坐标
      
2725.                      AcDbObjectId layer)                   // 直线所在图层
      
2726. {
      
2727.   AcGePoint3d StartPt(x1,y1,z1);  // 起点
      
2728.   AcGePoint3d EndPt(x2,y2,z2);  // 终点
      
2729.   AcDbLine *pLine = new AcDbLine(StartPt,EndPt);
      
2730.   // 获得当前图形数据库的符号表
      
2731.   AcDbBlockTable *pBlockTable;
      
2732.   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pBlockTable,
      
2733.     AcDb::kForRead);
      
2734.   // 获得符号表中的模型空间块表记录指针，用于添加对象
      
2735.   AcDbBlockTableRecord *pBlockTableRecord;
      
2736.   pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);
      
2737.   pBlockTable->close();
      
2738.   // 将直线添加到模型空间块表记录中
      
2739.   AcDbObjectId lineId;
      
2740.   pLine->setLayer(layer,Adesk::kTrue);  // 设置直线所在图层
      
2741.   pBlockTableRecord->appendAcDbEntity(lineId,pLine);
      
2742.   // 关闭块表记录指针和直线指针
      
2743.   pBlockTableRecord->close();
      
2744.   pLine->close();
      
2745.   // 返回直线ID号
      
2746.   return lineId;
      
2747. }
      
2748. 
      
2749. 
      
2750. 
      
2751. 已知一段弧的起点和终点以及其凸度,求其圆心
      
2752. 
      
2753. int getCenter(ads_point startPoint,ads_point endPoint,double bulge,ads_point& center)
      
2754. {
      
2755. if (bulge==0.0)
      
2756. {
      
2757. ads_point_set(startPoint,center);
      
2758. return 0;
      
2759. }
      
2760. ads_point startPt,endPt;
      
2761. if (bulge<0.0)
      
2762. {
      
2763. ads_point_set(endPoint,startPt);
      
2764. ads_point_set(startPoint,endPt);
      
2765. bulge=bulge*(-1.0);
      
2766. }
      
2767. else
      
2768. {
      
2769. ads_point_set(startPoint,startPt);
      
2770. ads_point_set(endPoint,endPt);
      
2771. }
      
2772. double distStartToEnd,distX,distY,radius;
      
2773. distStartToEnd=ads_distance(startPt,endPt);
      
2774. distX=distStartToEnd/2.0;
      
2775. distY=bulge*distX;
      
2776. radius=((distX*distX)+(distY*distY))/(2.0*distY);
      
2777. 
      
2778. double tmpAng;
      
2779. ads_point tmpPt;
      
2780. 
      
2781. tmpAng=ads_angle(startPt,endPt);
      
2782. ads_polar(startPt,tmpAng,distX,tmpPt);
      
2783. ads_polar(tmpPt,(tmpAng+(_PI/2.0)),(radius-distY),center);
      
2784. return 1;
      
2785. 
      
2786. };
      

//添加Hatch<br /> AcDbObjectId CreateHatch(<br /> AcDbObjectId dbOId,<br /> char cLayer[], <br /> char cPattern[] = "SOLID", <br /> int nColor = 256, <br /> double dAngle = 0.0, <br /> double dScale = 1.0, <br /> AcDbDatabase * pDbDatab = acdbHostApplicationServices()->workingDatabase())<br /> {<br /> AcCmColor CmC;<br /> AcDbObjectId DbOId;<br /> AcDbObjectIdArray DbOIdA(0, 2);<br /> AcDbBlockTable * pDbBT;<br /> AcDbBlockTableRecord * pDbBTR;<br /> AcGeVector3d normal(0.0, 0.0, 1.0);<br /> <br /> DbOIdA.append(dbOId);<br /> <br /> AcDbHatch* pDbHat = new AcDbHatch();<br /> <br /> pDbHat->setDatabaseDefaults();<br /> <br /> pDbHat->setAssociative(Adesk::kTrue); // BUG: doesn't do squat! have to set the reactor yourself to get associativity!<br /> <br /> pDbHat->appendLoop(AcDbHatch::kExternal, DbOIdA);<br /> <br /> pDbHat->setPatternScale(dScale);<br /> <br /> pDbHat->setPatternAngle(dAngle);<br /> <br /> pDbHat->setPattern(AcDbHatch::kPreDefined, cPattern);<br /> <br /> pDbHat->setNormal(normal);<br /> <br /> pDbHat->evaluateHatch(); // crucial call or nothing gets displayed!<br /> <br /> pDbDatab->getSymbolTable(pDbBT, AcDb::kForRead);<br /> <br /> pDbBT->getAt(ACDB_MODEL_SPACE, pDbBTR, AcDb::kForWrite);<br /> <br /> pDbBTR->appendAcDbEntity(DbOId, pDbHat);<br /> <br /> pDbHat->setLayer(cLayer);<br /> <br /> CmC.setColorIndex(nColor);<br /> <br /> ((AcDbEntity *)pDbHat)->setColor(CmC);<br /> <br /> pDbBT->close();<br /> <br /> pDbBTR->close();<br /> <br /> pDbHat->close();<br /> <br /> return DbOId;<br /> <br /> }<br /> <br /> //************************************************************************<br /> //函数名称:drawDonutAtPoint<br /> //函数类型:void <br /> //返回值:<br /> //功能描述:<br /> //函数作者:Darcy<br /> //创建日期:2003-x-x<br /> //参数列表:<br /> //变量名:nPt 变量类型:const AcGePoint2d& 变量说明:中点<br /> //变量名:nRadius 变量类型:const double 变量说明:半径<br /> //************************************************************************<br /> void drawDonutAtPoint(const AcGePoint2d& nPt,const double nRadius)<br /> {<br /> AcGePoint2d pt;<br /> AcDbPolyline * pPline = new AcDbPolyline(2);<br /> <br /> pt = nPt;<br /> <br /> pt.x -= nRadius;<br /> <br /> pPline->addVertexAt( 0 , pt , 1.0 , nRadius*2.0 , nRadius*2.0);<br /> <br /> pt.x += nRadius * 2.0;<br /> <br /> pPline->addVertexAt( 1 , pt , 1.0 , nRadius*2.0 , nRadius*2.0);<br /> <br /> pPline->setClosed(Adesk::kTrue);<br /> <br /> //添加到当前数据库：<br /> addToCurrentSpaceAndClose(pPline);<br /> <br /> }<br /> <br /> 我也跟几贴，得点爱心币，互相交流<br /> //得到指定层上的所有实体<br /> Acad::ErrorStatus CDrawFunction::getAllEntity(AcDbDatabase *pDb,AcDbObjectIdArray& IdArr,<br /> const AcArray& layerNameArr)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> ASSERT(pDb);<br /> if(pDb==NULL)<br /> return Acad::eInvalidInput;<br /> AcDbBlockTable *pBlkTable=NULL;<br /> if((es=pDb->getBlockTable(pBlkTable,AcDb::kForRead))!=Acad::eOk)//打开块表<br /> {<br /> acedAlert("打开块表失败");<br /> return es;<br /> }<br /> AcDbBlockTableRecord *pBlkTableRecord=NULL;<br /> if((es=pBlkTable->getAt(ACDB_MODEL_SPACE,pBlkTableRecord,AcDb::kForRead))!=Acad::eOk)//打开块表记录<br /> {<br /> acedAlert("打开块表记录失败");<br /> pBlkTable->close();<br /> return es;<br /> }<br /> pBlkTable->close();//关闭块表<br /> <br /> AcDbBlockTableRecordIterator *pIterator=NULL; //创建叠代器<br /> if((es=pBlkTableRecord->newIterator(pIterator))!=Acad::eOk)<br /> {<br /> pBlkTableRecord->close();<br /> return es;<br /> }<br /> <br /> CAcModuleResourceOverride resoverride;<br /> CProgressDlg progress;<br /> progress.Create();<br /> progress.SetPos(0);<br /> progress.SetWindowText("正在检测图形中所有实体...");<br /> <br /> for(pIterator->start();!pIterator->done();pIterator->step())//遍历整个数据库<br /> {<br /> AcDbEntity *entity=NULL;<br /> es=pIterator->getEntity(entity,AcDb::kForRead); //打开实体<br /> <br /> if(es==Acad::eLockViolation)<br /> {<br /> acedAlert("内存锁定");<br /> }<br /> else if(es==Acad::eWasOpenForWrite)<br /> {<br /> acedAlert("实体以写方式打开");<br /> }<br /> else if(es==Acad::eWasOpenForRead)<br /> {<br /> acedAlert("实体以读方式打开");<br /> }<br /> else<br /> { <br /> if(layerNameArr.contains(entity->layer()))<br /> IdArr.append(entity->objectId());<br /> entity->close();<br /> }<br /> progress.StepIt();<br /> }<br /> delete pIterator;pIterator=NULL;<br /> pBlkTableRecord->close();<br /> acutPrintf("eend");<br /> return es;<br /> }<br /> <br /> //得到指定层上指定颜色的所有实体<br /> Acad::ErrorStatus CDrawFunction::getAllEntity(AcDbDatabase *pDb,AcDbObjectIdArray& IdArr,<br /> const AcArray& layerNameArr,Adesk::UInt16 colorIndex)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> ASSERT(pDb);<br /> if(pDb==NULL)<br /> return Acad::eInvalidInput;<br /> AcDbBlockTable *pBlkTable=NULL;<br /> if((es=pDb->getBlockTable(pBlkTable,AcDb::kForRead))!=Acad::eOk)//打开块表<br /> {<br /> acedAlert("打开块表失败");<br /> return es;<br /> }<br /> AcDbBlockTableRecord *pBlkTableRecord=NULL;<br /> if((es=pBlkTable->getAt(ACDB_MODEL_SPACE,pBlkTableRecord,AcDb::kForRead))!=Acad::eOk)//打开块表记录<br /> {<br /> acedAlert("打开块表记录失败");<br /> pBlkTable->close();<br /> return es;<br /> }<br /> pBlkTable->close();//关闭块表<br /> <br /> AcDbBlockTableRecordIterator *pIterator=NULL; //创建叠代器<br /> if((es=pBlkTableRecord->newIterator(pIterator))!=Acad::eOk)<br /> {<br /> pBlkTableRecord->close();<br /> return es;<br /> }<br /> <br /> CAcModuleResourceOverride resoverride;<br /> CProgressDlg progress;<br /> progress.Create();<br /> progress.SetPos(0);<br /> progress.SetWindowText("正在检测图形中所有实体...");<br /> <br /> for(pIterator->start();!pIterator->done();pIterator->step())//遍历整个数据库<br /> {<br /> AcDbEntity *entity=NULL;<br /> if((es=pIterator->getEntity(entity,AcDb::kForRead))!=Acad::eOk)//打开实体<br /> {<br /> delete pIterator;pIterator=NULL;<br /> pBlkTableRecord->close();<br /> return es;<br /> }<br /> if(layerNameArr.contains(entity->layer())&&entity->colorIndex()==colorIndex)<br /> IdArr.append(entity->objectId());<br /> entity->close();<br /> progress.StepIt();<br /> }<br /> delete pIterator;pIterator=NULL;<br /> pBlkTableRecord->close();<br /> return es;<br /> }<br /> <br /> //得到图形中所有的层<br /> Acad::ErrorStatus CDrawFunction::getAllLayerName(AcDbDatabase *pDb,CStringArray& layerArray)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> if(pDb==NULL)<br /> return Acad::eInvalidInput;<br /> layerArray.RemoveAll();<br /> AcDbLayerTable *pLayerTable=NULL;<br /> if((es=pDb->getSymbolTable(pLayerTable,AcDb::kForRead))!=Acad::eOk)<br /> {<br /> pLayerTable->close();<br /> return es;<br /> }<br /> //创建一个层表迭代器<br /> AcDbLayerTableIterator *pLayerTableIterator;<br /> pLayerTable->newIterator(pLayerTableIterator);<br /> pLayerTable->close();<br /> <br /> char *pLayerName=NULL;<br /> CString name;<br /> for(int i=0;!pLayerTableIterator->done();pLayerTableIterator->step(),i++)<br /> {<br /> AcDbLayerTableRecord *pLayerTableRecord=NULL;<br /> pLayerTableIterator->getRecord(pLayerTableRecord,AcDb::kForRead);<br /> pLayerTableRecord->getName(pLayerName);<br /> name.Format("%s",pLayerName);<br /> pLayerTableRecord->close();<br /> layerArray.Add(name);<br /> <br /> }<br /> <br /> if(pLayerName) acutDelString(pLayerName);<br /> delete pLayerTableIterator;pLayerTableIterator=NULL;<br /> return es;<br /> }<br /> <br /> <br /> //*************根据线形名得到线型ID********************//<br /> //******************************************************//<br /> BOOL CDrawFunction::getLinetypeIdFromString(const char* str, AcDbObjectId& id)<br /> {<br /> //----查找安装目录----//<br /> CString AcadInstallPath;<br /> FindAcadInstallPath(AcadInstallPath);<br /> CString File=AcadInstallPath+"\\linetype\\user.lin";<br /> //-----查找完毕--------// <br /> ASSERT(str!=NULL);<br /> AcDbLinetypeTable *pLinetypeTable;<br /> acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);<br /> Acad::ErrorStatus mess;<br /> mess=pLinetypeTable->getAt(str,id);<br /> if(mess==Acad::eKeyNotFound||mess==Acad::ePermanentlyErased)<br /> {<br /> pLinetypeTable->close();<br /> Acad::ErrorStatus error;<br /> <br /> error=acdbLoadLineTypeFile(str,File.GetBuffer(0),acdbHostApplicationServices()->workingDatabase());<br /> if(error==Acad::eNullObjectPointer)<br /> {<br /> AcDbLinetypeTable *pLinetypeTable;<br /> acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);<br /> pLinetypeTable->getAt("CONTINUOUS", id);<br /> pLinetypeTable->close();<br /> return FALSE;<br /> }<br /> else if(error==Acad::eFileSystemErr)<br /> {<br /> AfxMessageBox("the specified file cannot be opened");<br /> return FALSE;<br /> }<br /> else if(error==Acad::eUndefinedLineType)<br /> {<br /> AcDbLinetypeTable *pLinetypeTable;<br /> acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);<br /> AfxMessageBox("the linetype name specified by ltname is not found in the file");<br /> pLinetypeTable->getAt("CONTINUOUS", id);<br /> pLinetypeTable->close();<br /> return TRUE;<br /> }<br /> AcDbLinetypeTable *pLinetypeTable;<br /> acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLinetypeTable, AcDb::kForRead);<br /> pLinetypeTable->getAt(str,id);<br /> pLinetypeTable->close();<br /> return TRUE;<br /> }<br /> pLinetypeTable->close();<br /> return TRUE;<br /> }<br /> <br /> <br /> <br /> void CDrawFunction::FindAcadInstallPath(CString &AcadInstallPath)<br /> {<br /> //查找样式目录安装路径<br /> TCHAR AcadPath[255];<br /> HKEY hKey;<br /> if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,TEXT("SOFTWARE\\线路处开发组\\RDS2002\\1.00"),0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)<br /> {<br /> ::AfxMessageBox("注册路径不对");<br /> return ;<br /> }<br /> DWORD dwDataType=REG_SZ;<br /> DWORD dwLength=255;<br /> LONG lRet=RegQueryValueEx(hKey,TEXT("path"),NULL,NULL,(LPBYTE)AcadPath,&dwLength);<br /> RegCloseKey(hKey);<br /> if(lRet!=ERROR_SUCCESS)<br /> {<br /> acutPrintf("Read failed\n");<br /> return ;<br /> }<br /> //-----查找完毕--------//<br /> AcadInstallPath.Format("%s",AcadPath);<br /> }<br /> <br /> AcDbObjectId CDrawFunction::createTextStyle(CString fontName,CString bigFontName,CString textStyleName)<br /> {<br /> AcGiTextStyle *TextStyle=new AcGiTextStyle<br /> (fontName,<br /> bigFontName,<br /> 0,<br /> 0.67,<br /> 0,<br /> 0,<br /> Adesk::kFalse,<br /> Adesk::kFalse,<br /> Adesk::kFalse,<br /> Adesk::kFalse,<br /> Adesk::kFalse,<br /> textStyleName); //字体名 <br /> AcDbObjectId textStyleId;<br /> toAcDbTextStyle(*TextStyle,textStyleId);<br /> return textStyleId;<br /> }<br /> <br /> <br /> <br /> //*******************wuweifan2002.12.12*************************//<br /> //********************插入多行文本***************************//<br /> //************************************************************//<br /> AcDbObjectId CDrawFunction::createMutiText(AcGePoint3d BasePoint,AcDb::TextHorzMode hMode,AcDb::TextVertMode vMode,CString Text,double texthight,double widthfactor,double angle,int color,CString smallFontName,CString bigFontName,CString layerName)<br /> {<br /> ASSERT(Text!=NULL);<br /> AcDbMText *pMText=new AcDbMText();<br /> if(pMText==NULL)<br /> throw Acad::eOutOfMemory;<br /> AcDbObjectId TextStyleId;<br /> TextStyleId=createTextStyle(smallFontName,bigFontName,"xianlu");<br /> pMText->setTextStyle(TextStyleId);<br /> pMText->setContents(Text.GetBuffer(Text.GetLength()));<br /> pMText->setTextHeight(texthight);<br /> pMText->setRotation(angle);<br /> pMText->setLineSpacingFactor(0.8);<br /> pMText->setColorIndex(color);<br /> if(layerName!="")<br /> pMText->setLayer(layerName.GetBuffer(0));<br /> AcDbObjectId MTextId;<br /> addToModelSpace(MTextId, pMText);<br /> pMText->close();<br /> return MTextId;<br /> }<br /> <br /> //********************插入单行文本***************************//<br /> //************************************************************//<br /> AcDbObjectId CDrawFunction::createtextAll(AcGePoint3d pt,char *text,AcDb::TextHorzMode hMode,AcDb::TextVertMode vMode,double hight,double widthFactor,double rotation,int color,CString smallFontName,CString bigFontName,CString layerName)<br /> {<br /> ASSERT(text!=NULL);<br /> AcDbText *pText=NULL;<br /> pText=new AcDbText;<br /> if(pText==NULL)<br /> throw Acad::eOutOfMemory;<br /> AcDbObjectId textId;<br /> textId=createTextStyle(smallFontName,bigFontName,"xianlu");<br /> pText->setTextStyle(textId);<br /> pText->setTextString(text);<br /> pText->setHeight(hight);<br /> pText->setColorIndex(color);<br /> pText->setRotation(rotation);<br /> pText->setWidthFactor(widthFactor);<br /> pText->setPosition(pt);<br /> if(layerName!="")<br /> pText->setLayer(layerName.GetBuffer(0));<br /> addToModelSpace(textId, pText);<br /> pText->close();<br /> return textId;<br /> }<br /> <br /> //设置尺寸文本样式<br /> void CDrawFunction::setDimTextStyle(AcDbObjectId dimId,AcDbObjectId textStyleId,<br /> int colorIndex,double textHeight,double textScator,<br /> double textGap,bool align)<br /> {<br /> AcDbDimension *dimText;<br /> acdbOpenObject(dimText,dimId,AcDb::kForWrite);<br /> dimText->setDimtxsty(textStyleId); //文本字体DIMTXSTY<br /> AcCmColor color;<br /> color.setColorIndex(colorIndex);<br /> dimText->setDimclrt(color);//文本颜色DIMCLRT <br /> dimText->setDimtxt(textHeight); //文本高度DIMTXT <br /> dimText->setDimtfac(textScator);//文本高宽比DIMTFAC <br /> dimText->setDimgap(textGap);//文本距尺寸距离DIMGAP <br /> dimText->setDimtoh(align);//文本标注DIMTOH<br /> dimText->close();<br /> }<br /> <br /> //设置尺寸延伸线类型<br /> Acad::ErrorStatus CDrawFunction::setextensionlineStyle(AcDbObjectId dimId,int colorIndex,double length,<br /> double offLength,bool v1,bool v2)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> AcDbDimension *dimText=NULL;<br /> if((es=acdbOpenObject(dimText,dimId,AcDb::kForWrite))!=Acad::eOk)<br /> return es;<br /> AcCmColor color;<br /> if((es=color.setColorIndex(colorIndex))!=Acad::eOk)<br /> {<br /> dimText->close();return es;<br /> }<br /> dimText->setDimclre(color);//设置颜色DIMCLRE <br /> dimText->setDimexe(length);//设置超出长度DIMEXE <br /> dimText->setDimexo(offLength);//尺寸偏离长度DIMEXO <br /> dimText->setDimse1(v1);//是否注第一条线DIMSE1 <br /> dimText->setDimse2(v2);//是否注第二条线DIMSE2 <br /> dimText->close();<br /> return es;<br /> }<br /> //绘制对齐尺寸线<br /> AcDbObjectId CDrawFunction::drawDimension(AcGePoint3d xLine1Point,AcGePoint3d xLine2Point,<br /> double fwj,int direction,double distance,CString dimText,CString m_cLayerName)<br /> {<br /> <br /> AcDbAlignedDimension *dimension=new AcDbAlignedDimension;<br /> AcGePoint3d dimLinePoint;<br /> // CCalcuMethod *calcu=new CCalcuMethod();<br /> // calcu->calEndZbSelf(xLine2Point,distance*direction,fwj,dimLinePoint);<br /> // delete calcu;calcu=NULL;<br /> dimension->setXLine1Point(xLine1Point);<br /> dimension->setDimLinePoint(dimLinePoint);<br /> dimension->setXLine2Point(xLine2Point);<br /> dimension->setDimensionText(dimText.GetBuffer(0));<br /> dimension->setLayer(m_cLayerName.GetBuffer(0));<br /> AcDbObjectId dimId;<br /> addToModelSpace(dimId,dimension);<br /> dimension->close();<br /> return dimId;<br /> }<br /> <br /> Acad::ErrorStatus CDrawFunction::createLine(AcDbObjectId &lineId,AcGePoint3d startPt,AcGePoint3d endPt,int color,CString Layer,char *linetype)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> ASSERT(linetype!=NULL);<br /> AcDbLine *pLine = new AcDbLine(startPt, endPt);<br /> if((es=pLine->setColorIndex(color))!=Acad::eOk)<br /> {<br /> pLine->close();return es;<br /> }<br /> if(Layer!="")<br /> {<br /> if(pLine->setLayer(Layer)==Acad::eKeyNotFound \<br /> ||pLine->setLayer(Layer)==Acad::eDeletedEntry )<br /> {<br /> createNewLayer(Layer);<br /> if((es=pLine->setLayer(Layer.GetBuffer(0)))!=Acad::eOk)<br /> {<br /> pLine->close();return es;<br /> }<br /> }<br /> }<br /> if(linetype!=NULL)<br /> {<br /> AcDbObjectId lineTypeId;<br /> if(getLinetypeIdFromString(linetype,lineTypeId))<br /> {<br /> if((es=pLine->setLinetype(lineTypeId))!=Acad::eOk)<br /> {<br /> pLine->close();return es;<br /> }<br /> if((es=pLine->setLinetypeScale(1))!=Acad::eOk)<br /> {<br /> pLine->close();return es;<br /> }<br /> }<br /> }<br /> es=addToModelSpace(lineId,pLine);<br /> return es;<br /> }<br /> <br /> Acad::ErrorStatus CDrawFunction::createCircle(AcDbObjectId& circleId,AcGePoint3d center,double radius,int color,CString layer)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> AcGeVector3d normal(0,0,1);<br /> AcDbCircle *circle=new AcDbCircle(center,normal,radius);<br /> if((es=circle->setColorIndex(color))!=Acad::eOk)<br /> {<br /> circle->close();return es;<br /> }<br /> if(layer!="")<br /> {<br /> if(circle->setLayer(layer)==Acad::eKeyNotFound \<br /> ||circle->setLayer(layer)==Acad::eDeletedEntry )<br /> {<br /> createNewLayer(layer);<br /> if((es=circle->setLayer(layer.GetBuffer(0)))!=Acad::eOk)<br /> {<br /> circle->close();return es;<br /> }<br /> }<br /> }<br /> es=addToModelSpace(circleId,circle);<br /> return es;<br /> }<br /> <br /> <br /> Acad::ErrorStatus CDrawFunction::DrawPolyline(AcDbObjectId& polylineId, AcGePoint3dArray ptArr, int Color, double Width,bool IsClose,CString Layer,char *linetype)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk; <br /> AcDb2dPolyline *pNewPline;<br /> if(IsClose)pNewPline=new AcDb2dPolyline(AcDb::k2dSimplePoly,ptArr,0,Adesk::kTrue,Width,Width);<br /> else pNewPline=new AcDb2dPolyline(AcDb::k2dSimplePoly,ptArr,0,Adesk::kFalse,Width,Width);<br /> if((es=pNewPline->setColorIndex(Color))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> if(Layer!="")<br /> {<br /> if(pNewPline->setLayer(Layer)==Acad::eKeyNotFound \<br /> ||pNewPline->setLayer(Layer)==Acad::eDeletedEntry )<br /> {<br /> createNewLayer(Layer);<br /> if((es=pNewPline->setLayer(Layer))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> }<br /> }<br /> if(linetype!=NULL)<br /> {<br /> AcDbObjectId lineTypeId;<br /> if(getLinetypeIdFromString(linetype,lineTypeId))<br /> {<br /> if((es=pNewPline->setLinetype(lineTypeId))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> if((es=pNewPline->setLinetypeScale(1))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> }<br /> }<br /> if(!pNewPline->isLinetypeGenerationOn())<br /> {<br /> if((es=pNewPline->setLinetypeGenerationOn())!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> }<br /> es=addToModelSpace(polylineId,pNewPline);<br /> return es;<br /> }<br /> <br /> Acad::ErrorStatus CDrawFunction::DrawSplinePolyline(AcDbObjectId& polylineId, AcGePoint3dArray ptArr, int Color, double Width,bool IsClose,CString Layer,char *linetype)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk; <br /> AcDb2dPolyline *pNewPline;<br /> if(IsClose)pNewPline=new AcDb2dPolyline(AcDb::k2dQuadSplinePoly,ptArr,0,Adesk::kTrue,Width,Width);<br /> else pNewPline=new AcDb2dPolyline(AcDb::k2dQuadSplinePoly,ptArr,0,Adesk::kFalse,Width,Width);<br /> if((es=pNewPline->setColorIndex(Color))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> if(Layer!="")<br /> {<br /> if(pNewPline->setLayer(Layer)==Acad::eKeyNotFound \<br /> ||pNewPline->setLayer(Layer)==Acad::eDeletedEntry )<br /> {<br /> createNewLayer(Layer);<br /> if((es=pNewPline->setLayer(Layer))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> }<br /> }<br /> if(linetype!=NULL)<br /> {<br /> AcDbObjectId lineTypeId;<br /> if(getLinetypeIdFromString(linetype,lineTypeId))<br /> {<br /> if((es=pNewPline->setLinetype(lineTypeId))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> if((es=pNewPline->setLinetypeScale(1))!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> }<br /> }<br /> if(!pNewPline->isLinetypeGenerationOn())<br /> {<br /> if((es=pNewPline->setLinetypeGenerationOn())!=Acad::eOk)<br /> {<br /> pNewPline->close();return es;<br /> }<br /> }<br /> es=addToModelSpace(polylineId,pNewPline);<br /> return es;<br /> }<br /> <br /> <br /> //得到文本边界<br /> void CDrawFunction::getTextBoundary(AcDbObjectId objectId,double offset,AcDbObjectId &textBoundaryId)<br /> {<br /> AcDbExtents Ext;<br /> AcDbEntity *pEnt;<br /> acdbOpenObject(pEnt,objectId,AcDb::kForWrite);<br /> if(pEnt->isKindOf(AcDbText::desc()))<br /> {<br /> AcDbText *pText=AcDbText::cast(pEnt);<br /> AcGePoint3d basePoint;<br /> basePoint=pText->position();<br /> double rotateAngle=pText->rotation();<br /> pText->setRotation(0);<br /> pText->getGeomExtents(Ext);<br /> AcGePoint3d minPt,maxPt;<br /> minPt=Ext.minPoint();<br /> maxPt=Ext.maxPoint();<br /> AcGePoint3dArray pointArray;<br /> AcGePoint3d point1,point2,point3,point4;<br /> point1.x=minPt.x-offset;point1.y=minPt.y-offset;point1.z=0;<br /> pointArray.append(point1);<br /> point2.x=maxPt.x+offset;point2.y=minPt.y-offset;point2.z=0;<br /> pointArray.append(point2);<br /> point3.x=maxPt.x+offset;point3.y=maxPt.y+offset;point3.z=0;<br /> pointArray.append(point3);<br /> point4.x=minPt.x-offset;point4.y=maxPt.y+offset;point4.z=0;<br /> pointArray.append(point4);<br /> DrawPolyline(textBoundaryId,pointArray,1,0,TRUE,"0","CONTINUOUS");<br /> AcGeMatrix3d matrix;<br /> AcGeVector3d axis;<br /> ident_init(matrix); <br /> axis.set(0,0,1);<br /> matrix=matrix.rotation(rotateAngle,axis,basePoint); //旋转矩阵<br /> AcDbEntity *BounEnt;<br /> acdbOpenObject(BounEnt,textBoundaryId,AcDb::kForWrite);<br /> BounEnt->transformBy(matrix);<br /> BounEnt->close();<br /> pText->setRotation(rotateAngle);<br /> }<br /> else if(pEnt->isKindOf(AcDbMText::desc()))<br /> {<br /> AcDbMText *pMtext=AcDbMText::cast(pEnt);<br /> AcGePoint3d basePoint;<br /> basePoint=pMtext->location();<br /> double rotateAngle=pMtext->rotation();<br /> pMtext->setRotation(0);<br /> AcGePoint3dArray pointArray;<br /> double width=pMtext->actualWidth();<br /> double height=pMtext->actualHeight();<br /> AcGePoint3d point1,point2,point3,point4;<br /> point1.x=basePoint.x-offset;point1.y=basePoint.y+offset;point1.z=0;<br /> pointArray.append(point1);<br /> point2.x=basePoint.x+width+offset;point2.y=basePoint.y+offset;point2.z=0;<br /> pointArray.append(point2);<br /> point3.x=basePoint.x+width+offset;point3.y=basePoint.y-height-offset;point3.z=0;<br /> pointArray.append(point3);<br /> point4.x=basePoint.x-offset;point4.y=basePoint.y-height-offset;point4.z=0;<br /> pointArray.append(point4);<br /> DrawPolyline(textBoundaryId,pointArray,1,0,TRUE,"0","CONTINUOUS");<br /> AcGeMatrix3d matrix;<br /> AcGeVector3d axis;<br /> ident_init(matrix); <br /> axis.set(0,0,1);<br /> matrix=matrix.rotation(rotateAngle,axis,basePoint); //旋转矩阵<br /> AcDbEntity *BounEnt;<br /> acdbOpenObject(BounEnt,textBoundaryId,AcDb::kForWrite);<br /> BounEnt->transformBy(matrix);<br /> BounEnt->close();<br /> pMtext->setRotation(rotateAngle);<br /> }<br /> pEnt->close();<br /> return;<br /> }<br /> <br /> <br /> AcDbObjectId CDrawFunction::createNewLayer(CString LayerName)<br /> {<br /> AcDbLayerTable *LayerTable;<br /> acdbHostApplicationServices()->workingDatabase()->getSymbolTable(LayerTable,AcDb::kForWrite);<br /> AcDbObjectId LayerId;<br /> if(!LayerTable->has(LayerName))<br /> {<br /> AcDbLayerTableRecord *LayerTableRecord=new AcDbLayerTableRecord;<br /> LayerTableRecord->setName(LayerName);<br /> LayerTable->add(LayerId,LayerTableRecord);<br /> LayerTableRecord->close();<br /> }<br /> else<br /> {<br /> LayerTable->getAt(LayerName,LayerId,FALSE);<br /> }<br /> LayerTable->close();<br /> return LayerId;<br /> }<br /> <br /> bool CDrawFunction::insertBlock(AcDbObjectId &newEntId,CString BlockName,double fwj,AcGePoint3d basePoint,double scalex,<br /> CString Text1,CString Text2,CString Text3,<br /> int text1color,int text2color,int text3color,<br /> double text1height,double text2height,double text3height,<br /> double text1scator,double text2scator,double text3scator,<br /> CString littleFont,CString bigFont,CString layerName,double dx,double dy) //每块可有三个属性定义<br /> {<br /> AcDbObjectId blockId;<br /> double x,y;<br /> x=basePoint[X];<br /> y=basePoint[Y];<br /> bool a=AcDbSymbolUtilities::hasBlock(BlockName.GetBuffer(BlockName.GetLength()),acdbHostApplicationServices()->workingDatabase());<br /> if(!a)return FALSE;<br /> AcDbSymbolUtilities::getBlockId(blockId,BlockName.GetBuffer(BlockName.GetLength()),acdbHostApplicationServices()->workingDatabase());<br /> AcDbBlockReference *pBlkRef = new AcDbBlockReference;<br /> // pBlkRef->treatAsAcDbBlockRefForExplode();///////////<br /> pBlkRef->setBlockTableRecord(blockId);<br /> pBlkRef->setLayer(layerName);//设置层/////////////////////////////<br /> struct resbuf to, from;<br /> from.restype = RTSHORT;<br /> from.resval.rint = 1; // UCS<br /> to.restype = RTSHORT;<br /> to.resval.rint = 0; // WCS<br /> AcGeVector3d normal(0, 0, 1);<br /> acedTrans(&(normal.x), &from, &to, Adesk::kTrue,&(normal.x));<br /> AcGeScale3d scale(scalex,scalex,scalex);<br /> pBlkRef->setScaleFactors(scale);<br /> AcGePoint3d insertPoint;<br /> insertPoint=basePoint;<br /> pBlkRef->setPosition(basePoint);<br /> pBlkRef->setRotation(fwj);<br /> pBlkRef->setNormal(normal);<br /> pBlkRef->setColorIndex(text1color);//按文本颜色设置改变颜色<br /> pBlkRef->setLayer(layerName);<br /> AcDbBlockTable *pBlockTable;<br /> acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable,AcDb::kForWrite);<br /> AcDbBlockTableRecord *pBlockTableRecord;<br /> pBlockTable->getAt(ACDB_MODEL_SPACE, pBlockTableRecord,AcDb::kForWrite);<br /> pBlockTableRecord->appendAcDbEntity(newEntId, pBlkRef);<br /> pBlockTable->close();<br /> pBlockTableRecord->close();<br /> <br /> acdbOpenObject(pBlockTableRecord, blockId, AcDb::kForRead);<br /> AcDbBlockTableRecordIterator *pIterator;<br /> pBlockTableRecord->newIterator(pIterator);<br /> AcDbEntity *pEnt;<br /> AcDbAttributeDefinition *pAttdef;<br /> for (pIterator->start(); !pIterator->done();pIterator->step())<br /> {<br /> pIterator->getEntity(pEnt, AcDb::kForWrite);<br /> //pEnt->setColorIndex(text1color);//按文本颜色设置改变颜色<br /> //pEnt->setLayer(layerName);//设置层<br /> if(pEnt->isKindOf(AcDbAttributeDefinition::desc()))<br /> {<br /> pAttdef = AcDbAttributeDefinition::cast(pEnt);<br /> if (pAttdef != NULL && !pAttdef->isConstant()) <br /> {<br /> AcDbAttribute *pAtt = new AcDbAttribute();<br /> pAtt->setPropertiesFrom(pAttdef);<br /> pAtt->setInvisible(pAttdef->isInvisible());<br /> AcGePoint3d alignpoint;<br /> alignpoint=pAttdef->alignmentPoint();<br /> alignpoint+=pBlkRef->position().asVector();<br /> AcDbObjectId TextStyleId;<br /> TextStyleId=createTextStyle(littleFont,bigFont,"xianlu");<br /> pAtt->setTextStyle(TextStyleId);<br /> pAtt->setHeight(pAttdef->height());<br /> pAtt->setTag("Tag");<br /> pAtt->setFieldLength(25);<br /> pAtt->setLayer(layerName);<br /> char *pStr = pAttdef->tag();<br /> pAtt->setTag(pStr);<br /> free(pStr);<br /> pAtt->setFieldLength(pAttdef->fieldLength());<br /> if(strcmp(pAtt->tag(),"标注1")==0)<br /> {<br /> AcGePoint3d gg(dx/scalex,0,0);<br /> alignpoint=alignpoint+gg.asVector();<br /> AcGeVector3d vet(0,0,1);<br /> alignpoint=alignpoint.scaleBy(scalex,insertPoint);<br /> alignpoint=alignpoint.rotateBy(fwj,vet,insertPoint);<br /> pAtt->setTextString(Text1.GetBuffer(Text2.GetLength()));<br /> pAtt->setRotation(PI/2+fwj);<br /> pAtt->setHorizontalMode(AcDb::kTextCenter);<br /> pAtt->setVerticalMode(AcDb::kTextBottom);<br /> pAtt->setAlignmentPoint(alignpoint);<br /> pAtt->setColorIndex(text1color);<br /> pAtt->setHeight(text1height*scalex);<br /> pAtt->setWidthFactor(text1scator);<br /> }<br /> if(strcmp(pAtt->tag(),"标注2")==0)<br /> {<br /> AcGePoint3d gg(dx/scalex,0,0);<br /> alignpoint=alignpoint-gg.asVector();<br /> AcGeVector3d vet(0,0,1);<br /> alignpoint=alignpoint.scaleBy(scalex,insertPoint);<br /> alignpoint=alignpoint.rotateBy(fwj,vet,insertPoint);<br /> pAtt->setTextString(Text2.GetBuffer(Text2.GetLength()));<br /> pAtt->setRotation(PI/2+fwj);<br /> pAtt->setHorizontalMode(AcDb::kTextCenter);<br /> pAtt->setVerticalMode(AcDb::kTextBottom);<br /> pAtt->setAlignmentPoint(alignpoint);<br /> pAtt->setColorIndex(text2color);<br /> pAtt->setHeight(text2height*scalex);<br /> pAtt->setWidthFactor(text2scator);<br /> }<br /> if(strcmp(pAtt->tag(),"标注3")==0)<br /> {<br /> AcGePoint3d gg(0,dy/scalex,0);<br /> alignpoint=alignpoint+gg.asVector();<br /> AcGeVector3d vet(0,0,1);<br /> alignpoint=alignpoint.scaleBy(scalex,insertPoint);<br /> alignpoint=alignpoint.rotateBy(fwj,vet,insertPoint);<br /> pAtt->setTextString(Text3.GetBuffer(Text3.GetLength()));<br /> pAtt->setRotation(fwj);<br /> pAtt->setHorizontalMode(AcDb::kTextCenter);<br /> pAtt->setVerticalMode(AcDb::kTextBottom);<br /> pAtt->setAlignmentPoint(alignpoint);<br /> pAtt->setColorIndex(text3color);<br /> pAtt->setHeight(text3height*scalex);<br /> pAtt->setWidthFactor(text3scator);<br /> }<br /> AcDbObjectId attId;<br /> pBlkRef->appendAttribute(attId, pAtt);<br /> pAtt->close();<br /> }<br /> }<br /> // pEnt->setColorIndex(text1color);//按文本颜色设置改变颜色<br /> pEnt->close(); <br /> }<br /> delete pIterator;<br /> pBlockTableRecord->close();<br /> pBlkRef->close();<br /> return TRUE;<br /> }<br /> <br /> <br /> //遍历多义线顶点坐标<br /> Acad::ErrorStatus CDrawFunction::IteratorPolyline(AcDbObjectId polylineID,AcGePoint3dArray& pointArray)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> AcDbObject* pObject=NULL;<br /> AcDbPolyline *pline=NULL;<br /> if((es=acdbOpenObject(pObject,polylineID,AcDb::kForRead))!=Acad::eOk)<br /> return es;<br /> if(!pObject->isKindOf(AcDbPolyline::desc()))<br /> {<br /> pObject->close();<br /> return Acad::eInvalidInput;<br /> }<br /> pline=AcDbPolyline::cast(pObject);<br /> int num=pline->numVerts();<br /> for (int i=0; i< num; i++)<br /> {<br /> AcGePoint3d temPt;<br /> if((es=pline->getPointAt(i, temPt))!=Acad::eOk)<br /> {<br /> pObject->close();<br /> return Acad::eInvalidInput;<br /> }<br /> pointArray.append(temPt);<br /> }<br /> pObject->close();<br /> return es;<br /> }<br /> <br /> <br /> Acad::ErrorStatus CDrawFunction::createGroup(CString groupname,AcDbObjectIdArray IdArray)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> AcDbDictionary *pGroupDict=NULL;<br /> AcDbGroup *pGroup=NULL;<br /> if((es=acdbHostApplicationServices()->workingDatabase()->getGroupDictionary(pGroupDict,AcDb::kForWrite))!=Acad::eOk)<br /> {<br /> return es;<br /> }<br /> AcDbObjectId groupId;<br /> es=pGroupDict->getAt(groupname,groupId);<br /> if(es==Acad::eInvalidKey)<br /> {<br /> acutPrintf("\n输入的词典名无效!");<br /> pGroupDict->close();<br /> return es;<br /> }<br /> else if(es==Acad::eKeyNotFound)<br /> {<br /> pGroup=new AcDbGroup("GroupDiscription");<br /> if((es=pGroupDict->setAt(groupname,pGroup,groupId))!=Acad::eOk)<br /> {<br /> pGroup->close();pGroupDict->close();return es;<br /> }<br /> }<br /> else if(es==Acad::eOk )<br /> {<br /> if((es=acdbOpenObject(pGroup,groupId,AcDb::kForWrite))!=Acad::eOk)<br /> {<br /> pGroupDict->close();return es;<br /> }<br /> }<br /> for(int i=0;i<IDARRAY.LENGTH();I++)<br /> pGroup->append(IdArray[i]);<br /> pGroup->setSelectable(FALSE);<br /> pGroupDict->close();<br /> pGroup->close();<br /> return es;<br /> }<br /> <br /> double CDrawFunction::getTextLength(AcDbObjectId textId)<br /> {<br /> Acad::ErrorStatus es=Acad::eOk;<br /> AcDbEntity *pEnt=NULL;<br /> if((es=acdbOpenObject(pEnt,textId,AcDb::kForRead))!=Acad::eOk)<br /> return -1;<br /> AcDbExtents Ext;<br /> pEnt->getGeomExtents(Ext);<br /> pEnt->close();<br /> AcGePoint3d minPt,maxPt;<br /> minPt=Ext.minPoint();<br /> maxPt=Ext.maxPoint();<br /> return acutDistance(asDblArray(minPt),asDblArray(maxPt));<br /> }<br /> <br /> <br /> <br /> void CDrawFunction::highlightEdge(const AcDbObjectId& objId,const int marker)<br /> {<br /> char dummy[133];<br /> AcDbEntity *pEnt;<br /> acdbOpenObject(pEnt,objId,AcDb::kForRead);<br /> AcGePoint3d pickpnt;<br /> AcGeMatrix3d xform;<br /> int numIds;<br /> AcDbFullSubentPath *subentIds;<br /> pEnt->getSubentPathsAtGsMarker(AcDb::kEdgeSubentType,marker,pickpnt,xform,numIds,subentIds);<br /> if(numIds>0)<br /> {<br /> pEnt->highlight(subentIds[0]);<br /> ads_getstring(0,"\npressto continue...",dummy);<br /> pEnt->unhighlight(subentIds[0]);<br /> <br /> }<br /> delete []subentIds;<br /> pEnt->close();<br /> }<br /> <br /> <br /> Acad::ErrorStatus CDrawFunction::readXrecord(CString dictName,CString xrecordName,CString &message)<br /> {<br /> AcDbDictionary *pDict=NULL;<br /> pDict=openDictionaryForRead(dictName,acdbHostApplicationServices()->workingDatabase());<br /> if(pDict)<br /> {<br /> AcDbXrecord *pXrec;<br /> pDict->getAt(xrecordName, (AcDbObject*&) pXrec,AcDb::kForRead);<br /> pDict->close();<br /> struct resbuf *pRbList;<br /> pXrec->rbChain(&pRbList);<br /> pXrec->close();<br /> message=pRbList->resval.rstring;<br /> acutRelRb(pRbList);<br /> return Acad::eOk;<br /> }<br /> else<br /> {<br /> return Acad::eInvalidInput;<br /> }<br /> }<br /> <br /> <br /> //**********************扩展记录操作(2002.12.12)***************//<br /> //****************打开扩展记录为写******************************//<br /> //**************************************************************//<br /> AcDbDictionary* CDrawFunction::openDictionaryForWrite(LPCTSTR dictName, <br /> bool createIfNotFound,AcDbDictionary* parentDict)<br /> {<br /> ASSERT(dictName != NULL);<br /> ASSERT(parentDict != NULL);<br /> ASSERT(parentDict->isWriteEnabled()); <br /> AcDbDictionary* dict = NULL;<br /> AcDbObject* obj;<br /> Acad::ErrorStatus es;<br /> es = parentDict->getAt(dictName, obj, AcDb::kForWrite);<br /> if (es == Acad::eOk) <br /> {<br /> dict = AcDbDictionary::cast(obj);<br /> }<br /> else if (es == Acad::eKeyNotFound) <br /> {<br /> if (createIfNotFound) <br /> {<br /> dict = new AcDbDictionary;<br /> AcDbObjectId dictId;<br /> es = parentDict->setAt(dictName, dict, dictId);<br /> if (es != Acad::eOk)<br /> {<br /> delete dict;dict = NULL;<br /> }<br /> }<br /> }<br /> return dict;<br /> }<br /> <br /> <br /> <br /> /******************************************************************************/<br /> /* 関数名 : SetOSMODE */<br /> /* 機能 : 設置OSMODE */<br /> /* 入力引数 : int OSMODE値 */<br /> /* 出力引数 : 無 */<br /> /* 返り値 : 無 */<br /> /* 備考 : 無 */<br /> /******************************************************************************/<br /> void SetOSMODE(int nOSMODE)<br /> {<br /> struct resbuf rebNewOSMODE;<br /> rebNewOSMODE.restype = RTSHORT;<br /> rebNewOSMODE.resval.rint = nOSMODE;<br /> /*設置系統變量OSNAP的値。*/<br /> acedSetVar("OSMODE",&rebNewOSMODE);<br /> }<br /> <br /> /******************************************************************************/<br /> /* 関数名 : GetCrossPoint */<br /> /* 機能 : 得到交叉點的位置和交點坐標。 */<br /> /* 入力引数 : AcGePoint3dArray Polyline的點列。 */<br /> /* AcGePoint3d 選擇点。 */<br /> /* double PickBox的長度。 */<br /> /* Adesk::Boolean 閉合屬性。 */<br /> /* 出力引数 : int 交叉點的位置（前）。 */<br /> /* int 交叉點的位置（後）。 */<br /> /* AcGePoint3d 交點坐標 */<br /> /* 返り値 : TRUE 正常。 */<br /> /* FALSE 異常。 */<br /> /* 備考 : 無 */<br /> /******************************************************************************/<br /> BOOL GetCrossPoint(AcGePoint3dArray gePoi3dA, AcGePoint3d gePoi3d, double dPickLen, int & iCrsID1, <br /> int & iCrsID2, AcGePoint3d & gePoi3dCrs, Adesk::Boolean bIsClosed = Adesk::kTrue)<br /> {<br /> ads_point spt1, spt2, spt3, spt4;<br /> AcGePoint3d GePoi3dStart, GePoi3dNext;<br /> int iReturn, iNum;<br /> <br /> iNum = gePoi3dA.length();<br /> if (iNum < 2) {<br /> return FALSE;<br /> }<br /> <br /> /*得到交叉點的位置*/<br /> for (int i = 0; i < iNum; i++) {<br /> iCrsID1 = i;<br /> <br /> //得到前一個點<br /> asPnt3d(spt3) = gePoi3dA[iCrsID1];<br /> <br /> //得到後一個點<br /> if (i == iNum - 1) {<br /> //實體是否是閉合。<br /> if (!bIsClosed) {<br /> break;<br /> } <br /> else {<br /> iCrsID2 = 0;<br /> }<br /> }<br /> else {<br /> iCrsID2 = i + 1;<br /> }<br /> asPnt3d(spt4) = gePoi3dA[iCrsID2];<br /> <br /> spt3[Z] = 0;<br /> spt4[Z] = 0;<br /> <br /> /*X方向是否有交叉點。*/<br /> spt1[X] = gePoi3d.x + (dPickLen / 2); spt2[X] = gePoi3d.x - (dPickLen / 2);<br /> spt1[Y] = gePoi3d.y; spt2[Y] = gePoi3d.y;<br /> spt1[Z] = 0; spt2[Z] = 0;<br /> iReturn = acdbInters(spt1, spt2, spt3, spt4, 1, asDblArray(gePoi3dCrs));<br /> if (iReturn == RTNORM) {<br /> return TRUE;<br /> }<br /> <br /> /*Y方向是否有交叉點。*/<br /> spt1[X] = gePoi3d.x; spt2[X] = gePoi3d.x;<br /> spt1[Y] = gePoi3d.y + (dPickLen / 2); spt2[Y] = gePoi3d.y - (dPickLen / 2);<br /> spt1[Z] = 0; spt2[Z] = 0;<br /> iReturn = acdbInters(spt1, spt2, spt3, spt4, 1, asDblArray(gePoi3dCrs));<br /> if (iReturn == RTNORM) {<br /> return TRUE;<br /> }<br /> }<br /> return FALSE;<br /> }<br /> <br /> <br /> 前阵困扰我的问题解决了，现在共享给大家：<br /> //************************************************************************<br /> //函数名称:getPointAtDistInGeCurve<br /> //函数类型:Acad::ErrorStatus <br /> //返回值:<br /> //功能描述:返回曲线上距起点某距离值处的点。<br /> //函数作者:Darcy<br /> //创建日期:2003-XX-XX<br /> //参数列表:<br /> //变量名:pGeCurve 变量类型:const AcGeCurve3d * 变量说明:<br /> //变量名:dist 变量类型:double 变量说明:<br /> //变量名:point 变量类型:AcGePoint3d& 变量说明:<br /> //备 注:<br /> //************************************************************************<br /> Acad::ErrorStatus getPointAtDistInGeCurve(const AcGeCurve3d * pGeCurve,double dist,AcGePoint3d& point)<br /> {<br /> Acad::ErrorStatus es = Acad::eOk;<br /> <br /> if ( pGeCurve != NULL )<br /> {<br /> AcGePoint3d spt;<br /> double pa=0.,datumParam=0.;<br /> //距离从起点起算！<br /> Adesk::Boolean posParamDir=Adesk::kTrue;<br /> <br /> pGeCurve->hasStartPoint(spt); <br /> <br /> datumParam = pGeCurve->paramOf(spt);;<br /> <br /> pa = pGeCurve->paramAtLength(<br /> datumParam,<br /> dist,<br /> posParamDir<br /> );<br /> <br /> point=pGeCurve->evalPoint(pa);<br /> }<br /> else<br /> es = Acad::eInvalidInput;<br /> <br /> return es;<br /> }<br /> <br /> <br /> <br /> bool<br /> IsAtLine(CAD_POINT StartPt,CAD_POINT EndPt,CAD_POINT thePt)<br /> /* 判断某点是否在直线上<br /> StartPt 直线起点 <br /> EndPt 直线终点<br /> thePt 所判断点<br /> 返回：TRUE__在直线上 FALSE__不在直线上<br /> */<br /> {<br /> //为保证计算精度，首先对点的坐标数据降级<br /> CAD_VECTOR vec(StartPt.x,StartPt.y,StartPt.z);<br /> StartPt=StartPt-vec;<br /> EndPt=EndPt-vec;<br /> thePt=thePt-vec;<br /> <br /> // 直线方程系数<br /> double A,B,C;<br /> A = EndPt.y - StartPt.y;<br /> B = StartPt.x - EndPt.x;<br /> C = -1.0*(A*StartPt.x+B*StartPt.y);<br /> <br /> if(StartPt.x==EndPt.x)<br /> {<br /> if(thePt.y>max(StartPt.y,EndPt.y) || thePt.y<MIN(STARTPT.Y,ENDPT.Y))<br /> return FALSE;<br /> }<br /> else if(StartPt.y==EndPt.y)<br /> {<br /> if(thePt.x>max(StartPt.x,EndPt.x) || thePt.x<MIN(STARTPT.X,ENDPT.X))<br /> return FALSE;<br /> }<br /> else<br /> {<br /> if( thePt.x>max(StartPt.x,EndPt.x) || thePt.x<br /> thePt.y>max(StartPt.y,EndPt.y) || thePt.y<br /> return FALSE;<br /> }<br /> <br /> if(fabs(A*thePt.x+B*thePt.y+C)>1.0E-6)<br /> {<br /> return FALSE;<br /> }<br /> <br /> return TRUE;<br /> }<br /> <br /> /*****************************************************/<br /> BOOL<br /> IsAtArc(CAD_POINT firstPt,CAD_POINT secondPt,<br /> double radius,double direct,int More,CAD_POINT thePt)<br /> /* 判断某点是否在圆弧上<br /> firstPt 圆弧起点<br /> secondPt 圆弧终点 <br /> radius 半径<br /> direct 偏向( >=0__左偏 <0__右偏 )<br /> More (More<0__小圆弧,More>0__大圆弧)<br /> thePt 判断点<br /> 返回：TRUE__在圆弧上 FALSE__不在圆弧上<br /> */<br /> {<br /> CAD_POINT centerPt,sectionPt;<br /> CAD_POINT startPt,endPt;<br /> double startAngle,endAngle,chordAngle,vertAngle;<br /> double intLine,chordLine;<br /> /* centerPt 圆弧圆心<br /> sectionPt 弦线中心点<br /> startAngle 圆弧起点切线角度（弧度）<br /> endAngle 圆弧终点切线角度（弧度）<br /> chordAngle 弦线角度（弧度）<br /> vertAngle 与弦线垂直的垂线角度（弧度）<br /> intLine 弦线中心至圆心距离<br /> chordLine 弦线长度<br /> */ <br /> sectionPt.x = (firstPt.x + secondPt.x)/2;<br /> sectionPt.y = (firstPt.y + secondPt.y)/2;<br /> <br /> chordLine = sqrt( pow( (secondPt.x-firstPt.x),2 ) + pow( (secondPt.y-firstPt.y),2 ) );<br /> intLine = sqrt((radius*radius-chordLine*chordLine/4) );<br /> <br /> chordAngle = ads_angle(asDblArray(firstPt),asDblArray(secondPt)); //弦线的角度<br /> <br /> if(direct>=0)//左偏<br /> {<br /> startPt=firstPt;<br /> endPt=secondPt;<br /> vertAngle=chordAngle+Pai/2;<br /> }<br /> else if(direct<0)//右偏<br /> {<br /> startPt=secondPt;<br /> endPt=firstPt;<br /> vertAngle=chordAngle-Pai/2;<br /> }<br /> <br /> if(More<=0)//小圆弧<br /> {<br /> centerPt.x=sectionPt.x+intLine*cos(vertAngle);<br /> centerPt.y=sectionPt.y+intLine*sin(vertAngle);<br /> }<br /> else//大圆弧<br /> {<br /> centerPt.x=sectionPt.x-intLine*cos(vertAngle);<br /> centerPt.y=sectionPt.y-intLine*sin(vertAngle);<br /> }<br /> <br /> if(fabs(centerPt.distanceTo(thePt)-radius)>1.0E-8)<br /> return FALSE;<br /> startAngle = ads_angle(asDblArray(centerPt),asDblArray(startPt)); <br /> endAngle = ads_angle(asDblArray(centerPt),asDblArray(endPt)); <br /> <br /> AcDbArc *pArc=new AcDbArc(centerPt,radius,startAngle,endAngle);<br /> AcDbLine *pLine=new AcDbLine(centerPt,thePt);<br /> AcGePoint3dArray Points;<br /> pLine->intersectWith(pArc,AcDb::kOnBothOperands,Points);<br /> if(Points.isEmpty()) return FALSE;<br /> <br /> return TRUE;<br /> }<br /> <br /> <br /> 有时候，你需要这样调用Autocad命令<br /> void SendCommandToAutoCad(CString cmd)<br /> {<br /> COPYDATASTRUCT cmdMsg; <br /> cmdMsg.dwData = (DWORD)1; <br /> cmdMsg.cbData = (DWORD)_tcslen(cmd) + 1; <br /> cmdMsg.lpData = cmd.GetBuffer(cmd.GetLength()+1) ; <br /> SendMessage(acedGetAcadFrame()->m_hWnd, WM_COPYDATA, NULL, (LPARAM)&cmdMsg); <br /> }<br /> <br /> <br /> 向AcDbObject添加扩展数据Xdata<br /> 代码:<br /> <br /> void affixXdata(char *appName, char *xData, AcDbObject *pObj)<br /> {<br />   //向AcDbObject添加扩展数据Xdata<br />   struct resbuf *pRb, *pTemp;<br /> <br />   acdbRegApp(appName);<br />   pRb = acutNewRb(AcDb::kDxfRegAppName);<br />   pTemp = pRb;<br />   pTemp->resval.rstring = new char[strlen(appName)+1];<br />   strcpy(pTemp->resval.rstring, appName);<br /> <br />   pTemp->rbnext = acutNewRb(AcDb::kDxfXdAsciiString);<br />   pTemp = pTemp->rbnext;<br />   pTemp->resval.rstring = new char[strlen(xData)+1];<br />   strcpy(pTemp->resval.rstring, xData);<br /> <br />   pObj->setXData(pRb);<br />   acutRelRb(pRb);<br /> }<br /> <br /> <br /> //添加扩展数据<br /> //实体添加扩展数据(字符串)<br /> bool AddXData(CString appName, AcDbObjectId entId,CString data)<br /> {<br /> //open entity for read<br /> AcDbEntity*pEnt;<br /> Acad::ErrorStatus es=acdbOpenAcDbEntity(pEnt,entId,AcDb::kForRead);<br /> if(es!=Acad::eOk)<br /> {<br /> ads_printf("error in open entity\n");<br /> return false;<br /> }<br /> //get XData buffer<br /> struct resbuf*pRb,*pTemp;<br /> pRb=pEnt->xData(appName);<br /> if(pRb!=NULL)//have XData<br /> {<br /> //pTemp移到表尾<br /> pTemp=pRb;<br /> for(pTemp=pRb;pTemp->rbnext!=NULL;pTemp=pTemp->rbnext){;}<br /> }<br /> else//NOT have XData<br /> {<br /> //create new xData<br /> ads_regapp(appName);<br /> pRb=ads_newrb(AcDb::kDxfRegAppName);<br /> pRb->resval.rstring=(char*)malloc(appName.GetLength()+1);<br /> strcpy(pRb->resval.rstring,appName);<br /> pTemp=pRb;<br /> }<br /> //fill xData string<br /> pTemp->rbnext=ads_newrb(AcDb::kDxfXdAsciiString);<br /> pTemp=pTemp->rbnext;<br /> pTemp->resval.rstring=(char*)malloc(data.GetLength()+1);<br /> strcpy(pTemp->resval.rstring,data);<br /> //add xData<br /> es=pEnt->upgradeOpen();<br /> if(es!=Acad::eOk)<br /> {<br /> ads_printf("\nError occur in updateOpen.");<br /> pEnt->close();<br /> ads_relrb(pRb);<br /> return false;<br /> }<br /> es=pEnt->setXData(pRb);<br /> if(es!=Acad::eOk)<br /> {<br /> ads_printf("\nError occur in setXData.");<br /> pEnt->close();<br /> ads_relrb(pRb);<br /> return false;<br /> }<br /> //<br /> pEnt->close();<br /> ads_relrb(pRb);<br /> return true;<br /> }<br /> <br /> <br /> //发命令前加按了两个ESCAPE<br /> void SendCommand(char *cmd)<br /> {<br /> HWND wnd;<br /> char cp[3];<br /> <br /> wnd = adsw_acadMainWnd();<br /> if(!wnd) return;<br /> <br /> COPYDATASTRUCT cmddata;<br /> cp[0] = VK_ESCAPE;<br /> cp[1] = VK_ESCAPE;<br /> cp[2] = NULL;<br /> cmddata.dwData = (DWORD)1;<br /> cmddata.cbData = (DWORD)strlen(cp)+1; <br /> cmddata.lpData = cp; <br /> SendMessage(wnd,WM_COPYDATA,(WPARAM)cp,(LPARAM)&cmddata);<br /> <br /> cmddata.dwData = (DWORD)1;<br /> cmddata.cbData = (DWORD)strlen(cmd)+1; <br /> cmddata.lpData = cmd; <br /> SendMessage(wnd,WM_COPYDATA,(WPARAM)wnd,(LPARAM)&cmddata);<br /> }<br /> <br /> //函数功能：根据用户指定的两点，自动创建破断线<br /> void CAD_EXTBreakLine()<br /> { <br /> acutPrintf("指定两点,自动创建折线破断线\n");<br /> <br /> ads_point StartPoint,EndPoint;<br /> if(acedGetPoint(NULL,"\n请指定破断线的起点:",StartPoint)!=RTNORM) return;<br /> if(acedGetPoint(StartPoint,"\n请指定破断线的终点:",EndPoint)!=RTNORM) return;<br /> AcGePoint3d Start,End;<br /> End = AcGePoint3d(EndPoint[X],EndPoint[Y],0);<br /> Start = AcGePoint3d(StartPoint[X],StartPoint[Y],0);<br /> float Length = Start.distanceTo(End);<br /> <br /> AcGeVector3d Normal = End-Start;<br /> Normal = Normal.normal(AcGeContext::gTol);<br /> <br /> AcGePoint3d Point1(Start-Length*Normal*0.15);<br /> AcGePoint3d Point2(Start+Length*Normal*0.45);<br /> AcGePoint3d Point5(End-Length*Normal*0.45);<br /> AcGePoint3d Point6(End+Length*Normal*0.15);<br /> <br /> AcGeVector3d Normal2(-Normal.y,Normal.x,0);<br /> AcGePoint3d Point3(Start+Length*Normal*0.5+Length*Normal2*0.10);<br /> AcGePoint3d Point4(Start+Length*Normal*0.5-Length*Normal2*0.10);<br /> <br /> AcGePoint3dArray vertices;<br /> vertices.append(Point1);<br /> vertices.append(Point2);<br /> vertices.append(Point3);<br /> vertices.append(Point4);<br /> vertices.append(Point5);<br /> vertices.append(Point6);<br /> AddNewLayer("COMMANTARY");<br /> AcDb2dPolyline* pBreakLine = new AcDb2dPolyline(AcDb::k2dSimplePoly,vertices,0,Adesk::kTrue,0,0,NULL);<br /> pBreakLine->setLayer("COMMANTARY",TRUE);<br /> <br /> AcGeMatrix3d mat;<br /> acdbUcsMatrix(mat,acdbHostApplicationServices()->workingDatabase());<br /> pBreakLine->transformBy(mat);<br /> <br /> pBreakLine->makeOpen();<br /> AddEntityToDb(pBreakLine);<br /> <br /> }<br /> <br /> //******************生成回转体**********************<br /> /* pt -- 旋转基点<br /> ver -- 旋转轴<br /> angle -- 旋转角度(角度制)<br /> 注意： 旋转轴不能垂直于面域平面、不能穿过面域*/<br /> //**************************************************<br /> void CreatRevolve(AcDbObjectId entid, <br /> AcGeVector3d normal, <br /> AcGePoint3d pt, <br /> AcGeVector3d ver, <br /> double angle)<br /> {<br /> Acad::ErrorStatus es; <br /> AcDbCurve *curve;<br /> AcDbObjectId tm;<br /> if (acdbOpenObject(curve,entid,AcDb::kForWrite)!=Acad::eOk)<br /> {<br /> acutPrintf("打开实体失败！");<br /> return ; <br /> }<br /> AcDbVoidPtrArray lines,regions1;<br /> lines.append((void*)curve);<br /> curve->close();<br /> es = AcDbRegion::createFromCurves(lines,regions1);<br /> if(es != Acad::eOk)<br /> {<br /> acutPrintf("获得面域失败！");<br /> return ;<br /> }<br /> angle = angle*PI/180;<br /> AcDbRegion *pregion1=AcDbRegion::cast((AcRxObject*)regions1[0]);<br /> AcDb3dSolid *p3dobj = new AcDb3dSolid;<br /> es = p3dobj->revolve(pregion1,pt,ver,angle);<br /> if (es != Acad::eOk) <br /> {<br /> acutPrintf("建立回转体失败!请检查回转轴和基准点是否正确!"); <br /> }<br /> pBlockTableRecord->appendAcDbEntity(tm,p3dobj);<br /> p3dobj->close();<br /> delete pregion1;<br /> }<br /> <br /> //复制对象<br /> void cloneSameOwnerObjects()<br /> {<br /> // Step 1: Obtain the set of objects to be cloned.<br /> ads_name sset;<br /> <br /> if (acedSSGet(NULL, NULL, NULL, NULL, sset) != RTNORM) {<br /> acutPrintf("\nNothing selected");<br /> return;<br /> }<br /> <br /> // Step 2: Add obtained object IDs to list of objects<br /> // to be cloned.<br /> long length;<br /> acedSSLength(sset, &length);<br /> AcDbObjectIdArray objList;<br /> AcDbObjectId ownerId = AcDbObjectId::kNull;<br /> <br /> for (int i = 0; i < length; i++) {<br /> ads_name ent;<br /> acedSSName(sset, i, ent);<br /> AcDbObjectId objId;<br /> acdbGetObjectId(objId, ent);<br /> <br /> // Check to be sure this has the same owner as the first<br /> // object.<br /> //<br /> AcDbObject *pObj;<br /> acdbOpenObject(pObj, objId, AcDb::kForRead);<br /> <br /> if (pObj->ownerId() == ownerId)<br /> objList.append(objId);<br /> else if (i == 0) {<br /> ownerId = pObj->ownerId();<br /> objList.append(objId);<br /> }<br /> pObj->close();<br /> }<br /> <br /> acedSSFree(sset);<br /> <br /> // Step 3: Get the object ID of the desired owner for<br /> // the cloned objects. We'll use model space for<br /> // this example.<br /> //<br /> AcDbBlockTable *pBlockTable;<br /> acdbHostApplicationServices()->workingDatabase()<br /> ->getSymbolTable(pBlockTable, AcDb::kForRead);<br /> <br /> AcDbObjectId modelSpaceId;<br /> pBlockTable->getAt(ACDB_MODEL_SPACE, modelSpaceId);<br /> pBlockTable->close();<br /> <br /> // Step 4: Create a new ID map.<br /> //<br /> AcDbIdMapping idMap;<br /> <br /> // Step 5: Call deepCloneObjects().<br /> //<br /> acdbHostApplicationServices()->workingDatabase()<br /> ->deepCloneObjects(objList, modelSpaceId, idMap);<br /> <br /> // Now we can go through the ID map and do whatever we'd<br /> // like to the original and/or clone objects.<br /> //<br /> // For this example, we'll print out the object IDs of<br /> // the new objects resulting from the cloning process.<br /> //<br /> AcDbIdMappingIter iter(idMap);<br /> for (iter.start(); !iter.done(); iter.next()) {<br /> AcDbIdPair idPair;<br /> iter.getMap(idPair);<br /> if (!idPair.isCloned())<br /> continue;<br /> acutPrintf("\nObjectId is: %Ld",<br /> <br /> idPair.value().asOldId());<br /> }<br /> <br /> }<br /> <br /> <br /> <br /> 线和面求交,线和三角形交.<br /> <br /> bool InterSection(XRay& ray,XPlan& plan,XPoint& point,float & t)<br /> {<br /> t = 0;<br /> <br /> /***<br /> <br /> -D - P0 * N(A,B,C)<br /> t = --------------------<br /> d * N(A,B,C)<br /> <br /> 其中D 为平面方程中的D,<br /> P0为射线的起点。而 d 为射线的方向<br /> <br /> **/<br /> t= -(plan.D + ray.m_Point.x * plan.A + ray.m_Point.y * plan.B + ray.m_Point.z * plan.C);<br /> float t2 = (ray.m_Dir.x * plan.A + ray.m_Dir.y * plan.B + ray.m_Dir.z * plan.C) ;<br /> <br /> if(t2 == 0.00)<br /> return false;<br /> <br /> t /= t2;<br /> <br /> <br /> //求出交点<br /> point = ray.m_Point + ray.m_Dir * t;<br /> <br /> if( t < 0)<br /> return false;<br /> <br /> return true;<br /> }<br /> <br /> <br /> bool InterSection(XRay& ray,XTriangle& tri,XPoint& point,float & t)<br /> {<br /> <br /> XVector3D v1 = tri.m_points[1] - tri.m_points[0];<br /> XVector3D v2 = tri.m_points[2] - tri.m_points[0];<br /> <br /> XVector3D n = v1.cp(v2);<br /> /**********************************************************************<br /> ray = p0 + D * t<br /> Tri : p1 - p3<br /> <br /> (P2-P1) X (P3-P1) = N <br /> <br /> N * (P - P1) = 0 ===><br /> N * (P0 + D * t - P1) = 0<br /> <br /> ==><br /> <br /> N * (P0 - P1) + N * D * t = 0;<br /> (P1-P0) * N<br /> t = ----------------------<br /> D * N<br /> ******************************************************************/<br /> t = n.dp(tri.m_points[0] - ray.m_Point);<br /> t /= (ray.m_Dir.dp(n));<br /> if( t < 0)<br /> return false;<br /> <br /> //求出交点<br /> point = ray.m_Point + ray.m_Dir * t;<br /> <br /> //判断点是不是在三角内部<br /> v1 = point - tri.m_points[0];<br /> v2 = point - tri.m_points[1];<br /> XVector3D v3 = point - tri.m_points[2];<br /> <br /> n = v1.cp(v2);<br /> XVector3D n1 = v2.cp(v3);<br /> <br /> if(n.isZero())<br /> return true;<br /> if(n1.isZero())<br /> return true;<br /> <br /> if( n.x * n1.x <= 0 )<br /> return false;<br /> if( n.y * n1.y <= 0 )<br /> return false;<br /> if( n.z * n1.z <= 0 )<br /> return false;<br /> <br /> return true;<br /> }<br /> <br /> <br /> //命名对象词典中无所需生成的词典（dictName）时生成词典，当DdictName存在时直接返回<br /> void createDictionary(char *dictName)<br /> {<br /> AcDbDictionary *pNameDict;<br /> acdbHostApplicationServices()->workingDatabase()-><br /> getNamedObjectsDictionary(pNameDict, AcDb::kForWrite);<br /> <br /> <br /> AcDbDictionary *pDict;<br /> if (pNameDict->getAt(dictName, (AcDbObject*&) pDict,<br /> AcDb::kForWrite) == Acad::eKeyNotFound)<br /> {<br /> pDict = new AcDbDictionary;<br /> AcDbObjectId DictId;<br /> pNameDict->setAt(dictName, pDict, DictId);<br /> }<br /> pNameDict->close();<br /> pDict->close();<br /> }<br /> <br /> //将自定义对象pObj加入词典dictName，对象名为objectName。词典dictName不存在时，调用creatDictionary()生成。<br /> void addObjectToDict(AcDbObject *pObj,char *objectName,char *dictName)<br /> {<br /> createDictionary(dictName);<br /> <br /> AcDbDictionary *pNamedobj;<br /> acdbHostApplicationServices()->workingDatabase()<br /> ->getNamedObjectsDictionary(pNamedobj, AcDb::kForRead);<br /> <br /> Acad::ErrorStatus es;<br /> AcDbDictionary *pDict;<br /> es=pNamedobj->getAt(dictName, (AcDbObject*&)pDict,<br /> AcDb::kForWrite);<br /> <br /> pNamedobj->close();<br /> <br /> if (es==Acad::eOk) //使用if(pDict)不能起到判断的作用。<br /> {<br /> // add new objects to the dictionary,<br /> // then close them.<br /> AcDbObjectId rId1;<br /> pDict->setAt(objectName, pObj, rId1);<br /> pDict->close(); //不能放在该处{}之外，即未能正常获取，就无所谓关闭，否则出错。<br /> }<br /> // pDict->close(); <br /> <br /> }<br /> <br /> //根据CAD两点坐标及对应的大地坐标（经纬距）计算两坐标系的夹角angle及比例转换系数K<br /> //计算大地坐标系原点在CAD世界坐标系中的原点坐标earthorg<br /> //函数return夹角，其单位为弧度<br /> float EonAndXoyAngle(ads_point cadPt1,ads_point cadPt2,ads_point earthPt1,ads_point earthPt2,double &k,ads_point &earthOrg)<br /> {<br /> float angle;<br /> double n,e,x,y;<br /> float ax,ae;<br /> <br /> <br /> n=(earthPt2[Y]-earthPt1[Y]);<br /> e=(earthPt2[X]-earthPt1[X]);<br /> x=(cadPt2[X]-cadPt1[X]);<br /> y=(cadPt2[Y]-cadPt1[Y]);<br /> <br /> k=sqrt((n*n+e*e)/(x*x+y*y));<br /> <br /> ax=atan2(y,x); //线段与X轴的夹角<br /> ae=atan2(n,e); //线段与E轴的夹角<br /> <br /> angle=(ax-ae);<br /> <br /> earthOrg[X]=cadPt1[X]-(cos(angle)*earthPt1[X]-sin(angle)*earthPt1[Y])/k;<br /> earthOrg[Y]=cadPt1[Y]-(cos(angle)*earthPt1[Y]+sin(angle)*earthPt1[X])/k;<br /> return angle;<br /> }<br /> //将CAD坐标转换为大地坐标<br /> void xyToEn(ads_point cadPt,ads_point& earthPt,ads_point earthOrg,float angle, double k)<br /> {<br /> earthPt[X]=k*(cos(angle)*(cadPt[X]-earthOrg[X])+sin(angle)*(cadPt[Y]-earthOrg[Y]));<br /> earthPt[Y]=k*(-sin(angle)*(cadPt[X]-earthOrg[X])+cos(angle)*(cadPt[Y]-earthOrg[Y]));<br /> }<br /> //将大地坐标转换为CAD坐标<br /> void enToXY(ads_point earthPt,ads_point& cadPt,ads_point earthOrg,float angle, double k)<br /> {<br /> cadPt[X]=earthOrg[X]+(cos(angle)*earthPt[X]-sin(angle)*earthPt[Y])/k;<br /> cadPt[Y]=earthOrg[Y]+(cos(angle)*earthPt[Y]+sin(angle)*earthPt[X])/k;<br /> }<br /> // 判定当前图形中有无给定块名的块表记录，有返回true、同时返回其id，<br /> //否则返回flase<br /> bool existBlock(char* pBlockName,AcDbObjectId &blockId)<br /> {<br /> AcDbBlockTable* pBlockTable;<br /> <br /> acdbHostApplicationServices()->workingDatabase()<br /> ->getSymbolTable(pBlockTable,AcDb::kForRead);<br /> if(pBlockTable->has(pBlockName))<br /> {<br /> pBlockTable->getAt(pBlockName,blockId);<br /> pBlockTable->close();<br /> return true;<br /> }<br /> else<br /> {<br /> pBlockTable->close();<br /> return false;<br /> }<br /> }<br /> // 把一图形文件dwg插入当前图形作为一块，并给予块名。若有同名块就不再插入。<br /> bool insertDwgToCurDwg(char* pFullPathFile,char* pBlockName,AcDbObjectId &blockId)<br /> {<br /> AcDbDatabase *pNewDb,*pCurDb;<br /> Acad::ErrorStatus es;<br /> <br /> if(existBlock(pBlockName,blockId))<br /> {<br /> return true;<br /> }<br /> <br /> <br /> pNewDb=new AcDbDatabase(Adesk::kFalse);<br /> es=pNewDb->readDwgFile(pFullPathFile, _SH_DENYNO,false);<br /> if (es!=Acad::eOk)<br /> {<br /> acutPrintf("读文件错");<br /> delete pNewDb;<br /> return false; <br /> }<br /> <br /> pCurDb =acdbHostApplicationServices()->workingDatabase();<br /> if((es=pCurDb->insert(blockId, pBlockName,pNewDb, true))==Acad::eOk)<br /> {<br /> <br /> delete pNewDb;<br /> return true; <br /> }<br /> else<br /> {<br /> delete pNewDb;<br /> return false;<br /> }<br /> <br /> }<br /> <br /> <br /> AcGePlane<br /> CRegionGraph::getUcsPlane(AcDbDatabase* db)<br /> {<br /> ASSERT(db != NULL);<br /> <br /> AcGeMatrix3d m;<br /> <br /> if (acdbUcsMatrix(m, db)) {<br /> AcGePoint3d origin;<br /> AcGeVector3d xDir, yDir, zDir;<br /> <br /> m.getCoordSystem(origin, xDir, yDir, zDir);<br /> AcGePlane ucsPlane(origin, xDir, yDir);<br /> return ucsPlane;<br /> }<br /> else {<br /> ASSERT(0);<br /> AcGePlane ucsPlane(AcGePoint3d::kOrigin, AcGeVector3d::kIdentity);<br /> return ucsPlane;<br /> }<br /> }<br /> <br /> //*****************************<br /> AcGeVector3d<br /> CRegionGraph::getUcsXAxis(AcDbDatabase* db)<br /> {<br /> ASSERT(db != NULL);<br /> <br /> AcGeMatrix3d m;<br /> <br /> if (acdbUcsMatrix(m, db)) {<br /> AcGePoint3d origin;<br /> AcGeVector3d xDir, yDir, zDir;<br /> <br /> m.getCoordSystem(origin, xDir, yDir, zDir);<br /> return xDir;<br /> }<br /> else {<br /> ASSERT(0);<br /> return AcGeVector3d::kXAxis;<br /> }<br /> }<br /> <br /> /****************************************************************************<br /> **<br /> ** CRegionGraph::getUcsYAxis<br /> ** returns current UCS Y Axis, even if currently the paperSpace viewport<br /> **<br /> ** **jma<br /> */<br /> //*************************************/<br /> <br /> AcGeVector3d<br /> CRegionGraph::getUcsYAxis(AcDbDatabase* db)<br /> {<br /> ASSERT(db != NULL);<br /> <br /> AcGeMatrix3d m;<br /> <br /> if (acdbUcsMatrix(m, db)) {<br /> AcGePoint3d origin;<br /> AcGeVector3d xDir, yDir, zDir;<br /> <br /> m.getCoordSystem(origin, xDir, yDir, zDir);<br /> return yDir;<br /> }<br /> else {<br /> ASSERT(0);<br /> return AcGeVector3d::kYAxis;<br /> }<br /> }<br /> <br /> /****************************************************************************<br /> **<br /> ** CRegionGraph::getUcsZAxis<br /> **<br /> ** **jma<br /> **<br /> *************************************/<br /> <br /> AcGeVector3d<br /> CRegionGraph::getUcsZAxis(AcDbDatabase* db)<br /> {<br /> ASSERT(db != NULL);<br /> <br /> AcGeMatrix3d m;<br /> <br /> if (acdbUcsMatrix(m, db)) {<br /> AcGePoint3d origin;<br /> AcGeVector3d xDir, yDir, zDir;<br /> <br /> m.getCoordSystem(origin, xDir, yDir, zDir);<br /> return zDir;<br /> }<br /> else {<br /> ASSERT(0);<br /> return AcGeVector3d::kZAxis;<br /> }<br /> }<br /> <br /> <br /> //指定两点Pnt3d1,Pnt3d2,查询Pnt3d3是否在由前两点组成的线的左边,坐标被投影成二维<br /> BOOL CCommonHanlder::QueryPntIsOnLineLeft(AcGePoint3d Pnt3d1,AcGePoint3d Pnt3d2,AcGePoint3d Pnt3d3)<br /> {<br /> AcGePlane plane;<br /> AcGePoint2d Pnt1,Pnt2,Pnt3;<br /> Pnt1=Pnt3d1.convert2d(plane);<br /> Pnt2=Pnt3d2.convert2d(plane);<br /> Pnt3=Pnt3d3.convert2d(plane);<br /> AcGeVector2d vec1,vec2;<br /> AcGeLineSeg2d lin1,lin2;<br /> lin1.set(Pnt2,Pnt1);<br /> vec1=lin1.direction();<br /> lin2.set(Pnt1,Pnt3);<br /> vec2=lin2.direction();<br /> if(sin(vec1.angle()-vec2.angle())>0)<br /> return FALSE;<br /> else<br /> return TRUE;<br /> }<br /> <br /> <br /> /////////////////////创建窗体图层"Window_Layer"/////////////////<br /> AcDbObjectId<br /> createWindowsLayer()<br /> {<br /> //打开层表，打开方式为只写///<br /> AcDbLayerTable *pLayerTable;<br /> acdbHostApplicationServices()->workingDatabase()<br /> ->getSymbolTable(pLayerTable,AcDb::kForWrite);<br /> //初始化层表记录对象，并设定层表记录的名称“Window_Layer”<br /> <br /> AcDbLayerTableRecord *pLayerTableRecord=new AcDbLayerTableRecord;<br /> pLayerTableRecord->setName("Window_Layer");<br /> <br /> AcCmColor color;<br /> color.setColorIndex(1); // set color to red<br /> <br /> pLayerTableRecord->setColor(color);<br /> //层的其他属性（线型等）都用缺省值////<br /> <br /> //将新建的层表记录添加到层表中，并将层表记录的ID保存到pLayerId作为函数的返回值////<br /> <br /> AcDbObjectId pLayerId;<br /> pLayerTable->add(pLayerId,pLayerTableRecord);<br /> //关闭层表和层表记录对象///<br /> pLayerTable->close();<br /> pLayerTableRecord->close();<br /> <br /> return pLayerId;<br /> }<br /> <br /> <br /> <br /> ///*************在指定点插入指定块*******************\\\<br /> void CTestPlate::OnBlockInsert() <br /> {<br /> // TODO: Add your control notification handler code here<br /> acDocManager->lockDocument(curDoc());<br /> AcDbObjectId blockId; //要插入的块的Id值<br /> AcDbBlockTable *pBlockTable;<br /> acdbHostApplicationServices()->workingDatabase()<br /> ->getSymbolTable(pBlockTable,AcDb::kForRead);<br /> Acad::eOk!=pBlockTable->getAt("ASDK-NO-ATTR",<br /> blockId,AcDb::kForRead)//根据块名获得要插入的块的ID值<br /> AcDbBlockReference *pBlkRef=new AcDbBlockReference;//插入块实质是插入块的引用<br /> pBlkRef->setBlockTableRecord(blockId);//指定所引用的图块表记录的对象ID<br /> resbuf to,from;<br /> from.restype=RTSHORT;//插入图块要进行用户坐标与世界坐标的转换<br /> from.resval.rint=1;//UCS<br /> to.restype=RTSHORT;<br /> to.resval.rint=0;//WCS<br /> AcGeVector3d normal(0.0,0.0,1.0);<br /> acedTrans(&(normal.x),&from,&to,Adesk::kTrue,&(normal.x));//转换函数<br /> AcGePoint3d basePoint(12,23,0);//指定的插入点(可以根据需要输入)<br /> //acedGetPoint(NULL,"\nEnter insertion point:",asDblArray(basePoint));<br /> pBlkRef->setPosition(basePoint);<br /> pBlkRef->setRotation(0.0);<br /> pBlkRef->setNormal(normal);<br /> AcDbBlockTableRecord *pBlockTableRecord;<br /> pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);<br /> pBlockTable->close();<br /> AcDbObjectId newEntId;<br /> pBlockTableRecord->appendAcDbEntity(newEntId,pBlkRef);<br /> pBlockTableRecord->close();<br /> pBlkRef->close();<br /> acDocManager->lockDocument(curDoc());<br /> }<br /> <br /> <br /> //點遷多義線中之一直線，獲得線段之位置（圓弧可自行補上）<br /> void GetPolyLineSelectLineIndex(AcDbPolyline *Poly,AcGePoint3d SelectPt,int Index)<br /> {<br /> AcGePoint2d tempPt;<br /> double Distance=11111111;<br /> tempPt.x=SelectPt.x;<br /> tempPt.y=SelectPt.y;<br /> AcDbVoidPtrArray entitySet;<br /> Poly->explode(entitySet);<br /> for(int i=0;i<ENTITYSET.LENGTH();I++)<br /> {<br /> AcDbEntity *pEnt;<br /> pEnt=AcDbPolyline::cast((AcRxObject*)entitySet[i]);<br /> if(pEnt->isA()==AcDbLine::desc())<br /> {<br /> AcDbLine *pLine=AcDbLine::cast(pEnt);<br /> AcGePoint2d StPt,EndPt;<br /> StPt.x=pLine->startPoint().x;<br /> StPt.y=pLine->startPoint().y;<br /> EndPt.x=pLine->endPoint().x;<br /> EndPt.y=pLine->endPoint().y;<br /> pLine->close();<br /> AcGeLine2d GeLine(StPt,EndPt);<br /> double pama=0;<br /> if((GeLine.isOn(tempPt,pama)==Adesk::kTrue)&&pama<=1&&pama>=0)<br /> {<br /> Index=i;<br /> break;<br /> }<br /> else<br /> {<br /> if(GeLine.distanceTo(tempPt)<DISTANCE)<br /> {<br /> AcGeLine2d tempLine;<br /> GeLine.getPerpLine(tempPt,tempLine);<br /> AcGePoint2d InsertPt;<br /> GeLine.intersectWith(tempLine,InsertPt);<br /> double pama=0;<br /> if((GeLine.isOn(InsertPt,pama)==Adesk::kTrue)&&pama<=1&&pama>=0)<br /> {<br /> Distance=GeLine.distanceTo(tempPt);<br /> Index=i;<br /> }<br /> }<br /> }<br /> }<br /> pEnt->close();<br /> }<br /> }<br /> <br /> int unionSolid(AcDbObjectId extrudeId,AcDb3dSolid *&pSolid)<br /> {<br /> //打开切弧实体 pExtrude<br /> AcDb3dSolid *pExtrude;<br /> if (Acad::eOk!=acdbOpenObject(pExtrude,extrudeId,AcDb::kForWrite)){<br /> acutPrintf("\nError: Invalid extrude solid! ");<br /> if(pExtrude!=NULL) pExtrude->close();<br /> return RTERROR;<br /> }<br /> if(pExtrude==NULL){<br /> acutPrintf("\nError: Invalid extrude solid! ");<br /> return RTERROR;<br /> }<br /> <br /> // 实体<br /> if(pSolid==NULL){<br /> acutPrintf("\nError: Invalid extrude solid! ");<br /> return RTERROR;<br /> } <br /> //Unit<br /> if(Acad::eOk!=pSolid->booleanOper(AcDb::kBoolUnite,pExtrude))<br /> {<br /> acutPrintf("\nError: substract error!");<br /> pExtrude->close();<br /> return RTERROR;<br /> }<br /> pExtrude->close();<br /> return RTNORM; <br /> }<br /> <br /> Acad::ErrorStatus DyZoom(AcGePoint2d CenterPt,double Height,double Width)<br /> {<br /> Acad::ErrorStatus es;<br /> AcDbViewTableRecord *view=new AcDbViewTableRecord();<br /> view->setCenterPoint(CenterPt);<br /> view->setFrontClipAtEye(false);<br /> view->setHeight(Height);<br /> view->setWidth(Width);<br /> es=acedSetCurrentView(view,NULL);<br /> view->close();<br /> delete view;<br /> view=NULL; <br /> return es;<br /> }<br /> <br /> 创建circle和newlayer（加了错误检查的代码）<br /> Acad::ErrorStatus<br /> createCircle(AcDbObjectId& circleId)<br /> {<br /> circleId = AcDbObjectId::kNull;<br /> <br /> AcGePoint3d center(9.0,3.0,0.0);<br /> AcGeVector3d normal(0.0,0.0,0.1);<br /> AcDbCircle*pCirc=new AcDbCircle(center,normal,2.0);<br /> <br /> if(pCirc==NULL)<br /> return Acad::eOutOfMemory;<br /> <br /> AcDbBlockTable*pBlockTable;<br /> Acad::ErrorStatus es= <br /> acdbHostApplicationServices()->workingDatabase()-><br /> getSymbolTable(pBlockTable,AcDb::kForRead);<br /> if(es!=Acad::eOk) <br /> {<br /> delete pCirc;<br /> return es;<br /> }<br /> <br /> AcDbBlockTableRecord*pBlockTableRecord;<br /> es=pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);<br /> if(es!=Acad::eOk){<br /> Acad::ErrorStatus es2=pBlockTable->close();<br /> if (es2!=Acad::eOk){<br /> acrx_abort("\n应用程序X关闭边失败,错误码为:%d",<br /> acadErrorStatusText(es2));<br /> }<br /> delete pCirc;<br /> return es;<br /> }<br /> <br /> es=pBlockTable->close();<br /> if (es!=Acad::eOk)<br /> {<br /> acrx_abort("\n应用程序X关闭边失败,错误码为:%d",<br /> acadErrorStatusText(es));<br /> }<br /> es=pBlockTableRecord->appendAcDbEntity(circleId,pCirc);<br /> if(es!=Acad::eOk){<br /> Acad::ErrorStatus es2=pBlockTableRecord->close();<br /> if (es2!=Acad::eOk){<br /> acrx_abort("\n应用程序X关闭模型空间块表记录失败,错误码为:%s",<br /> acadErrorStatusText(es2));<br /> }<br /> delete pCirc;<br /> return es;<br /> }<br /> <br /> es=pBlockTableRecord->close();<br /> if(es!=Acad::eOk)<br /> {<br /> acrx_abort("\n应用程序X关闭模型空间块表记录失败,错误码为:%d",<br /> acadErrorStatusText(es));<br /> }<br /> <br /> es=pCirc->close();<br /> if(es!=Acad::eOk){<br /> acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",<br /> acadErrorStatusText(es));<br /> }<br /> return es;<br /> }<br /> <br /> <br /> Acad::ErrorStatus<br /> createNewLayer()<br /> {<br /> AcDbLayerTableRecord*pLayerTableRecord=new AcDbLayerTableRecord;<br /> <br /> if (pLayerTableRecord==NULL)<br /> return Acad::eOutOfMemory;<br /> <br /> Acad::ErrorStatus es<br /> =pLayerTableRecord->setName("ASDK_MYLAYER");<br /> if(es!=Acad::eOk)<br /> {<br /> delete pLayerTableRecord;<br /> return es;<br /> }<br /> <br /> AcDbLayerTable*pLayerTable;<br /> es=acdbHostApplicationServices()->workingDataBase()-><br /> getSymbolTable(pLayerTable,AcDb::kForWrite);<br /> if(es!=Acad::eOk){<br /> delete pLayerTableRecord;<br /> return es;<br /> }<br /> //由于先型对象ID的缺省直是0，不是有效的ID，必须将其设置为有效的ID，<br /> //即CONTINUOUS线型。其他数据成员都为有效缺省值，因此不须对其进行设置<br /> AcDbLinetypeTable*pLinetypeTbl;<br /> es=acdbHostApplicationServices()->workingDatabase()-><br /> getSymbolTable(pLinetypeTbl,AcDb::kForRead);<br /> if (es!=Acad::eOk){<br /> delete pLayerTableRecord;<br /> es=pLayerTable->close();<br /> <br /> if(es!=Acad::eOk){<br /> acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",<br /> acadErrorStatusText(es));<br /> }<br /> return es;<br /> }<br /> <br /> AcDbObjectId ltypeobjId;<br /> es=pLinetypeTbl->getAt("CONTINUOUS",ltypeObjId);<br /> if (es!=Acad::eOk){ <br /> delete pLayerTableRecord;<br /> es=pLayerTable->close();<br /> if (es!=Acad::eOk){<br /> acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",acadErrorStatusText(es));<br /> }<br /> return es;<br /> }<br /> <br /> pLayerTableRecord->setLinetypeObjectId(ltypeObjId);<br /> es=pLayerTable->add(pLayerTableRecord);<br /> if (es!=Acad::eOk)<br /> {<br /> Acad::ErrorStatus es2=pLayerTable->close();<br /> if (es2!=Acad::eOk)<br /> {<br /> <br /> acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",<br /> acadErrorStatusText(es2));<br /> }<br /> delete pLayerTableRecord;<br /> return es;<br /> }<br /> <br /> es=pLayerTable->close();<br /> if(es!=Acad::eOk)<br /> {<br /> acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",<br /> acadErrorStatusText(es));<br /> }<br /> es=pLayerTableRecord->close();<br /> if(es!=Acad::eOk)<br /> {<br /> acrx_abort("\n应用程序X关闭实体失败,错误码为:%d",<br /> acadErrorStatusText(es));<br /> }<br /> return es;<br /> }<br /> <br /> <br /> Function name: setEntityElevation<br /> Parameters: ads_name, double<br /> Return value: False or True<br /> <br /> According to the Entity name setting the elevation value of text,polyline,2dpolyline,block,hatch which is given<br /> BOOL setEntityElevation(ads_name en, double elevation)<br /> { AcDbEntity* pEnt;<br /> AcDbObjectId eId;<br /> <br /> if(acdbGetObjectId(eId, en) != Acad::eOk) return FALSE;<br /> if(acdbOpenObject(pEnt,eId,AcDb::kForWrite) != Acad::eOk) return FALSE;<br /> if(!pEnt) { acutPrintf("\nFail to open Database!!"); return FALSE; }<br /> <br /> if(pEnt->isKindOf(AcDbPolyline::desc())) {<br /> ((AcDbPolyline*)pEnt)->setElevation(elevation);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else if(pEnt->isKindOf(AcDb2dPolyline::desc())) {<br /> ((AcDb2dPolyline*)pEnt)->setElevation(elevation);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else if(pEnt->isKindOf(AcDbText::desc())) {<br /> AcGePoint3d point3d;<br /> point3d = ((AcDbText*)pEnt)->position();<br /> point3d[2] = elevation;<br /> ((AcDbText*)pEnt)->setPosition(point3d);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else if(pEnt->isKindOf(AcDbMText::desc())) {<br /> AcGePoint3d point3d;<br /> point3d = ((AcDbMText*)pEnt)->location();<br /> point3d[2] = elevation;<br /> ((AcDbMText*)pEnt)->setLocation(point3d);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else if(pEnt->isKindOf(AcDbBlockReference::desc())) {<br /> AcGePoint3d point3d;<br /> point3d = ((AcDbBlockReference*)pEnt)->position();<br /> point3d[2] = elevation;<br /> ((AcDbBlockReference*)pEnt)->setPosition(point3d);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else if(pEnt->isKindOf(AcDbShape::desc())) {<br /> AcGePoint3d point3d;<br /> point3d = ((AcDbShape*)pEnt)->position();<br /> point3d[2] = elevation;<br /> ((AcDbShape*)pEnt)->setPosition(point3d);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else if(pEnt->isKindOf(AcDbHatch::desc())) {<br /> ((AcDbHatch*)pEnt)->setElevation(elevation);<br /> pEnt->close(); // Finished with the pEnt header.<br /> }<br /> else { pEnt->close(); return FALSE; }<br /> return TRUE;<br /> <br /> 推荐使用方法二，基本上适用于AutoCAD所有版本（我可是跟踪分析注册表，费了好大一番劲才搞出来的哟）。"W-SCAS2006"为/p参数启动的配置名称。<br /> 只要在退出消息里调用这个函数就行，如：在kPreQuitMsg消息里。<br /> /*case AcRx::kPreQuitMsg:<br /> REStoreDefPro();<br /> break;*/<br /> <br /> //////////////////////////////////////////////////////////////////////////<br /> // 函数名: REStoreDefPro<br /> // 输 入: /<br /> // 输 出: /<br /> // 功能描述: 恢复当前配置文件为AutoCAD默认配置<br /> // 全局变量: /<br /> // 调用模块: <br /> // 作 者: Meng Huang<br /> // 日 期: 2006.02.21<br /> // 修 改: Meng Huang<br /> // 日 期: 2006.02.23<br /> // 版 本: 1.1<br /> //////////////////////////////////////////////////////////////////////////<br /> void REStoreDefPro()<br /> {<br /> // 方法一：<br /> // AcApProfileNameArray arrNameList;<br /> // int nProfiles = acProfileManagerPtr()->ProfileListNames(arrNameList);<br /> // CString strProName;<br /> // Acad::ErrorStatus es;<br /> //<br /> // for (int i = 0; i < nProfiles; i++)<br /> // {<br /> // strProName = arrNameList[i];<br /> // if (strProName == _T("<<未命名配置>>") ||<br /> // strProName == _T("<>"))<br /> // {<br /> // /*es = */acProfileManagerPtr()->ProfileSetCurrent(strProName); <br /> // break;<br /> // }<br /> // else if (i == nProfiles - 1)<br /> // {<br /> // /*es = */acProfileManagerPtr()->ProfileCopy(_T("<<未命名配置>>"), _T("W-SCAS2006"), _T("默认配置名称"));<br /> // /*es = */acProfileManagerPtr()->ProfileReset(_T("<<未命名配置>>"));<br /> // /*es = */acProfileManagerPtr()->ProfileSetCurrent(_T("<<未命名配置>>"));<br /> // }<br /> // }<br /> <br /> // 方法二：<br /> HKEY hKey;<br /> LONG lRetVal;<br /> DWORD unSubKeyNum = 0;<br /> DWORD sizeSubKey; // 子键大小<br /> TCHAR subKeyName[255]; // 子键名<br /> <br /> // 打开HKEY_USERS主键<br /> lRetVal = RegOpenKeyEx(HKEY_USERS, _T(""), 0, KEY_READ, &hKey);<br /> if (lRetVal != ERROR_SUCCESS)<br /> return;<br /> <br /> // 查得当前键下的子键项数<br /> lRetVal = RegQueryInfoKey(hKey, NULL, NULL, NULL, &unSubKeyNum, NULL, NULL, NULL, NULL, NULL, NULL, NULL);<br /> if (lRetVal != ERROR_SUCCESS)<br /> {<br /> RegCloseKey(hKey);<br /> return;<br /> }<br /> <br /> // 取得含有S-1-5-21-***********,但不包含Classes字符串的子键名<br /> CString strTmp;<br /> CString strFullSubKey;<br /> for (DWORD i = 0; i < unSubKeyNum; i++) <br /> {<br /> subKeyName[0] = '\0'; // 清空子键<br /> sizeSubKey = 255; // 赋缓冲区大小<br /> lRetVal = RegEnumKeyEx(hKey, i, subKeyName, &sizeSubKey, NULL, NULL, NULL, NULL);<br /> if (lRetVal != ERROR_SUCCESS)<br /> {<br /> RegCloseKey(hKey);<br /> return;<br /> }<br /> <br /> strTmp = subKeyName;<br /> if (strTmp.Find(_T("S-1-5-21-")) != -1 &&<br /> strTmp.Find(_T("Classes")) == -1)<br /> {<br /> strFullSubKey = strTmp;<br /> break;<br /> }<br /> }<br /> if (strFullSubKey.IsEmpty()) // 没有找到符合条件的子键<br /> {<br /> RegCloseKey(hKey);<br /> return;<br /> }<br /> <br /> // 获取和配置文件相对应的的子键字符串<br /> char *pchRegProfileKey;<br /> acProfileManagerPtr()->ProfileRegistryKey(pchRegProfileKey, _T("W-SCAS2006"));<br /> if (pchRegProfileKey == NULL)<br /> {<br /> RegCloseKey(hKey);<br /> return;<br /> }<br /> else<br /> {<br /> strTmp = pchRegProfileKey;<br /> acutDelString(pchRegProfileKey);<br /> int nStart = strTmp.Find('\');<br /> int nEnd = strTmp.ReverseFind('\');<br /> strTmp = strTmp.Mid(nStart, nEnd - nStart); <br /> RegCloseKey(hKey);<br /> }<br /> <br /> strFullSubKey += strTmp; // 要修改键值的完整子键字符串<br /> <br /> // 修改对应的键值(把该键值置空,下次启动CAD如果没指定/p参数则使用<<未命名配置>>,<br /> // 如果该配置不在,CAD会自动新一个,并使用它)<br /> lRetVal = RegOpenKeyEx(HKEY_USERS, strFullSubKey, 0, KEY_WRITE, &hKey);<br /> if (lRetVal != ERROR_SUCCESS)<br /> {<br /> RegCloseKey(hKey);<br /> return;<br /> }<br /> BYTE uchProFile[1] = {'\0'};<br /> RegSetValueEx(hKey, NULL, 0, REG_SZ, uchProFile, 1);<br /> RegCloseKey(hKey);<br /> }<br /> <br /> <br /> //************************************************************************<br /> //函数名称:selectEntityInLayer<br /> //函数类型:Acad::ErrorStatus <br /> //返回值:  正常：Acad::eOk<br /> //功能描述:选择指定图层上的所有实体！<br /> //函数作者:Darcy<br /> //创建日期:200X-XX-XX<br /> //参数列表:<br /> //变量名:nLayerName     变量类型:const char*           变量说明:(输入)图层名<br /> //变量名:nIDs           变量类型:AcDbObjectIdArray&    变量说明:(输出)图层中实体的对象标识符集合<br /> //************************************************************************<br /> Acad::ErrorStatus selectEntityInLayer(const char* nLayerName,AcDbObjectIdArray& nIDs)<br /> {<br />   Acad::ErrorStatus es = Acad::eOk;<br /> <br />   ads_name ents;<br />   struct resbuf *rb;<br />   rb=acutNewRb(AcDb::kDxfLayerName);<br />   rb->restype=8;<br />   rb->resval.rstring=(char*)nLayerName;<br />   rb->rbnext=NULL;<br />   acedSSGet("X",NULL,NULL,rb,ents);<br />   long entNums=0;<br />   acedSSLength(ents,&entNums);<br />   if (entNums == 0)<br />     es = Acad::eInvalidInput;<br />   else<br />   {<br />     for (long a = 0; a < entNums ; a ++)<br />     {<br />       AcDbObjectId  objId;<br />       ads_name      ent;<br />       acedSSName(ents,a,ent);<br />       acdbGetObjectId(objId, ent);<br />       nIDs.append(objId);<br />     }<br />   }<br />   acedSSFree(ents);<br />   acutRelRb(rb);<br /> <br />   return es;<br /> }<br /> <br /> <br /> //创建字体类型<br /> 代码:<br /> <br /> void DrawAndEdit::createTextStyle(char *styleName, char *fontName, char *bigFontName, double textSize, double xScale, double obliqueAngle, double trPercent)<br /> {<br />   AcDbTextStyleTable *pTextStyleTable;<br /> <br />     acdbHostApplicationServices()->workingDatabase()<br />         ->getSymbolTable(pTextStyleTable, AcDb::kForRead);<br />   AcDbTextStyleTableRecord *pRecord;<br />   pTextStyleTable->getAt(ACDB_MODEL_SPACE,pRecord,<br />     AcDb::kForWrite);<br /> <br />   if (!pTextStyleTable->has(styleName)){<br />     AcDbObjectId recId;<br />         pTextStyleTable->close();<br />     acdbHostApplicationServices()->workingDatabase()<br />       ->getSymbolTable(pTextStyleTable, AcDb::kForWrite);<br />     pRecord = new AcDbTextStyleTableRecord();<br />     pRecord->setName(styleName);<br />     pRecord->setFileName(fontName);<br />     pRecord->setBigFontFileName(bigFontName);<br />     pRecord->setTextSize(textSize);<br />     pRecord->setXScale(xScale);<br />     pRecord->setObliquingAngle(obliqueAngle);<br />     pRecord->setPriorSize(trPercent);<br />     pTextStyleTable->add(recId,pRecord);<br />     pRecord->close();<br />   }<br /> <br />   pTextStyleTable->close();<br /> <br />   return;<br /> }<br /> <br /> <br /> //生成新组（sGroupName）<br /> //追加数组中所有实体到该组中<br /> //组名字 ,   Id数组<br /> int createGroup(CString sGroupName,<br />                    const AcDbObjectIdArray *idArr)<br /> {<br />   AcDbGroup       *pGroup = new AcDbGroup((LPSTR)(LPCTSTR)sGroupName);<br />   AcDbObjectId     groupObjectId;<br />   AcDbDictionary  *pGroupDict = NULL;<br /> <br />   acdbHostApplicationServices()->workingDatabase()<br />         ->getGroupDictionary(pGroupDict, AcDb::kForWrite);<br />   pGroupDict->setAt(sGroupName, pGroup, groupObjectId);<br />   pGroupDict->close();<br />     pGroup->close();<br />     acdbOpenObject(pGroup, groupObjectId, AcDb::kForWrite);<br />   for (int i = 0; i < idArr->length(); i++)<br />   {<br />     groupObjectId = idArr->at(i);<br />     pGroup->append(groupObjectId);   <br />   }<br />   pGroup->close();<br />   return TRUE;<br /> }<br /> <br /> <br /> AcDbObjectId CreateNewTextStyle()<br /> {<br />   AcDbTextStyleTable *pTextStyleTable;<br />   AcDbTextStyleTableRecord *pTextStyleTableRcd<br />   AcDbObjectId textId;<br />   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pTextStyleTable,AcDb::kForWrite);<br /> <br />   if (!pTextStyleTable->has(StyleName) <br />   {<br />     AcDbTextStyleTableRecord *pTSTblRcd= new AcDbTextStyleTableRecord;<br />     pTSTblRcd->setName(StyleName);<br />     pTSTblRcd->setFileName(fontName);<br />     pTSTblRcd->setBigFontFileName(bigfontName);<br />     pTSTblRcd->setTextSize(textSize);<br />     pTSTblRcd->setXScale(xScale);<br />     pTSTblRcd->setObliquingAngle(obliqueAngle);<br />     pTSTblRcd->setPriorSize(trPercent);<br />     pTextStyleTable->add(textId,pTextStyleTableRcd);<br />     pTSTblRcd->close();<br />   }<br />     pTextStyleTable->close();<br />   return textId;<br /> <br /> }<br /> <br /> void CMyDatabase::rotationGroup(CString strGroupName ,CReiPoint ptRotation,double rotationAngle) <br /> {<br />   AcGePoint3d pt;<br />   AcDbDictionary *pGroupDict;<br />   acdbCurDwg()->getGroupDictionary(pGroupDict,AcDb::kForWrite);<br />   AcDbObjectId groupId;<br />   AcDbGroup *pGroup;<br />   pt.x=ptRotation.x;<br />   pt.y=ptRotation.y;<br />   pt.z=ptRotation.z;<br />   if(pGroupDict->getAt(strGroupName,groupId)==Acad::eOk)<br />        acdbOpenObject(pGroup,groupId,AcDb::kForWrite);<br />   else<br />   {<br />     pGroupDict->close();<br />     return;<br />   }<br />   pGroupDict->close();<br />   AcDbGroupIterator* pIter=pGroup->newIterator();<br />   AcDbEntity* pEnt;<br />   AcDbObjectId objId;<br />     pIter=pGroup->newIterator();<br />   for(;!pIter->done();pIter->next())<br />   {<br />     objId=pIter->objectId();<br />     acdbOpenAcDbEntity(pEnt,objId,AcDb::kForWrite);<br />     rotationEntity(pEnt,pt,rotationAngle);<br />     pEnt->close();<br />   }<br />   delete pIter;<br />   pGroup->close();<br /> }<br /> <br /> //************************************************************************<br /> //函数名称:selectEntityInLayer<br /> //函数类型:Acad::ErrorStatus <br /> //返回值:<br /> //功能描述:选择指定层上的实体，得到其对象属性标识符！<br /> //函数作者:Darcy<br /> //创建日期:200X-XX-XX<br /> //参数列表:<br /> //变量名:nLayerName      变量类型:CString               变量说明:<br /> //变量名:nIDs            变量类型:AcDbObjectIdArray&    变量说明:<br /> //变量名:nModelSpace     变量类型:bool                  变量说明:<br /> //************************************************************************<br /> Acad::ErrorStatus    selectEntityInLayer(<br />                                          CString nLayerName,<br />                                          AcDbObjectIdArray& nIDs,<br />                                          bool nModelSpace<br />                                          )<br /> {<br />     Acad::ErrorStatus es=Acad::eOk; <br /> <br />     AcDbBlockTable*        pBlockTable=NULL;<br />     AcDbBlockTableRecord*  pSpaceRecord=NULL;<br />     if (acdbHostApplicationServices()->workingDatabase()==NULL)<br />         return Acad::eNoDatabase;<br />     if ((es = acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable, AcDb::kForRead))==Acad::eOk)<br />     {<br />         char entryName[13];<br />         if (nModelSpace)<br />             strcpy(entryName,ACDB_MODEL_SPACE);<br />         else<br />             strcpy(entryName,ACDB_PAPER_SPACE);<br />         //Get the Model or Paper Space record and open it for read:  <br />         if ((es = pBlockTable->getAt((const char*)entryName, pSpaceRecord, AcDb::kForRead))==Acad::eOk)<br />         {<br />                 AcDbBlockTableRecordIterator* pIter;<br />                 if (pSpaceRecord->newIterator(pIter)==Acad::eOk)<br />                 {<br />                     for (pIter->start();!pIter->done();pIter->step())<br />                     {<br />                         char *name=NULL;<br />                         AcDbEntity* pEntity;<br />                         if (pIter->getEntity(pEntity,AcDb::kForRead)==Acad::eOk)<br />                         {<br />                             name=pEntity->layer();<br />                             if (nLayerName.CompareNoCase(name)==0)<br />                                 nIDs.append(pEntity->objectId());<br /> <br />                             pEntity->close();<br />                             acutDelString(name); <br />                         }<br />                     }<br />                     delete pIter;<br />                 }            <br />                 pSpaceRecord->close();<br />         }   <br />         pBlockTable->close();<br />     }<br /> <br />     return es;<br /> }<br /> <br /> 功能:   判断两点是否相同(误差在指定范围内)<br /> 参数:   p1、p2为欲判定的两点<br /> 返回值: 0 -- 不相同；1 -- 相同<br /> //=========================================================<br /> int Equal_Points (const ads_point p1, const ads_point p2) <br /> {<br />     // 指定误差范围<br />     const ads_real Equality_Margin = (ads_real)0.00000001; <br />     <br />     int c ;<br />     for (c = X ; c <= Z ; c++) {<br />         if (fabs(p1[c] - p2[c]) > Equality_Margin) {<br />             return (0) ;<br />         }<br />     }<br />     return (1) ;<br /> }<br /> BOOL BaseHandle::PointIsInPolygon(AcGePoint3d pt, AcGePoint3dArray ptArr)<br /> {<br />     int ptNum,i,interNum;<br />     AcGePoint3d ptA,ptB;<br />     ads_point pt0,pt1,pt2,ptIns,ptX;<br />     <br />     interNum = 0;<br />     pt0[X] = 0.0;<br />     pt0[Y] = 0.0;<br />     pt0[Z] = 0.0;<br />     ptX[X] = pt.x;<br />     ptX[Y] = pt.y;<br />     ptX[Z] = pt.z;<br />     ptNum = ptArr.length();<br />     for (i = 0;i < ptNum - 1;i++){<br />       ptA = ptArr.at(i);<br />       ptB = ptArr.at(i + 1);<br />       pt1[X] = ptA.x;<br />       pt1[Y] = ptA.y;<br />       pt1[Z] = 0.0;<br />       pt2[X] = ptB.x;<br />       pt2[Y] = ptB.y;<br />       pt2[Z] = 0.0;<br />       if (acdbInters(ptX,pt0,pt1,pt2,1,ptIns) == RTNORM){<br />         interNum++;<br />       }<br />     }<br /> //上述交点没有判断是否与某一端点重合，如果有interNum-1，有<br /> //兴趣的朋友可以修改完成。<br />     if (interNum % 2 == 0){<br />       return false;<br />     }else{<br />       return true;<br />     }<br /> }<br /> <br /> <br /> //==========================================================<br /> 功能：新建一个图层<br /> 参数：LayerName -- 图层名，LayerColor -- 颜色名<br /> 返回：图层ID<br /> //==========================================================<br /> AcDbObjectId CreateNewLayer(CString LayerName, AcCmColor LayerColor)<br /> {<br />   // 获得当前图形数据库的符号表<br />   AcDbLayerTable *pLayerTable;<br />   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pLayerTable,<br />     AcDb::kForWrite);<br />   // 生成新的图层表记录<br />   AcDbLayerTableRecord *pLayerTableRecord = new AcDbLayerTableRecord;<br />   pLayerTableRecord->setName(LayerName);    // 设置图层名<br />   pLayerTableRecord->setColor(LayerColor);  // 设置图层颜色<br />   AcDbObjectId layerId;<br />   pLayerTable->add(layerId,pLayerTableRecord);<br />   // 关闭图层表和图层表记录<br />   pLayerTable->close();<br />   pLayerTableRecord->close();<br />   return layerId;<br /> }<br /> <br /> //==========================================================<br /> 功能：在指定图层上新建一条直线<br /> 参数：见注释<br /> 返回：直线ID<br /> //==========================================================<br /> AcDbObjectId CreateLine( double x1,double y1,double z1,  // 起点坐标<br />                      double x2,double y2,double z2,  // 终点坐标<br />                      AcDbObjectId layer)                   // 直线所在图层<br /> {<br />   AcGePoint3d StartPt(x1,y1,z1);  // 起点<br />   AcGePoint3d EndPt(x2,y2,z2);  // 终点<br />   AcDbLine *pLine = new AcDbLine(StartPt,EndPt);<br />   // 获得当前图形数据库的符号表<br />   AcDbBlockTable *pBlockTable;<br />   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pBlockTable,<br />     AcDb::kForRead);<br />   // 获得符号表中的模型空间块表记录指针，用于添加对象<br />   AcDbBlockTableRecord *pBlockTableRecord;<br />   pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);<br />   pBlockTable->close();<br />   // 将直线添加到模型空间块表记录中<br />   AcDbObjectId lineId;<br />   pLine->setLayer(layer,Adesk::kTrue);  // 设置直线所在图层<br />   pBlockTableRecord->appendAcDbEntity(lineId,pLine);<br />   // 关闭块表记录指针和直线指针<br />   pBlockTableRecord->close();<br />   pLine->close();<br />   // 返回直线ID号<br />   return lineId;<br /> }<br /> <br /> <br /> <br /> 已知一段弧的起点和终点以及其凸度,求其圆心 <br /> <br /> int getCenter(ads_point startPoint,ads_point endPoint,double bulge,ads_point& center)<br /> {<br /> if (bulge==0.0)<br /> {<br /> ads_point_set(startPoint,center);<br /> return 0;<br /> }<br /> ads_point startPt,endPt;<br /> if (bulge<0.0)<br /> {<br /> ads_point_set(endPoint,startPt);<br /> ads_point_set(startPoint,endPt);<br /> bulge=bulge*(-1.0);<br /> }<br /> else<br /> {<br /> ads_point_set(startPoint,startPt);<br /> ads_point_set(endPoint,endPt);<br /> }<br /> double distStartToEnd,distX,distY,radius;<br /> distStartToEnd=ads_distance(startPt,endPt);<br /> distX=distStartToEnd/2.0;<br /> distY=bulge*distX;<br /> radius=((distX*distX)+(distY*distY))/(2.0*distY);<br /> <br /> double tmpAng;<br /> ads_point tmpPt;<br /> <br /> tmpAng=ads_angle(startPt,endPt);<br /> ads_polar(startPt,tmpAng,distX,tmpPt);<br /> ads_polar(tmpPt,(tmpAng+(_PI/2.0)),(radius-distY),center);<br /> return 1;<br /> <br /> };<br />

cneagle

好东西。有对应的头文件就更好了

dongJi_36

好东西，就是有的函数开头没有说明，看起来很费劲。

lionssky

好好学习，减少了很多时间啊！

zhenyoucai

多谢分享，非常感谢

print1985

谢谢楼主总结分享

fu000000

膜拜大神