找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1990|回复: 2

[每日一码] Change Layer Colour of selected object AutoCAD DotNet

[复制链接]

已领礼包: 3199个

财富等级: 富可敌国

发表于 2015-5-15 16:00:10 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
  1. using Autodesk.AutoCAD.ApplicationServices;

  2. using Autodesk.AutoCAD.DatabaseServices;

  3. using Autodesk.AutoCAD.Runtime;

  4. using Autodesk.AutoCAD.EditorInput;

  5. using Autodesk.AutoCAD.Geometry;

  6. [assembly: CommandClass(typeof(iccTools.iccCommands))]

  7. namespace iccTools

  8. {

  9. publicclassiccCommands

  10. {

  11. //The command used in AutoCAD “CLC”

  12. [CommandMethod("CLC", CommandFlags.Session)]

  13. publicvoid ChangeLayerColour()

  14. {

  15. //Get the current document & database

  16. Document doc = Application.DocumentManager.MdiActiveDocument;

  17. Database db = doc.Database;

  18. //Lock the document

  19. using (DocumentLock doclock = doc.LockDocument())

  20. {

  21. //Start new Transaction

  22. using (Transaction tr = db.TransactionManager.StartTransaction())

  23. {

  24. PromptSelectionResult SSPrompt = SSPrompt = doc.Editor.GetSelection();

  25. if (SSPrompt.Status == PromptStatus.OK)

  26. {

  27. SelectionSet SSet = SSPrompt.Value;

  28. Autodesk.AutoCAD.Windows.ColorDialog cd = new Autodesk.AutoCAD.Windows.ColorDialog();

  29. LayerTable lt = (LayerTable)tr.GetObject(db.LayerTableId, OpenMode.ForRead);

  30. cd.ShowDialog();

  31. if (!(cd.Color == null))

  32. {

  33. foreach (SelectedObject selObj in SSet)

  34. {

  35. Entity ent = (Entity)tr.GetObject(selObj.ObjectId, OpenMode.ForWrite, false, true);

  36. if (lt.Has(ent.Layer))

  37. {

  38. //change layer properties

  39. LayerTableRecord ltr = (LayerTableRecord)tr.GetObject(lt[ent.Layer], OpenMode.ForWrite);

  40. ltr.Color = cd.Color;

  41. }

  42. }

  43. tr.Commit();

  44. }

  45. }

  46. //Unlock the document

  47. }

  48. }

  49. }

  50. }

  51. }

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

已领礼包: 859个

财富等级: 财运亨通

发表于 2015-5-15 23:09:20 来自手机 | 显示全部楼层
层管理直接在layer管理器设置也可以
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-12-23 01:37 , Processed in 0.405032 second(s), 33 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表