weihedao 发表于 2008-7-31 08:41:00

新建标注样式并设置为当前

<p>//&nbsp;&nbsp; //创建标注样式<br/>AcDbObjectId Cfuhaobiao::AddDimStyle(char styleName,int bili,AcDbObjectId lineId2)<br/>{</p><p>&nbsp;// 获得当前图形的标注样式表<br/>&nbsp;AcDbObjectId lineId;<br/>&nbsp;struct resbuf pResult;<br/>&nbsp;AcDbDimStyleTable *pDimStyleTbl;<br/>&nbsp;acdbHostApplicationServices()-&gt;workingDatabase()<br/>&nbsp;&nbsp;-&gt;getDimStyleTable(pDimStyleTbl, AcDb::kForWrite);</p><p>&nbsp;// 创建新的标注样式表记录<br/>&nbsp;AcDbDimStyleTableRecord *pDimStyleTblRcd;<br/>&nbsp;pDimStyleTblRcd = new AcDbDimStyleTableRecord();</p><p>&nbsp;if (pDimStyleTbl-&gt;has(styleName))<br/>&nbsp;{</p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; pDimStyleTbl-&gt;close();<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br/>&nbsp;&nbsp; acdbHostApplicationServices()-&gt;workingDatabase()<br/>&nbsp;&nbsp;-&gt;getDimStyleTable(pDimStyleTbl, AcDb::kForRead);</p><p>&nbsp;&nbsp;&nbsp; pDimStyleTbl-&gt;getAt(styleName, lineId);</p><p>&nbsp; //把标注样式设置为当前<br/>acedGetVar(_T("DIMSTYLE"),&amp;pResult);//取得当前标注</p><p>//如果用下面的方法则标注样式会有一个"样式替代"</p><p>&nbsp;if&nbsp; (pResult.resval.rstring !=styleName )<br/>&nbsp;acdbHostApplicationServices()-&gt;workingDatabase()<br/>&nbsp;-&gt;setDimstyle(lineId);<br/>&nbsp;</p><p>&nbsp;&nbsp;pDimStyleTbl-&gt;close();<br/>&nbsp;&nbsp;return lineId;<br/>&nbsp;}</p><p>&nbsp;// 设置标注样式的特性<br/>&nbsp;pDimStyleTblRcd-&gt;setName(styleName); // 样式名称<br/>&nbsp;pDimStyleTblRcd-&gt;setDimasz(50*bili); // 箭头长度</p><p>&nbsp;pDimStyleTblRcd-&gt;setDimblk("_Oblique");//设置箭头的形状为建筑标记</p><p>&nbsp;pDimStyleTblRcd-&gt;setDimexe(30*bili); // 指定尺寸界线超出尺寸线的距离<br/>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimlfac(1);//比例因子<br/>&nbsp;&nbsp;&nbsp; AcCmColor suiceng;<br/>&nbsp;&nbsp;&nbsp;&nbsp; suiceng.setColorIndex(256);<br/>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimclrd(suiceng);//为尺寸线、箭头和标注引线指定颜色,0为随图层<br/>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimclre(suiceng);//为尺寸界线指定颜色。此颜色可以是任意有效的颜色编号<br/>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimclrt(suiceng);//为标注文字指定颜色,0为随图层<br/>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimdec(0);//设置标注主单位显示的小数位位数,0为随图层<br/>&nbsp;<br/>&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimexo(30*bili);//指定尺寸界线偏移原点的距离<br/>&nbsp;<br/>&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimgap(10*bili);//文字从尺寸线偏移 '当尺寸线分成段以在两段之间放置标注文字时,设置标注文字周围的距离<br/>&nbsp;pDimStyleTblRcd-&gt;setDimjust(0);//控制标注文字的水平位置<br/>&nbsp;pDimStyleTblRcd-&gt;setDimtix(1);//设置标注文字始终绘制在尺寸界线之间</p><p><br/>&nbsp;//'.SetVariable "DimJust", 0&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '控制标注文字的水平位置<br/>&nbsp;//&nbsp;'0&nbsp; 将文字置于尺寸线之上,并在尺寸界线之间置中对正<br/>&nbsp;//&nbsp;'1&nbsp; 紧邻第一条尺寸界线放置标注文字<br/>&nbsp;//&nbsp;'2&nbsp; 紧邻第二条尺寸界线放置标注文字<br/>&nbsp;//&nbsp;'3&nbsp; 将标注文字放在第一条尺寸界线以上,并与之对齐<br/>&nbsp;&nbsp;&nbsp; //'4&nbsp; 将标注文字放在第二条尺寸界线以上,并与之对齐<br/>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimtmove(0);//设置标注文字的移动规则</p><p>&nbsp;//'0&nbsp; 尺寸线和标注文字一起移动<br/>&nbsp;//'1&nbsp; 在移动标注文字时添加一条引线<br/>&nbsp;&nbsp;&nbsp; // '2&nbsp; 允许标注文字自由移动而不用添加引线</p><p>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimtxsty(lineId2);//指定标注的文字样式</p><p>&nbsp;&nbsp;&nbsp; pDimStyleTblRcd-&gt;setDimtxt(100);//指定标注文字的高度,除非当前文字样式具有固定的高度<br/>&nbsp;&nbsp; <br/>&nbsp;pDimStyleTblRcd-&gt;setDimtad(1*bili); // 文字位于标注线的上方<br/>&nbsp;<br/>&nbsp;<br/>&nbsp;// 将标注样式表记录添加到标注样式表中<br/>&nbsp;pDimStyleTbl-&gt;add(lineId,pDimStyleTblRcd);</p><p>&nbsp;&nbsp; pDimStyleTblRcd-&gt;close();<br/>&nbsp;//设置为当前<br/>&nbsp;pDimStyleTbl-&gt;close();<br/>&nbsp;acdbHostApplicationServices()-&gt;workingDatabase()<br/>&nbsp;&nbsp;-&gt;getDimStyleTable(pDimStyleTbl, AcDb::kForRead);<br/>&nbsp;//使用下面的方法不成功~<br/>&nbsp;acedGetVar(_T("DIMSTYLE"),&amp;pResult);//取得当前标注<br/>&nbsp;pResult.resval.rstring =styleName;//;pLtName;<br/>&nbsp;&nbsp; acedSetVar(_T("DIMSTYLE"), &amp;pResult);&nbsp;<br/>&nbsp;pDimStyleTbl-&gt;close();<br/>&nbsp;return lineId;</p><p>}</p><p></p><p>问题是:我如何把某一标注样式设置为当前的标注样式,并且不要出现样式替代?</p><p></p><p></p><p></p><p></p><p></p><p></p><p></p><p></p>

sieben 发表于 2008-8-13 08:38:00

acdbHostApplicationServices()-&gt;workingDatabase()-&gt;setDimstyle(pDimStyleTblRcd-&gt;objectId());<br/>

hourui800720 发表于 2011-7-20 16:16:19

也在等答案,谁能回答啊

hourui800720 发表于 2011-8-1 11:23:01

thank you

hourui800720 发表于 2011-8-5 17:24:29

我已经钻研出来了

huliyue 发表于 2011-8-6 20:24:25

有很强的可以说读性啊!

hgf876 发表于 2011-8-7 22:22:03

    acdbHostApplicationServices()->workingDatabase()->setDimstyleData(idDimstyle);
    acdbHostApplicationServices()->workingDatabase()->setDimstyle(idDimstyle);
上面两个同时用

kkxxyyp 发表于 2011-11-13 15:56:37

感谢……楼上的
页: [1]
查看完整版本: 新建标注样式并设置为当前