[求助]：请问填充问题

lvqingli

用 ARX 编写语句：
ads_name bss;  // 已经构建一选择集
acedCommand(RTSTR, "HATCH", RTSTR, "HEX", RTSTR, "",RTSTR, "",RTPICKS, bss, RTSTR,"", 0);

这样可以实现使用  Select Objects  选择方式进行填充

请问 ，若实现 Pick Points  选择方式进行填充

应该怎么办呢？

谢谢！

XDSoft

如果你用ADSRX，用命令的话，先用命令 -boundary 构造点边界。然后把构造出来的POLYLINE做命令 -bhatch 的边界。

使用ARX，还是推荐你不要用命令，而是用实例AcDbHatch对象的方法，构造HATCH，然后添加到数据库中。这样效率高，而且给程序员最大的定制性能。

kfx2002

一个区域填充的函数，希望能对你有点帮助

1. 
   
2. [FONT=courier new]
   
3. /*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*/
   
4. //| 函数名:                        区域填充
   
5. //|                                        FillInRegion()
   
6. //|                                               
   
7. //| 输入参数:                int No                                        区域点的个数
   
8. //|                                        ads_point pt[]                        区域各点的坐标
   
9. //|                                        int color                                颜色
   
10. //|                                        double Scale                        比率
    
11. //|                                        char *lpszPatternName        样式
    
12. //|                                        char *strLayerName                层名
    
13. //|                                        struct resbuf *xData        附加扩展数据
    
14. //|
    
15. //| 返回:                        AcDbObjectId
    
16. //| 说明:                        指定层及区域的各点坐标，在区域中按指定样式和颜色填充
    
17. //| 举例:                        略
    
18. //|
    
19. /*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*/
    
20. AcDbObjectId FillInRegion(int No, ads_point pt[],int color,double Scale,char *lpszPatternName,
    
21.                                         char *strLayerName,struct resbuf *xData)
    
22. {
    
23.         AcGePoint2d temp;
    
24.         AcDbObjectId FillId;
    
25. 
    
26.         AcGePoint2dArray External;
    
27.         for (int j = 0; j < No; j++) {
    
28.                 temp.set(pt[j][0],pt[j][1]);
    
29.                 External.append(temp);
    
30.         }        //填加区域点
    
31.         AcDbHatch * pHatch = new AcDbHatch;//创建图案填充对象
    
32. 
    
33.     AcDbBlockTable *pBlockTable;
    
34. 
    
35.     if (acdbHostApplicationServices()->workingDatabase()->
    
36.                 getBlockTable(pBlockTable,AcDb::kForRead) != Acad::eOk) {
    
37.                 ads_printf("\n错误：无法获取块表！\n");
    
38.                 pHatch->close();
    
39.                 return 0;
    
40.         }
    
41. 
    
42.     AcDbBlockTableRecord *pBlockTableRecord;
    
43. 
    
44.     if (pBlockTable->getAt(ACDB_MODEL_SPACE, pBlockTableRecord,
    
45.         AcDb::kForWrite) != Acad::eOk) {
    
46.                 ads_printf("\n错误：无法获取符号表！\n");
    
47.                 pBlockTable->close();
    
48.                 return 0;
    
49.         }
    
50. 
    
51.            pBlockTable->close();
    
52. 
    
53.         AcGeVector3d normal(0.0,0.0,1.0);
    
54.         pHatch -> setNormal(normal);                                                                        //设置法线适量
    
55.         pHatch -> setElevation(0.5);                                                                        //设置绘图标高
    
56.         pHatch -> setAssociative(Adesk::kTrue);                                                       
    
57.         pHatch -> setPatternScale(Scale);                                                                //设置缩放比例
    
58.         pHatch -> setPattern(AcDbHatch::kPreDefined,lpszPatternName);        //设置填充图案
    
59.         pHatch -> setHatchStyle(AcDbHatch::kNormal);                                        //设置填充样式
    
60.         pHatch -> setColorIndex(color);                                                                        //设置剖面线颜色
    
61.         pHatch -> setLayer(strLayerName);                                                                //设置所在图图层
    
62. 
    
63. 
    
64.         AcGeDoubleArray vertexBulges;
    
65.     vertexBulges.setPhysicalLength(0).setLogicalLength(No);
    
66.     for (int i = 0 ;i < No ;i++) vertexBulges[i] = 0.0;                                //清零
    
67. 
    
68.         //边界生成：外边界
    
69.     if (pHatch->appendLoop(AcDbHatch::kExternal, External, vertexBulges) != Acad::eOk) {
    
70.                 ads_printf("\n错误：无法形成填充外边界！\n");
    
71.                 pBlockTableRecord->close();
    
72.                 pHatch->close();
    
73.                 return 0;
    
74.         }
    
75. 
    
76.         if (pHatch -> evaluateHatch() != Acad::eOk) {        //用设定的剖面线样式填充
    
77.                 ads_printf("\n错误：无法用设定的剖面线样式填充！\n");
    
78.                 pBlockTableRecord->close();
    
79.                 pHatch->close();
    
80.                 return 0;
    
81.         }
    
82. 
    
83.         if (pBlockTableRecord->appendAcDbEntity(FillId, pHatch) != Acad::eOk) {
    
84.                 ads_printf("\n错误：无法将填充实体填加至数据库中！\n");
    
85.                 pBlockTableRecord->close();
    
86.                 pHatch->close();
    
87.                 return 0;
    
88.         }
    
89. 
    
90.         pBlockTableRecord->close();               
    
91. 
    
92.         //===========加扩展数据===========
    
93.         pHatch->upgradeOpen();
    
94. 
    
95.         if (pHatch->setXData(xData) != Acad::eOk){
    
96. 
    
97.                 ads_printf("\n警告: 实体（填充对象 ID=%d）添加扩展数据时出错!\n",FillId);
    
98.         }
    
99.         //================================
    
100.         pHatch->close();
     
101. 
     
102.         return FillId;
     
103. }
     
104. [/font]

复制代码

XDSoft

最初由 kfx2002 发布
[B]一个区域填充的函数，希望能对你有点帮助

/*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*/
//| 函数名:                        区域填充
//|                                        FillInRegion()
//|                                               
... [/B]

谢谢！加10分。

另：我替你编辑帖子，代码缩进了。

你可以看看论坛介绍的“如何让代码缩进”的方法，以后发贴使用下吧。

kfx2002

噢，明白了，呵呵，下次注意