【转帖】新建标注样式并设置为当前
 

新建标注样式并设置为当前
新建标注样式并设置为当前
// //创建标注样式
acdbobjectid cfuhaobiao::adddimstyle(char stylename[100],int bili,acdbobjectid lineid2)
{
// 获得当前图形的标注样式表
acdbobjectid lineid;
struct resbuf presult;
acdbdimstyletable *pdimstyletbl;
acdbhostapplicationservices()->workingdatabase()
->getdimstyletable(pdimstyletbl, acdb::kforwrite);
// 创建新的标注样式表记录
acdbdimstyletablerecord *pdimstyletblrcd;
pdimstyletblrcd = new acdbdimstyletablerecord();
if (pdimstyletbl->has(stylename))
{
pdimstyletbl->close();

acdbhostapplicationservices()->workingdatabase()
->getdimstyletable(pdimstyletbl, acdb::kforread);
pdimstyletbl->getat(stylename, lineid);
//把标注样式设置为当前
acedgetvar(_t("dimstyle"),&presult);//取得当前标注
//如果用下面的方法则标注样式会有一个"样式替代"
if (presult.resval.rstring !=stylename )
acdbhostapplicationservices()->workingdatabase()
->setdimstyle(lineid);

pdimstyletbl->close();
return lineid;
}
// 设置标注样式的特性
pdimstyletblrcd->setname(stylename); // 样式名称
pdimstyletblrcd->setdimasz(50*bili); // 箭头长度
pdimstyletblrcd->setdimblk("_oblique");//设置箭头的形状为建筑标记
pdimstyletblrcd->setdimexe(30*bili); // 指定尺寸界线超出尺寸线的距离
pdimstyletblrcd->setdimlfac(1);//比例因子
accmcolor suiceng;
suiceng.setcolorindex(256);
pdimstyletblrcd->setdimclrd(suiceng);//为尺寸线、箭头和标注引线指定颜色，0为随图层
pdimstyletblrcd->setdimclre(suiceng);//为尺寸界线指定颜色。此颜色可以是任意有效的颜色编号
pdimstyletblrcd->setdimclrt(suiceng);//为标注文字指定颜色，0为随图层
pdimstyletblrcd->setdimdec(0);//设置标注主单位显示的小数位位数，0为随图层

pdimstyletblrcd->setdimexo(30*bili);//指定尺寸界线偏移原点的距离

pdimstyletblrcd->setdimgap(10*bili);//文字从尺寸线偏移 '当尺寸线分成段以在两段之间放置标注文字时，设置标注文字周围的距离
pdimstyletblrcd->setdimjust(0);//控制标注文字的水平位置
pdimstyletblrcd->setdimtix(1);//设置标注文字始终绘制在尺寸界线之间
//'.setvariable "dimjust", 0 '控制标注文字的水平位置
// '0 将文字置于尺寸线之上，并在尺寸界线之间置中对正
// '1 紧邻第一条尺寸界线放置标注文字
// '2 紧邻第二条尺寸界线放置标注文字
// '3 将标注文字放在第一条尺寸界线以上，并与之对齐
//'4 将标注文字放在第二条尺寸界线以上，并与之对齐
pdimstyletblrcd->setdimtmove(0);//设置标注文字的移动规则
//'0 尺寸线和标注文字一起移动
//'1 在移动标注文字时添加一条引线
// '2 允许标注文字自由移动而不用添加引线
pdimstyletblrcd->setdimtxsty(lineid2);//指定标注的文字样式
pdimstyletblrcd->setdimtxt(100);//指定标注文字的高度，除非当前文字样式具有固定的高度

pdimstyletblrcd->setdimtad(1*bili); // 文字位于标注线的上方


// 将标注样式表记录添加到标注样式表中
pdimstyletbl->add(lineid,pdimstyletblrcd);
pdimstyletblrcd->close();
//设置为当前
pdimstyletbl->close();
acdbhostapplicationservices()->workingdatabase()
->getdimstyletable(pdimstyletbl, acdb::kforread);
//使用下面的方法不成功~
acedgetvar(_t("dimstyle"),&presult);//取得当前标注
presult.resval.rstring =stylename;//;pltname;
acedsetvar(_t("dimstyle"), &presult);
pdimstyletbl->close();
return lineid;
}
问题是:我如何把某一标注样式设置为当前的标注样式,并且不要出现样式替代?
acdbhostapplicationservices()->workingdatabase()->setdimstyle(pdimstyletblrcd->objectid());
*******************
e_mail : siebeneagle@yahoo.com.cn
msn : siebeneagle@hotmail.com
qq : 812928665