定义一个命令，功能：让用户选择界面上的直线实体，然后修改所有选中实体的颜色

admin

1. static void TESTchangecolorcmd()  
2. {  
3.         ads采用name ssname;  
4.         resbuf strFilter;  
5.         ////只能选择直线对象，构造选择集过滤器，只能选直线  
6.         strFilter.resval.rstring = 采用T("LINE");  
7.         strFilter.rbnext = NULL;  
8.         strFilter.restype = 0;  
10.         ////选择多个实体，传递NULL，让用户自己来选  
11.         if(acedSSGet(NULL,NULL,NULL,&strFilter,ssname) != RTNORM)  
12.         {  
13.                 return;  
14.         }  
16.         long len;  
17.         acedSSLength(ssname,&len);  
18.         CString ss;  
19.         ss.Format(采用T("已选中%d个实体"),len);  
20.         acutPrintf(ss);  
22.         ads采用name entname;  
24.         AcDbObjectId id;  
25.         AcDbEntity* ent = NULL;  
26.         CString strName;  
28.         ////弹出颜色选择对话框，选中一个颜色，默认是当前层的颜色  
29.         int nNewColor = SelColor();  
31.         for (int i=0;i<len;i++)  
32.         {  
33.                 if (acedSSName(ssname, i, entname) == RTNORM)  
34.                 {  
36.                         ////根据名称得到ID  
37.                         acdbGetObjectId(id,entname);  
39.                         ////以写模式，根据ID索引到对象，并打开ENTITY  
40.                         acdbOpenObject(ent,id,AcDb::OpenMode::kForWrite);  
41.                         strName.Format(采用T("%d"),ent->colorIndex());  
42.                         acutPrintf(采用T("\n"));  
43.                         acutPrintf(strName);  
45.                         ent->setColorIndex(nNewColor);  
46.                         ent->close();  
47.                 }  
48.         }  
49.         acedSSFree(ssname);  
50. }  

复制代码