wimal Posted June 20, 2013 Share Posted June 20, 2013 (setq hh;current text hight (assoc 40; text hight of current text style (entget (tblobjname "STYLE" (getvar "TEXTSTYLE"))) )) Above code is ok.But following not working. (setq hh;current text hight (assoc 40; text hight of current dim style (entget (tblobjname "STYLE" (getvar "DIMSTYLE"))) )) How can I get the entity name of current dim style. Actually I need to find out weather leader of current dim style has set to mtext and if so I want to change to none. Quote Link to comment Share on other sites More sharing options...
Lee Mac Posted June 20, 2013 Share Posted June 20, 2013 How can I get the entity name of current dim style. (tblobjname "dimstyle" (getvar 'dimstyle)) Quote Link to comment Share on other sites More sharing options...
wimal Posted June 21, 2013 Author Share Posted June 21, 2013 (edited) Thanks sir I used your code But I could not reach to my target.I try to find out weather current leader arrow has attached with annotive (Mtext). Can you help me to find out that. Edited June 21, 2013 by wimal Quote Link to comment Share on other sites More sharing options...
Lee Mac Posted June 21, 2013 Share Posted June 21, 2013 I try to find out weather current leader arrow has attached with annotive (Mtext). Do you mean whether the MLeader Style is set to use MText, Block or None? If so, (= acmtextcontent (vla-get-contenttype (vla-item (vla-item (vla-get-dictionaries (vla-get-activedocument (vlax-get-acad-object) ) ) "ACAD_MLEADERSTYLE" ) (getvar 'cmleaderstyle) ) ) ) Quote Link to comment Share on other sites More sharing options...
wimal Posted June 22, 2013 Author Share Posted June 22, 2013 yes you are correct. But cad 2006 system variable " cmleaderstyle " not found. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.